Worksheet_BeforeDoubleClick
04.12.2004 17:19:43
Jens_Pu
in einer Tabelle habe ich mit mit dem Worksheet_BeforeDoubleClick Ereignis eine recht umfangreiche Eingabeerleichterung geschaffen.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean)
Dim letzteZeile As Integer
If Target.Row > 8 Then
Select Case Target.Column
Case 1 'NN
'Mach was
Case 8 'Status
'Mach was anderes
Case 9 'Infoart
'Noch was anderes
End Select
End If
End Sub
Bisher prüfe ich immer die Spalte von Target.
Wie kann ich es machen, wenn ich nicht die absolute Spaltennummer ín der Case-Abfrage verwenden möchte, sondern eine banamte Zelle in der jeweiligen Spalte?
In Zeile 8 steht immer die Überschrift der Spalte und dieser Zelle ist auch immer der entsprechende Name zugewiesen. Z.B. NN, Status, Infoart.
Dann könnte ich nämlich meine Spalten beliebig verschieben, bzw. welche einfügen, ohne jedesmal meine Ereignisprocedure anpassen zu müssen.
Gruß Jens