Mappe kopieren und Module und Formulare mitkopiere
sabbelschlaeppchen
ich kopiere meine Mappe mit 2 Tabellen über folgenden Code:
Private Sub CommandButton34_Click()
Dim wks As Worksheet
Sheets(Array(1, 2)).Copy
For Each wks In ActiveWorkbook.Worksheets
wks.UsedRange.Value = wks.UsedRange.Value
Next
End Sub
Wie kopiert man die Formulare (UserForm) und Module mit? Weil ein Button, der eine UserForm aufruft funktioniert in der Kopie nicht, soll aber.
Danke für eure kompetente Hilfe!
Gruß, sabbelschlaeppchen
Anzeige