Zellensprung aber anders
03.02.2005 01:15:01
Eva
mit dem folgenden Codeauszug landet der Cursor direkt in meinem "VBA Spickzettel", den der Anwender eigentlich nicht gleich sehen soll.
Wie kann ich den Excel Cursor auf cells(1,1) setzen?
Danke für die nächtliche Hilfe,
Private Sub cbWerkstoffe_Change() 'Combobox für Werkstofffilter
Application.DisplayAlerts = False
Sheets("Abfrage").Range("A100").Copy
Sheets("technologische Daten").Range("E3000").PasteSpecial Paste:=xlPasteValues 'insert funktioniert hier nicht
With Sheets("technologische Daten").Range("E3000")
.AutoFilter field:=4, Criteria1:=Sheets("technologische Daten").Range("E3000").Value
End With
Application.DisplayAlerts = True
End Sub
Gruß
Eva
Anzeige