Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
aktives Tabellenblatt in einer Schleife
Search
Hallo,
wie kann ich nachfolgenden Code so abändern, dass über "rng" das aktive Tabellenblatt angesprochen bzw. als Ausgangspkt. der Schleife deklariert wird...?
For rng = 1 To ActiveWorkbook.Sheets.Count Step 1
Sheets(rng).Activate
Cells(Range("A65536").End(xlUp).Offset(1, 0).Row, 1) = Userform1.TextBox3.Text
Next rng
End If
also quasi: (was natürlich nicht funktioniert)
For rng = ActiveSheet To ActiveWorkbook.Sheets.Count Step 1
Sheets(rng).Activate
Cells(Range("A65536").End(xlUp).Offset(1, 0).Row, 1) = Userform1.TextBox3.Text
Next rng
End If
lieben Dank

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: aktives Tabellenblatt in einer Schleife
01.09.2010 10:54:03
JogyB
Hallo Search,
    For rng = ActiveSheet.Index To ActiveWorkbook.Sheets.Count
Sheets(rng).Cells(Rows.Count, 1).End(xlUp).Offset(1, 0) = Userform1.TextBox3.Text
Next
Habe noch unnötigen Code entfernt.
Gruß, Jogy
AW: aktives Tabellenblatt in einer Schleife
01.09.2010 11:04:35
Search
oh mann "index" hinten dran, so einfach kann´s gehen - lieben dank - jetzt funktioniert es - danke
Anzeige

305 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige