habe mal wieder ein VB Problem, dass ich alleine nicht lösen kann.
Habe hier das Prob näher beschrieben. https://www.herber.de/bbs/user/65792.xls
Kann mir bitte jemand von Euch Profis, bei der Lösung helfen?
Danke schon mal
Gruss
Josef
Private Sub worksheet_change(ByVal target As Range)
If Not Intersect(Range("C3:C4"), target) Is Nothing Then
Sheets("Monat").Range("D2:D3").Value = Range("C3:C4").Value
End If
End Sub
Gruß TinoDie erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen