Markierte Zeile (Heute) - als 2. Zeile sichtbar
16.06.2004 07:42:16
Angie
ich habe eine Tabelle mit Datum für einen Dienstplan.
Darin sind viele Daten enthalten und er springt auf
die Zeile Heute. Das Makro dazu sieht so aus:
Sub Heute()
[a2].Select
For i = 1 To 366
If ActiveCell.Value = Date Then
Range(Cells(ActiveCell.Row, 1), Cells(ActiveCell.Row, 63)).Select
Else
ActiveCell.Offset(1, 0).Select
End If
Next
End Sub
Nun wird die Zeile auch ordnungsgemäß markiert. Da ich aber auch
90 Tage zurück noch in den Dienstplan schauen will, bringt er die
markierte in die Mitte des Sichtbereiches, dh. Heute steht immer
auf Zeile 92. Somit soll Zeile 92 die 2. sichtbare Zeile des Kalender-
teils und markiert sein. Die 1. Zeile enthalt Namen usw.
Ob so etwas überhaupt möglich ist? Wer kann mir zu dieser Sache
helfen bzw. hat eine Idee?
Gruß an alle Excelfans von
Angie