Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 14:14:51
Summewenn letzter Eintrag
18.04.2024 12:28:32
Formelfehler aufgrund Einfügen einer Zeile
18.04.2024 11:51:04
Aus Listbox Spalte als Wert zurück bekommen
18.04.2024 11:36:51
Beim Öffnen je nach Datum zu bestimmter Zelle springen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
596to600
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
596to600
596to600
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenblatt kopieren ohne Makro

Tabellenblatt kopieren ohne Makro
13.04.2005 09:05:20
Benny
Hey Leute,
ich möchte ein Tabellenblatt aus einer Mappe in eine neue Mappe kopieren, ohne das die dort integrierten Programmierzeilen (z.B. Worksheet_Change) des Tabellenblattes mit übernommen werden, weil sonst die integrierten Verknüpfungen Fehlermeldungen verursachen.
Würde mich über eine unkomplizierte Lösung sehr freuen.
Gruß
Benny

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblatt kopieren ohne Makro
13.04.2005 09:24:54
roland_k
hi benny
ich wuerde das mit ner vorlage machen ....diese ohne den code
dann per makro kopieren und umbenennen
ist nur ein gedankengang warte mal ab was die profis hier zeigen
drum habe frage als noch offen deklariert
ist aber moeglich dass mein vorschlag gar nicht gut ist :-.(
gruesse
roland_k
AW: Tabellenblatt kopieren ohne Makro
13.04.2005 09:27:29
Rolf
Hallo Benny,
damit kannst du Code in Klassenmodulen löschen
fG
Rolf

Sub code_in_klassenmodulen_löschen()
Dim vb As Object
Dim m As Object
Dim n As Integer, i As Integer
Dim rc As Variant
Set vb = ActiveWorkbook.VBProject.VBComponents
For Each m In vb
If m.Type = 100 Then
n = m.CodeModule.CountOfLines
If n > 0 Then
rc = MsgBox("Soll der Code im Klassenmodul von   " _
& m.Name & "   wirklich gelöscht werden?", 4)
If rc <> 7 Then
For i = n To 1 Step -1
m.CodeModule.DeleteLines i
Next
End If
End If
End If
Next
End Sub

Anzeige
AW: Tabellenblatt kopieren ohne Makro
14.04.2005 12:14:22
Benny
Hallo Rolf,
leider kann ich mir nicht vorstellen wie ich mit deiner Sub umgehen soll. Wo müsste ich Sie einbinden damit sie auf den u.a. Pfad verzweigt?
Die Programmierzeilen die ich meine stehen unter "Microsoft Excel Objekte" und dort in "Tabelle (Beschaffungsanlage)" also nicht unter Klassenmodule.
Vielen Dank für deine Mühe
Gruß
Benny
AW: Tabellenblatt kopieren ohne Makro
14.04.2005 13:11:52
Rolf
Hallo Benny,
du legst ein neues Modul in einer beliebigen
Arbeitsmappe an + kopierst den Code hinein.
Dann aktivierst du eine TESTMAPPE die den
Ereigniscode deines Tabellenblatts enthält.
Dann startest du das Makro "code_in_klassenmodulen_löschen"
und schaust dir an, was passiert.
fG
Rolf
Anzeige
AW: Tabellenblatt kopieren ohne Makro
14.04.2005 14:16:25
Benny
Hallo Rolf,
echt super dein Makro funktioniert auch ohne Probleme.
Dennoch eine kurze Frage.
Ich kopiere das "Tabellenblatt (Beschaffungsanlage)" in eine separate Mappe (Datei), nachdem das Tabellenblatt dort angekommen ist sollte der Ereigniscode dort gelöscht werden. Das heißt das ich das Makro "code_in_klassenmodulen_löschen" mit kopieren muss um es in der Zieldatei vor dem späteren Save und Close ausführen lasse.
Würdest du mir bitte noch einmal kurz erläutern wie das geht?
Gruß
Benny
AW: Tabellenblatt kopieren ohne Makro
14.04.2005 14:42:05
Rolf
Hallo Benny,
in welcher Mappe der Löschcode steht, ist unmassgeblich.
Entscheidend ist, dass die Mappe mit dem zu löschenden Code aktiviert ist.
fG
Rolf
Anzeige
AW: Tabellenblatt kopieren ohne Makro
14.04.2005 14:57:39
Benny
Hallo Rolf,
sorry aber wahrscheinlich habe ich mich falsch ausgedrückt.
Wie kopiere ich das Makro "code_in_klassenmodulen_löschen" von der eigentlichen Datei in die Zielatei (die ja erst noch durch das Makro erstellt wird), um es dort nachdem die Zieldatei erstellt wurde, ausführen zu lassen.
Des weiteren wie kann ich ein Makro über einen Makrobefehl ausführen lassen?
Gruß
Benny
Makro kopieren
14.04.2005 15:34:26
Rolf
Hallo Benny,
so einfach kopieren iss nich.
Du musst das Modul exportieren und in die Zieldatei importieren.
Hier mal ein Beispiel zum grundsätzlichen Vorgehen.
Ein Makro startest du mir dem Run-Befehl (s.ganz unten).
fG
Rolf
'Modul exportieren

Sub modul_exportieren()
Dim mdl As Object
Dim wbName As String, mdlName As String
wbName = ThisWorkbook.Path & "\Quellmappe.xls"
mdlName = "Test_modul"
Workbooks.Open wbName
Set mdl = ActiveWorkbook.VBProject.VBComponents(mdlName)
mdl.Export ThisWorkbook.Path & "\" & mdlName & ".bas"
ActiveWorkbook.Close savechanges:=false
End Sub

'Modul importieren

Sub ImportModule()
Dim mdl As Object
Dim wbName As String, mdlName As String
wbName = ThisWorkbook.Path & "\Zielmappe.xls"
mdlName = "Test_modul"
Workbooks.Open wbName
ActiveWorkbook.VBProject.VBComponents.Import _
ThisWorkbook.Path & "\" & mdlName & ".bas"
ActiveWorkbook.Close savechanges:=True
End Sub



Sub makro_starten()
Application.Run "code_in_klassenmodulen_löschen"
End Sub

Anzeige
AW: Makro kopieren
14.04.2005 15:37:28
Benny
Hallo Rolf,
noch einmal vielen Dank für deine Mühe. Leider ist es mir heute und morgen nicht mehr möglich es auszuprobieren. Ich werde frühestens am Montag Mittag dazu kommen. Selbstverständlich halte ich dich auf dem laufenden.
Schönes Wochenende
Gruß
Benny

308 Forumthreads zu ähnlichen Themen

Zeilen Kopieren mit Formeln u. Formaten
Lemmi

Hallo zusammen,
ich möchte einen Block (5Zeilen) am Ende einer Tabelle einfügen!
Diese Zeilen sollen mit ihren Formaten unf Formel Kopiert und am Ende der Leiste eingefügt werden!
Die Formeln sind in den Roten Zellen.
Die Zellen sonst sind bis auf Spalte A und B ohne Inhalt!
11.08.2008 14:11:35
Thread-ID: 1000856
5 Beiträge
Anzeige
1:1-Kopieren ohne dass Formeln "angepasst" werden
Wolfango

Hallo Experten!
Eine Spalte enthält lauter Formeln (alles relative Bezüge). Wenn ich diese komplette Spalte (markiert über Klick auf Spaltenkopf) in eine neue, unbenutzte Spalte kopiere werden (aufgrund der relativen Bezüge) ja stets alle Formeln automatisch angepasst (egal ob über das Menü...
17.09.2008 15:45:18
Thread-ID: 1010435
3 Beiträge
Diagramm mit VBA ohne Bezüge kopieren
Dagmar

Hallo VBA-Experten,
ich kopiere per VBA den Inhalt eines Vorlagenblattes (nicht das Blatt selber, das geht nicht, weil die Copy-Methode nur begrenzt durchführbar ist) und dort ist auch ein Diagramm enthalten. Dummerweise bleiben beim Kopieren die festen Bezüge erhalten und verweisen so auf...
10.12.2008 07:43:00
Thread-ID: 1031557
4 Beiträge
Anzeige
Daten per Makro kopieren ohne Formeln
Kai

Hi,
ich möchte Zeilen innerhalb einer Mappe von einem Tabellenblatt ins ander kopieren. Meine Daten stehen in der Tabellen "IMPORT" (Zeilen 10:100) und sollen nach "DATENBESTAND" ab Zeile 50 reinkopiert werden.
Das kopieren alleine wäre sicher nicht das Problem, aber in meinem Tabellenb...
05.03.2009 13:05:31
Thread-ID: 1056794
3 Beiträge
Tabellenblatt Kopieren, mit anderem Name speichern
Mandy

Hi,
Hoffe mal wieder auf Eure Hilfe: Wie kann ich denn per Makro in meiner XLS das Sheet "Ablage" kopieren und im gleichen sheet unter dem Name "Data" wieder einfügen ?
Danke
mandy
24.03.2009 14:35:27
Thread-ID: 1063343
3 Beiträge
Blatt Kopieren ohne Shapes
ptonka

Hallo zusammen,
ich kopiere den Inhalt eines gesamten Blattes (Tabelle1) auf ein 2. Blatt (Tabelle2) um die Daten dort weiter zu verarbeiten. Nun habe ich auf Tabelle1 mehrere Schaltflächen, um Makros zu starten.
Diese werden beim kopieren (per VBA) auch mit auf das 2. Blatt kopiert.
22.07.2009 10:53:00
Thread-ID: 1090452
16 Beiträge
Tabellenblatt kopieren ohne Zellbezüge (VBA)
S.

Liebe Herber Excel-Gemeinde,
ich kopiere ein Tabellenblatt aus einem bestehenden Excel-Dokument in ein neues Dokument mit VBA. Dazu kopiere ich einfach das ganze Sheet, da es auch Diagramme enthält. Allerdings kopiert er bei dieser Methode auch die Zellbezüge zur Originaldatei mit. Dies möc...
11.08.2009 11:38:01
Thread-ID: 1094961
4 Beiträge
VBA - Formeln kopieren mit Bezug auf andere Sheets
Fabian

Hallo Zusammen,
ich habe folgende Problemstellung:
Eine Exceldatei *xlsx mit insgesamt 4 Tabellenblättern.
Tabellenblatt 1 - Material Data - Dateneingabe ab Zeile 2.
Tabellenblatt 2 - ABCXYZ - nicht relevant für das Problem
Tabellenblatt 3 - Life Time Cycle - Berechnung, di...
16.09.2009 09:14:54
Thread-ID: 1103102
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
2
2
3
3
2
2
15
3
4
3
4
1
5
2
5
2
2
1
6
7
1
6
1
2