HERBERS Excel-Forum - die Beispiele

Thema: Arbeitsblatt mit Standardmodul in neue Arbeitsmappe kopieren

Home

Gruppe

VBE

Problem

Dieses Blatt wird in eine neue Arbeitsmappe kopiert, wobei auch Modul1 in die neue Arbeitsmappe übernommen wird.

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: Modul1

Sub MeinMakro()
   MsgBox "Ich sollte kopiert werden!"
End Sub
StandardModule: Modul2

Sub Meldung()
   MsgBox "Ich bin nur ein Platzhalter!"
End Sub
StandardModule: basMain

Sub CopyWkbVBA()
   Dim sPath As String
   sPath = Application.DefaultFilePath & "\temp.bas"
   ActiveSheet.Copy
   With ActiveSheet.Buttons(1)
      .OnAction = ActiveWorkbook.Name & "!MeinMakro"
      .Caption = "Meldung"
   End With
   Range("E8").Value = "Dieses Blatt wurde in eine neue Arbeitsmappe"
   Range("E10").Value = "Arbeitsmappe übernommen wurde."
   ThisWorkbook.VBProject.VBComponents("Modul1").Export sPath
   ActiveWorkbook.VBProject.VBComponents.Import sPath
   Kill sPath
End Sub

Beiträge aus dem Excel-Forum zu den Themen VBE und Prozedur

Ereignisprozedur suche Taschenrechner in VBE
Ereignisprozedur f. Multipage-Reiter Prozedur in neues Blatt/Tabelle einfügen
Makros zulassen mit VBA Prozedur Beschriftungstext einer Schaltfläche an Prozedur
Text aus Zelle als Bedingung in Prozedur Zeitgesteuerte Prozedur funktioniert nicht...
Prozedur zu groß Fehler bei Abhandlung der Prozedur
Eine große Prozedur in zwei teilen aber wie? VBA - Prozedur
Prozedur verkürzen oder teilen? VBA bringt Prozedur-Fehler
VBE Optionen setzen Name der laufenden Prozedur
Prozeduren vor dem Speichern aus Tabelle löschen Prozedurnamen auslesen
Prozedurname aus Variable Erweiterung der VBE
Prozedur fuer mehrere Arbeitsblaetter wiederholen Simple Prozedur - Wo ist der Fehler?
vbeplus Variablen in anderer Prozedur aufrufen
Prozedur bei Worksheet_Activate tut nicht Worksheet_Activate() Prozedur
Teil einer rekursiven Prozedur auslagern Ereignisprozeduren automatisiert VBE
Automatisierungsfehler Codename VBE Verwendung Addin vbeplusde
lange Bearbeitungszeit einer Prozedur Prozedur macht was sie will...
Fehler beim Kompilieren - Außerhalb Prozedur.... prozedur aufrufen
Frage Archivbeitrag - Schreibschutz Benutzerrechte Prozedur in prozedur
Prozedur bei Klick auf Grafik auslösen Fehler in Codeprozedur
Prozedur zu lang Außerhalb einer Prozedur ungültig
Prozedur bei Wechsel Hintergrundfarbe ausführen Bei erster Makroausführung öffnet sich VBE im Debu
VBE-Kontextmenü "Definition" Prozedur dauert zu lange
Objekt an Prozedur übergeben Prozedur automatisch ausführen
2 Prozeduren ausführen Listbox breite einstellen in einer prozedur
aktuellen Prozedurnamen für Fehler-Log automatisch