Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
596to600
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
596to600
596to600
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Array mit Werten füllen

Array mit Werten füllen
08.04.2005 13:06:27
Christoph
Hi Leute,
ich möchte einen Array F1 mit Werten aus dem Bereich X6 - X25 im Arbeitsblatt Arbeitszeiten füllen und die Werte über eine MsgBox ausgeben.
Habt ihr ne Idee?
Gruß
Christoph

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

Betreff
Datum
Anwender
Anzeige
AW: Array mit Werten füllen
08.04.2005 13:28:24
Boris
Hi Christoph,
z.B. so:
Option Explicit

Sub array_fuellen_und_ausgeben()
Dim F1 As Variant
Dim str As String
Dim i As Integer
F1 = [x6:x25]
For i = LBound(F1) To UBound(F1)
str = str & Application.Index(F1, i, 1) & Chr(10)
Next i
MsgBox str, , "Ausgabe..."
End Sub

Grüße Boris
AW: Array mit Werten füllen
08.04.2005 13:41:15
Christoph
Supi dank dir.
Kann ich die Schaltfläche auch auf ein anderes Tabellenblatt legen oder muß ich dazu den Code noch ändern?
Einfahc den Blattnamen mit angeben...
08.04.2005 15:09:17
Boris
Hi Christoph,
Option Explicit

Sub array_fuellen_und_ausgeben()
Dim F1 As Variant
Dim str As String
Dim i As Integer
F1 = [Tabelle1!x6:x25]
For i = LBound(F1) To UBound(F1)
str = str & Application.Index(F1, i, 1) & Chr(10)
Next i
MsgBox str, , "Ausgabe..."
End Sub

Grüße Boris
Anzeige

112 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige