Warum funktioniert VBA nicht?

Bild

Betrifft: Warum funktioniert VBA nicht?
von: Daniel
Geschrieben am: 12.10.2003 02:24:23

Hallo

Ich habe gerade dieses Skript versucht, es funktioniert allerdings nicht.
Was habe ich falsch gemacht:


Private Sub Worksheet_Change(ByVal Target As Range)
Dim i%
If Intersect(Target, Range("AA10")) Is Nothing Then Exit Sub
If Target.Value = "Details: Sendung eingeben" Then
        Cells(10, 29) = Cells(10, 27)
ElseIf Target.Value = "A" Then
    Range("AB10").ClearContents
End If
End Sub


Zur Erklärung

Ich möchte wenn AA10 = Details: Sendung eingeben steht, das dies auch in AB10 steht. Steht aber A in AA10 sollte alles in AB10 gelöscht werden, so dass ein normales leeres Feld entsteht.

Vielen Dank

Daniel
Bild


Betrifft: AW: Warum funktioniert VBA nicht?
von: Jörg Gradert
Geschrieben am: 12.10.2003 02:53:52

Hallo Daniel,
Das Makro funktioniert.
Du schreibst aber Cells(10, 29) = Cells(10, 27), das heisst AC10 = AA10
dann muss es auch Range("AC10").ClearContents heissen.
oder Du musst es oben in Cells(10, 28) = Cells(10, 27) ändern, damit Zelle AB10 angesprochen wird.

Gruss Jörg


 Bild

Beiträge aus den Excel-Beispielen zum Thema " Warum funktioniert VBA nicht?"