Worksheet_SelectionChange Problem
19.09.2007 18:07:00
fukerider
Ich möchte wenn der Cursor im Bereich G15:AP44 platziert ist
den Wert aus Spalte E der gleichen Zeile anzeigen (in A1).
Das funktioniert gut mit
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Not Intersect(Target, [G15:AP44]) Is Nothing Then
Range("A1") = Cells(Target.Row, 5)
End If
End Sub
Jetzt möchte ich zusätzlich in B1 den Wert aus Zeile 1 der gleichen Spalte anzeigen.
Wie muss die Syntax lauten?
Range("B1") = Cells(Target.Column, 1) funktioniert bei mir nicht.
Für Antworten Dank im voraus
Klaus