Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

VBA-Modul per VBA exportieren / Fehlermeldung

Forumthread: VBA-Modul per VBA exportieren / Fehlermeldung

VBA-Modul per VBA exportieren / Fehlermeldung
20.01.2026 08:00:04
StefanK
Einen schönen guten Morgen zusammen,
leider hänge ich wieder einmal fest und möchte euch gerne um Unterstützung bitten.
Mit folgendem Code (den ich im Web aufgeschnappt habe) versuche ich per VBA ein Modul zu exportieren. Das ist erforderlich, da beim Kopieren eines Blattes auch andere Module erforderlich sind, die durch den Kopiervorgang nicht übertragen werden.



...
Dim Exportpfad As String
Dim AuswModul As String
Dim ExpDatei As String

Exportpfad = Environ("userprofile") & "\Desktop\ExportedVBA\"
AuswModul = "Modul1"
ExpDatei = AuswModul & ".bas"

ThisWorkbook.VBProject.VBComponents(Modul).Export Filename:=Exportpfad & ExpDatei
...


Leider erhalte ich die Fehlermeldung:
Userbild

Was läuft hier falsch ? Oder ist der Code evtl. nur für VB (weil ja "VBProject") ?

Danke, viele Grüße und euch einen guten Start in den Tag
Stefan
Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA-Modul per VBA exportieren / Fehlermeldung
20.01.2026 08:08:27
Ulf
Hi,
hast einen falschen Namen

Dim Exportpfad As String
Dim AuswModul As String
Dim ExpDatei As String

Exportpfad = Environ("userprofile") & "\Desktop\ExportedVBA\"
AuswModul = "Modul1"
ExpDatei = AuswModul & ".bas"

ThisWorkbook.VBProject.VBComponents(AuswModul).Export Filename:=Exportpfad & ExpDatei

hth
Ulf
Anzeige
AW: VBA-Modul per VBA exportieren / Fehlermeldung
20.01.2026 09:50:19
Daniel
Hi
Falls sich der Fehler nicht finden lässt, probiere mal folgenden Weg:

Speichere die vollständige Datei mit SaveCopyAs unter einem anderen Namen.
Öffne dann diese Datei und lösche alles raus, was nicht benötigt wird.

Gruß Daniel
AW: VBA-Modul per VBA exportieren / Fehlermeldung
20.01.2026 13:49:41
snb
Was passiert denn ohne Variablen ?


Sub M_snb()

ThisWorkbook.VBProject.VBComponents("Modul1").Export "modul1.bas"
End Sub
Anzeige
AW: VBA-Modul per VBA exportieren / Fehlermeldung
20.01.2026 09:59:58
StefanK
Hi Daniel, danke für Deine Rückmeldung.

Ich erstelle mir gerade eine Steuerungs- und Übersichtsdatei für die Projektarbeit. In dieser sind 2 Vorlagen enthalten, die ich sowohl innerhalb der Datei kopieren möchte als auch als externe Datei verfügbar machen möchte. Beim externen Kopieren bleiben eben die Module die ich in der neuen Datei benötige zurück und ich möchte sie über den Umweg Export / Import in die neue Datei übertragen. Ich weiß leider keinen anderen Weg dafür...

Falls Du noch einen Tipp hast, immer her damit 😉

VG Stefan

Anzeige
AW: VBA-Modul per VBA exportieren / Fehlermeldung
20.01.2026 10:45:24
Daniel
Wie ich schon schrieb, Datei erst vollständig kopieren und dann in der neuen Datei das löschen, was nicht benötigt wird.
Das wäre mein Tip.
AW: VBA-Modul per VBA exportieren / Fehlermeldung
20.01.2026 11:41:56
StefanK
Hi Daniel, ich konnte Dir in Deiner ersten Mail gedanklich wohl nicht folgen, jetzt hab ich's kapiert 😄
Ja, das ist sicher weniger Aufwand, das rauszulöschen was nicht nötig ist.

Aber worauf die Fehlermeldung beruht, ist echt fraglich. Ist denn "ThisWorkbook.VBProject.VBComponents(Modul).Export" VBA-Code ?

VG Stefan
Anzeige
AW: VBA-Modul per VBA exportieren / Fehlermeldung
20.01.2026 12:12:04
volti
Hallo Stefan,

der Code ist für VBA und funktioniert auch

  • Wenn das Modul vorhanden ist
  • Der Pfad vorhanden ist
  • Die richtige Variablenbezeichnung verwendet wird
  • und der Zugriff auf das VBA-Projektmodell freigeschaltet wurde

Du solltest auch Option Explicit verwenden, dann wäre die falsche Variablenverwendung nicht aufgetreten.
Option Explicit


Sub Test()
Dim Exportpfad As String
Dim AuswModul As String
Dim ExpDatei As String

Exportpfad = Environ("userprofile") & "\Desktop\ExportedVBA\"
AuswModul = "Modul1"
ExpDatei = AuswModul & ".bas"

ThisWorkbook.VBProject.VBComponents(AuswModul).Export Filename:=Exportpfad & ExpDatei
End Sub


PS: Den Fehler 1004 konnte ich nicht nachstellen, bei Nichtfreischaltung VBA-Projekt, falschem Modul usw. erhalte ich immer andere Fehlermeldungen.

Gruß
Karl-Heinz
Anzeige
AW: VBA-Modul per VBA exportieren / Fehlermeldung
20.01.2026 09:22:19
StefanK
Moin Ulf, Danke und Du hast Recht. Aber ich hatte "Modul" zu "AusModul" geändert, nicht aber in der ThisWorkbook-Zeile.
Die Fehlermeldung bleibt aber leider...

VG Stefan
AW: VBA-Modul per VBA exportieren / Fehlermeldung
20.01.2026 11:10:58
Ulf
Hi,
Aus ist noch immer nicht Ausw, but
Trustworthy

https://freeimage.host/i/fgL7DMJ
hth
Ulf
Anzeige
AW: VBA-Modul per VBA exportieren / Fehlermeldung
20.01.2026 12:08:21
StefanK
Sorry Ulf, das war ein Schreibfehler, die Fehlermeldung bleibt weiterhin bestehen...
Weißt Du, ob "ThisWorkbook.VBProject.VBComponents(Modul).Export" VBA-Code ist ?

Ulf hatte die Idee, die ganze Datei zu kopieren und das rauszulöschen, was nicht benötigt wird.
Das ist wahrscheinlich die einfachste Möglichkeit...

Danke Dir, viele Grüße
Stefan
Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige