Ich markiere per VBA eine Zelle und gebe eine Liste als Gültigkeit vor. Nun wird bei Ausführung des Makros die Ansicht geändert. Die per Makro selektierte Zelle wird in der linken oberen Ecke dargestellt. Dies obwohl die Zelle in der Ansicht zu sehen gewesen wäre.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With ActiveWindow
.ScrollRow = Target.Row
.ScrollColumn = Target.Column
End With
Select Case Cells(Target.Row, 4).Text
Case "Meine Liste"
Cells(Target.Row, 5).Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=MeineListe"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
End Select
End Sub
Was kann ich machen damit das Makro zwar die neue Zelle selektiert, den auf dem Bildschirm dargestellten Bereich aber nur ändert wenn die Zelle nicht im sichtbaren Bereich ist?
Gruss
Isha