Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
772to776
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
772to776
772to776
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Cell Befehl!

Cell Befehl!
22.06.2006 12:32:14
PeterN
Hallo zusammen,
ich würde gerne die Namen von Sheets auslesen und in eine Spalte untereinander schrieben. folgende FOR schleife habe ich shcon geschrieben. Leider bekomme ich bei dem folgenden Befehl (Sheets(1).Cell(2, j) = z) eine fehlermeldung!
Weiss jemand Abhilfe?
Vielen Dank Peter
For i = 2 To x
z = Sheets(i).Name
j = i + 1
Sheets(1).Cell(2, j) = z
Next i

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
  • s
    22.06.2006 12:35:54
    {Boris}
  • 22.06.2006 12:38:21
    PeterN
  • 22.06.2006 12:39:49
    Christoph
Anzeige
s
22.06.2006 12:35:54
{Boris}
Hi Peter,
die Mehrzahl macht´s ;-)
Grüße Boris
AW: s
22.06.2006 12:38:21
PeterN
Argh dummer fehler! Trotzdem vielen DAnk!!
Cells ....mit s
22.06.2006 12:39:49
Christoph
Hallo Peter,
so zB:

Sub Namen()
Dim i As Integer
For i = 2 To Sheets.Count
Sheets(1).Cells(2, i + 1) = Sheets(i).Name
Next
End Sub
Gruß
Christoph

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige