Hallo, es geht um VBA
ich habe das Problem, dass ich in der Userform1 im UserForm_Initialize() eine Datei über "GetOpen" suche und einfüge.
In einen String "VerzName" übergebe ich die Datei mit den Verzeichnissen.
"R:\2021_Projekte\2848 - Schornstein - Montagelinie für das K60\2) M-Konstruktion (Kst.250)\2848 Schornstein\Detail-BG\2848-04000-01-ZSB-Nacharbeitsplatz\2021.10.02-STL.xlsx"
Über "Split" zerlege ich die einzelnen Verzeichnisse bzw Unterverzeichnissse in die Variable "Einzelverzeichnisse"
"Dim EinzelneVerzeichnisse() As String"
Also in die Einzelverzeichnisse(), dann speicher ich diese wie folgt:
Verz0 = EinzelneVerzeichnisse(0)
Verz1 = EinzelneVerzeichnisse(1)
Verz2 = EinzelneVerzeichnisse(2)
Verz3 = EinzelneVerzeichnisse(3)
Verz4 = EinzelneVerzeichnisse(4)
Verz5 = EinzelneVerzeichnisse(5)
Verz6 = EinzelneVerzeichnisse(6)
Verz7 = EinzelneVerzeichnisse(7)
So kann ich auf die Verzeichnisse z.B. Verz6 und Verz7 zugreifen und in eine Liste eintragen bzw weiterverarbeiten
Nun mein Problem:
Da mein Programm Code im "Modul1" steckt, kann ich nicht auf diese Variablen z.B. "VerzName ", "Verz6", oder "Verz7" zugreifen,
die ich aber weiter brauche.
Die Userform ist Private Sub ............
Das Modul ist Public Sub ...............
Ich weiß nicht, was ich machen muss, damit die Variable, sowohl in der Userform als auch in dem Modul, benutzt werden kann.
oder
muss ich den Code vom Modul in die Userform übertragen
Bitte nicht einfach antworten: dann musst Du die als Public Verz6 As String etc. als Variale deklarieren
Ich weiß einfach nicht wie wo usw., da ich fast Anfänger bin, es muss halt auch etwas verständlich sein.
Vielleicht findet sich ja jemand, der mir nicht nur eine Formel hinschreibt, sonder eventuell auch schreibt,
Wenn Public ..... dann unter Option Explicit deklarieren - Frage, wo Userform o. Modul1
alle anderen Deklarationen z.B. Dim VerzName, Verz6, Verz7 löschen, sowohl unter Userform1 als auch unter Modul.
Bitte ......
Kann mir jemand helfen
mfg
uwehinku
|