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

VBA Problem

VBA Problem
28.05.2003 14:06:12
David
Hallo

Für Ihre Bemühungen danke ich Ihnen im Vorhinein.

Also, dies ist mein Problem`le.

Ich lese in die Variable Dateiname (typ variant)
die Dateinamen ein, welche später weiterverarbeitet
werden. Dies funktioniert tadellos:
Dateiname = Application.GetOpenFilename(FileFilter:="Alle Dateien (*.*), *.*", _
Title:="BRBL. auswählen", MultiSelect:=True)
Diese Dateinamen müssen in einem ersten Schritt
numerisch geordnet werden (funktion BRBLordner_sortieren). Hierzu muß die
Reihenfolge
umgeändert werden (falls notwendig).

vorher
xxxxB2003
xxxxB2000
xxxxB2001
xxxxB2002

nachher
xxxxB2000
xxxxB2001
xxxxB2002
xxxxB2003

(es kann auch z.b. 2002 von vorne herein ganz fehlen)

In diesem Zusammenhang fiel auf, dass zwar auf ein "ARRAYelement" einer
Variable von typ variant zugegriffen werden kann
(Bsp. testtest=Dateiname(1) "bedeutet "R:\Team
Verbrennung\Sonstiges\MD_Platform\VD\VD 4 PLD
EPA´07\Arbeit_test_einlesen\Bericht\Brbl\B2003." : Variant/String :
BrBl.BrBlOrdner_sortieren"),

wie kann ich allerdings etwas einer variant Variablen zuordnen?
versuch(2)=Dateiname(1)? Dies funktioniert leider nicht.

Haben Sie eine Idee?

Herzlichen Dank für Ihre Hilfe und freundliche Grüße
David

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

Betreff
Datum
Anwender
Anzeige
Dim versuch(4) As Variant
28.05.2003 14:35:10
RAnton

Also bei mir funktionierts


Sub aaa()
Dim versuch(4) As Variant
Dim dateiname(2) As Variant

dateiname(1) = "ABCD.xls"
versuch(3) = dateiname(1)
Debug.Print versuch(3)

End Sub

Gruß

RAnton

Re: Dim versuch(4) As Variant
28.05.2003 14:43:05
David

Hi,
kann es sein das es zu lange dateinamen sind???
das es deswegen nicht geht?
Gruß David

max. 255 Zeichen für Text
28.05.2003 15:07:35
RAnton

-

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige