Zellensuche in Makro einbauen
20.02.2004 11:51:43
Benei
ich muss Zeilen in eine andere Tabelle kopieren. Hierzu habe ich ein Makro aufgezeichnet. Die Zeilen wird so immer an der gleichen Stelle in die andere Tabelle hineingeschrieben. Soweit so gut.
Leider ist die zu selektierende Zelle der Tabelle, in der ich die Zeilen kopieren möchte, nicht immer an der gleichen Stelle. Nun will ich die Zeilen immer an der Stelle der Tabelle hineinkopieren, wo der Zelleninhalt "123" ist.
Konkret: Ich möchte den Befehl " Range("A21").Select " nicht immer auf die Zelle A21 beziehen, sondern immer dort selektieren, wo ein bestimmter Zellinhalt steht, z. B. "123" .
Würd mich freuen wenn mir jemand den Befehl sagen könnte.
Benei
Sub aktuallisieren()
' aktuallisieren Makro
' Makro am 20.02.2004 von Benei aufgezeichnet
' Tastenkombination: Strg+ä
Sheets("1.Halbjahr").Select
Rows("10:18").Select
Selection.Copy
Workbooks.Open Filename:="2004.xls"
Sheets("1.Halbjahr").Select
Range("A21").Select <------------
ActiveSheet.Paste
Application.CutCopyMode = False
ActiveWorkbook.Save
ActiveWindow.Close
Range("A10").Select
End Sub