IF Then funktion mit VBA
26.06.2007 16:44:00
Raphael
Ich habe eine Frage:
Ich möchte die Zelle D7 Flexibel halten, das bedeutet, wenn ich in Zelle D7 was reinschriebe dann soll das stehen bleiben, wenn aber nichts drin steht, dann soll der Wert aus H7 in dieser Zelle stehn. bzw wenn ich etwas aus D7 wieder rausnehme, dann soll auch wider der Wert(Text) aus H7 drin stehn.
Mein Vorschlag sah so aus. funktioniert aber nciht.
Kann mir jemand helfen?
Private Sub Worksheet_Calculate()
If Range("D7") = Range("H7") Then
Range("D7").Value = Range("H7")
End If
End Sub
Danke Euch
MFG
raphael