Erste leere Zeile

• Erste leere Zeile von Klaus vom 19.09.2003 09:27:03
  • AW: Erste leere Zeile - von Hajo_Zi am 19.09.2003 09:43:58
    • AW: Erste leere Zeile - von Klaus am 19.09.2003 09:58:00
      • AW: Erste leere Zeile - von Hajo_Zi am 19.09.2003 10:00:10
        • AW: Erste leere Zeile / noch ne Frage - von klaus am 19.09.2003 10:32:55
          • AW: Erste leere Zeile / noch ne Frage - von Hajo_Zi am 19.09.2003 10:38:39
            • AW: Erste leere Zeile / noch ne Frage - von Klaus am 19.09.2003 10:52:14
              • AW: Erste leere Zeile / noch ne Frage - von Hajo_Zi am 19.09.2003 10:55:53
                • AW: Erste leere Zeile / noch ne Frage - von Klaus am 19.09.2003 11:02:30
                  • AW: Erste leere Zeile / noch ne Frage - von Hajo_Zi am 19.09.2003 11:07:11
                    • AW: Erste leere Zeile / noch ne Frage - von GerdW am 19.09.2003 11:16:55
                    • AW: Schönen Dank - von Klaus am 19.09.2003 11:19:10
                      • Danke für die Rückmeldung oT - von Hajo_Zi am 19.09.2003 11:20:56

Betrifft: Erste leere Zeile
von: Klaus
Geschrieben am: 19.09.2003 09:27:03
Hallo Leute,
habe folgendes Problem: möchte mittels Makro Daten von einer Tabelle in eine andere kopieren. Dabei sollen die Daten in der Zieltabelle aber nicht überschrieben werden sondern in die erste freie Zeile eingefügt werden.
schönen Dank im voraus.

Betrifft: AW: Erste leere Zeile
von: Hajo_Zi
Geschrieben am: 19.09.2003 09:43:58
Hallo Klaus

erste freie Zeile oder nach der letzten Zeile???

Gruß Hajo

Betrifft: AW: Erste leere Zeile
von: Klaus
Geschrieben am: 19.09.2003 09:58:00
Hey Hajo,
nach der letzten Zeile
Gruß Klaus

Betrifft: AW: Erste leere Zeile
von: Hajo_Zi
Geschrieben am: 19.09.2003 10:00:10
Hallo Klaus

die Zeile erhälts mit

Worksheets("Tabelle1").UsedRange.SpecialCells(xlCellTypeLastCell).Row + 1

Gruß Hajo

Betrifft: AW: Erste leere Zeile / noch ne Frage
von: klaus
Geschrieben am: 19.09.2003 10:32:55
Hey bekomme das nicht so ganz auf die Reihe. Kopiere mal ein teil des makros

Workbooks.Open FileName:="C:\Temp\b477.xls"
Application.Run "b477.xls!Makro15"
Range("A1:AA1500").Select
Selection.Copy
ActiveWindow.WindowState = xlMinimized
ActiveWindow.WindowState = xlMinimized


Range("A1").Select hier soll statt A1 die Zeile nach der letzten beschriebenen
ausgewählt werden (in der aktiven Tabelle)


ActiveSheet.Paste
ActiveWindow.WindowState = xlMinimized
Windows("b477.xls").Activate
ActiveWindow.WindowState = xlNormal
ActiveSheet.Paste
Application.CutCopyMode = False

Betrifft: AW: Erste leere Zeile / noch ne Frage
von: Hajo_Zi
Geschrieben am: 19.09.2003 10:38:39
Hallo Klaus

so ganz ist mir Dein Makro nicht klar

Range("A1:AA1500").Copy Destination:=Cells(ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row + 1, 1)

Auf Select usw. kann zu 99% in VBA verzichtet werden.

Gruß Hajo

Betrifft: AW: Erste leere Zeile / noch ne Frage
von: Klaus
Geschrieben am: 19.09.2003 10:52:14
Hey
hab ja geschrieben dass ich nicht so ne menge Ahnung habe, aber Makro funktioniert.
Möchte nur das nicht A1 an dieser Stelle aktiviert wird sondern die Zelle nach der letzten beschriebenen.

Betrifft: AW: Erste leere Zeile / noch ne Frage
von: Hajo_Zi
Geschrieben am: 19.09.2003 10:55:53
Hallo Klaus

Problem gelöst???

der Teil wird doch an die entsprechende Stelle kopiert.

Gruß hajo

Betrifft: AW: Erste leere Zeile / noch ne Frage
von: Klaus
Geschrieben am: 19.09.2003 11:02:30
Hey Hajo
vorab schon mal schönen Dank das du dich mit meinem Problem beschäftigst!!
es ist richtig die Daten werden kopiert und dann da eingefügt, aber wenn ich das Makro erneut aufrufe werden die Daten wieder überschrieben ich möchte die Daten aber behalten . Die neuen Daten sollen hinten angehängt werden.

Betrifft: AW: Erste leere Zeile / noch ne Frage
von: Hajo_Zi
Geschrieben am: 19.09.2003 11:07:11
Hallo Klaus


das ist eine eigenart von Excel. Das Tabellenende kann nicht immer richtig erkannt werden. Sichere mal die Datei zwischendurch.

Gruß Hajo

Betrifft: AW: Erste leere Zeile / noch ne Frage
von: GerdW
Geschrieben am: 19.09.2003 11:16:55
Wenn du auf specialCells und usedrange verzichtest, klappt das auch.

Gerd

Betrifft: AW: Schönen Dank
von: Klaus
Geschrieben am: 19.09.2003 11:19:10
Hallo Hajo,
werde mal noch ein bißchen tüffteln, ist nämlich teil meinen Projektarbeit für die IHK-Prüfung. Falls dir noch was einfällt kannst du ja noch mal schreiben.
Bis dann
Gruß
Klaus

Betrifft: Danke für die Rückmeldung oT
von: Hajo_Zi
Geschrieben am: 19.09.2003 11:20:56