Clever-Excel-Forum

Clever-Excel-Forum > Office-Anwendungen > Excel > UserFormen automatisch exportieren
Normale Version: UserFormen automatisch exportieren
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.

Anne Haubrich

02.03.2018, 17:28
Hallo,

ich möchte meine UserFormen exportieren und als frm-Datei abspeichern.

Wie ist so etwas automatisiert per VBA möglich?

Steffl

02.03.2018, 18:41
Hallo Anne,

hilft dir das weiter?

Fennek

02.03.2018, 18:42
Hallo,

aus snb-vba.eu

Code:
Sub Userform_export()
With ThisWorkbook.VBProject.VBComponents("invoer")
.export"E:\OF\"&.Name & ".frm"
End With
End Sub


mfg

Helvetier

02.03.2018, 20:09
Hallo Anne
Ich schlage dies vor:
Code:
Sub Userform_als_frm_auslesen()
   With ActiveWorkbook.VBProject
       For n = .VBComponents.Count To 1 Step -1
           With .VBComponents(n)
               If .Type = 3 Then .Export ActiveWorkbook.Path & "\" & .Name & ".frm"
           End With
       Next
   End With
End Sub

Anne Haubrich

03.03.2018, 14:04
Danke euch allen. Ihr habt es mal wieder geschafft!!

Helvetier

03.03.2018, 15:20
(03.03.2018, 14:04)Anne Haubrich schrieb: [ -> ]Ihr habt es mal wieder geschafft!!

Wie immer .... seit 1940.
Clever-Excel-Forum > Office-Anwendungen > Excel > UserFormen automatisch exportieren