Pete007 Geschrieben 6. September 2001 Teilen Geschrieben 6. September 2001 Moin! Hab null Ahnung von VB und brauche ein Makro, in dem man z.B. von Tabelle 1 bis 10 eine Zeile einfügt. Es hapert schon in der Deklaration der Variablen (es muß ja eine hochgezählt werden und bei "Sheets(???).Select" eingesetzt werden. Momentan sieht das Makro so aus: Sub Makro1() ' ' Makro1 Makro ' Makro am 6.9.2001 von Pete007 aufgezeichnet ' ' Rows("1:1").Select Application.CutCopyMode = False Selection.Copy Sheets(???).Select Rows("1:1").Select Selection.Insert Shift:=xlDown End Sub VIELEN Dank! Zitieren Link zu diesem Kommentar Auf anderen Seiten teilen Mehr Optionen zum Teilen...
capitanx Geschrieben 6. September 2001 Teilen Geschrieben 6. September 2001 Hey, hier ist die Lösung für dein Problem Public Sub Zeilen_einfuegen() For x = 1 To 3 'Tabelle1 bis Tabelle3 für Tabelle 10 To 10 einfügen Sheets(x).Select 'Tabelle Anwählen Rows("1:1").Select 'Erste Spalte makieren Selection.Insert Shift:=xlDown 'Zellen einfügen Next x End Sub Anders als in C oder so muss man in VB in einer Zählschleife die Variablen nicht definieren. Falls du doch mal ne Variable definieren wisst das geht so: Dim Name_der_Variable As Integer definiert eine Integervariable So then have fun while coding! CapitanX Zitieren Link zu diesem Kommentar Auf anderen Seiten teilen Mehr Optionen zum Teilen...
Pete007 Geschrieben 6. September 2001 Autor Teilen Geschrieben 6. September 2001 Wow, dankeschön! Das probier i doch glei mal aus Zitieren Link zu diesem Kommentar Auf anderen Seiten teilen Mehr Optionen zum Teilen...
Empfohlene Beiträge
Dein Kommentar
Du kannst jetzt schreiben und Dich später registrieren. Wenn Du ein Konto hast, melde Dich jetzt an, um unter Deinem Benutzernamen zu schreiben.