Hallo zusammen,
ich habe folgendes Problem:
Die Zeile ist immer 3.
Spalten gibt es von November bis Januar .
Je nachdem, welcher Monat aktiv ist (Januar = 1, Februar = 2, ...), soll die entsprechende Zelle (Zeile immer 3, Spalte je nach Monat) gesucht und ausgewählt werden.
Folgendes habe ich geschrieben:
Dim Spalte As Long
Dim Monat As Long
Dim Zeile As Long
...
Zeile = 3
Monat = Worksheets("Stichtag").Range("A4").Value 'Dort steht der jeweilige Wert für den Monat (Januar = 1, ...)
For Each c In Range("P1:Z1") 'Das ist der Bereich der Spalten von November bis Januar (P1 = 11, Z1 = 1)
If Monat = c.Value Then
Spalte = c.Columns
End If
Next c
Range(Cells(Zeile, Spalte)).Select 'Hiermit will ich die entsprechende Zelle auswählen
Bei "Range" bekomme ich eine Fehlermeldung (LZF 1004, Methode "Range" für das Objekt "_Global" ist fehlgeschlagen). Stundenlanges Suchen hat bisher nichts geholfen.
Ich hoffe, ihr wisst Rat.
Gruß
Marek