VBA - Formelergebnis nicht aktualisiert

  • Excel

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von alchimist.

    VBA - Formelergebnis nicht aktualisiert

    Mit einem VBA-Makro schreibe ich in EXCEL 2000 in einer Spalte (vorformatiert, Zahl mit 3 Kommastellen) eine Anzahl an Zahlen. In einem anderen Feld habe ich nun eine Formel, in der diese Zahlen addiert werden sollen. Nachdem die Werte mit dem Makro gesetzt werden, ist aber die Summe 0. Erst wenn man in jedes Feld klickt (und entweder in ein anderes Feld oder auf das grüne Hakerl neben dem "=" Zeichen für die Formel), wird diese Zellenwert zum Endergebnis addiert.

    Wie kann ich nun automatisch im Makro schon so eine "Aktivierung" für die Zelle erreichen?

    Der Code für das Schreiben in ein Feld ist:

    Visual Basic-Quellcode

    1. Private Sub AddEntry(cb_caption As String, lbl_caption As String, bool_val As Boolean)
    2. If (bool_val) Then
    3. ActiveCell.value = cb_caption
    4. ActiveCell.Offset(0, 1).Activate
    5. ActiveCell.value = lbl_caption
    6. ActiveCell.Offset(1, -1).Activate
    7. End If
    8. End Sub


    liebe Grüße
    D

    Hallo dertl,

    ist unter Extras-Optionen-Berechnung Automatisch aktiviert?

    Ansonsten ist deine Frage vielleicht nur im Kontext verständlich, da dein Quelltext igendwie gar nicht hilft ;)

    Wenn du schon mit Activate arbeiten musst (ich finde das fast immer vermeidbar), dann lieber so (das With habe ich mal weggelassen):

    Visual Basic-Quellcode

    1. Private Sub AddEntry(cb_caption As String, lbl_caption As String, _
    2. bool_val As Boolean)
    3. If (bool_val) Then
    4. ActiveCell.Value = cb_caption
    5. ActiveCell.Offset(0, 1).Value = lbl_caption
    6. ActiveCell.Offset(1, 0).Activate
    7. End If
    8. End Sub


    Ansonsten lade eine Excel-Datei, welche dein Problem anschaulich macht, hoch und mache uns sie so zugänglich.

    Gruß Markus

Facebook
Telefonspende