Suche/Finde-VBA-> Vorbelegung ?
04.01.2007 09:55:05
Fabio
Anfang des letzen Jahres habe ich ein "Suche/finde" VBA hier im Forum bekommen. Wird aufgerufen mit "Call" - und zwar das folgende Script :
Sub SuchenNachAA()
finde = Cells(ActiveSheet.UsedRange.SpecialCells(xlLastCell).Row, 27)
Application.Dialogs(xlDialogFormulaReplace).Show finde
End Sub
Nun öffnet sich der Dialog "Suchen/Ersetzen", nur ist das Feld "suchen nach" nicht mehr vorbelgt (vermutlich weil ich andere Dateien habe).
Soweit ich das in Erinnerung habe, sucht der damit die letzte Zeile :
finde = Cells(ActiveSheet.UsedRange.SpecialCells(xlLastCell).Row, 27)
-> nur - mit welchem "Befehl" ist definiert, das er das "suchen nach" Feld vorbelegt ?
Anders gesagt : Ich suche eine Lösung für :
1. Markiere die Letzte Zeile
2. Öffene das "suchen/ersetzen" Feld
3. Belege das "suche" Feld mit dem Wert vor, der in "der letzen Reihe in der Spalte "AA" steht.
Danke für Tipps, Hinweise - und/oder auch Lösungen.
Fabio