Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
816to820
816to820
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Blatt in andere Mappe kopieren ohne Makros

Forumthread: Blatt in andere Mappe kopieren ohne Makros

Blatt in andere Mappe kopieren ohne Makros
12.11.2006 04:48:04
WHN
Hallo Leute,
ich kopiere ein Tabellenblatt in eine andere Mappe, das läuft ohne Probleme.
Allerdings werden dann auch meine Schaltflächen und der VBA-Code mitkopiert.
Gibt es eine Möglichkeit das Baltt ohne Schaltflächen und VBA-Code zu kopieren?
Würde mich über euere Hilfe sehr freuen.
Freundliche Grüße
Werner
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blatt in andere Mappe kopieren ohne Makros
12.11.2006 10:56:58
Erich
Hallo Werner,
probiers mal mit 
Option Explicit
Public Sub Blattkopie_noShapesMakros()
Dim wbkZiel As Workbook, wbkTemp As Workbook, objShape As Shape, objKomp As Object
Set wbkZiel = Workbooks("Ziel.xls")    ' muss geöffnet sein
ActiveSheet.Copy                       ' Blatt in neue (temp.) Mappe kopieren
Set wbkTemp = ActiveWorkbook
' dort alle Shapes löschen
For Each objShape In ActiveSheet.Shapes
objShape.Delete
Next objShape
' und alle Makros löschen
' Code von Nepumuk
' phorum.excelhost.de/read.php?11,105681,105685#msg-105685
With ActiveWorkbook.VBProject
For Each objKomp In .VBComponents
Select Case objKomp.Type
Case 1, 2, 3            ' Module, Klasssenmodule, Userforms
.VBComponents.Remove .VBComponents(objKomp.Name)
Case 100                ' Klasssenmodule von Workbook, Sheets
With objKomp.CodeModule
.DeleteLines 1, .CountOfLines
End With
End Select
Next
End With
' Blatt in Zielmappe kopieren
Worksheets(1).Copy after:=wbkZiel.Sheets(wbkZiel.Sheets.Count)
wbkTemp.Close False                    ' temp. Mappe schließen ohne Speicherung
End Sub
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
Anzeige
AW: Danke
12.11.2006 18:01:01
WHN
Hallo Erich,
vielen Dank für deine Hilfe.
Die Löschung der Schaltflächen im Nachhinein ist die Lösung, so werde ich die Schaltflächen los.
Freundliche Grüße
Werner

Forumthreads zu verwandten 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
Fehler beim Kopieren von Tabelle in neue Datei
Tabelle

Guten Abend
Aus einer Datei möchte ich gerne eine Tabelle via "Verschieben oder kopieren" in eine neue Arbeitsmappe verschieben (mittels Aktivieren des Kästchens "Kopie erstellen").
Das ist in der Regel auch kein Problem. Doch heute scheitere ich bei einer bestimmten Datei daran, da bei...
28.08.2008 17:48:35
Thread-ID: 1005548
3 Beiträge
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
Anzeige
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
Arbeitsblatt kopieren ohne Quellcode
Oliver

Hallo zusammen,
ich habe gerade in mühsamer Arbeit folgenden Code zum Ablegen von Sheets in Workbooks zusammengeschustert:
Dim strDatei As String
strDatei = "Ablage.xls"
Set wksMappeZ = Workbooks.Open(strDatei)
Set wksMappeQ = ThisWorkbook
wksMappeQ.Sheets("Kalkulation")...
24.02.2009 14:58:21
Thread-ID: 1053533
4 Beiträge
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
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
Formelbezug ändert sich bei kopieren von Zellen
Zellen

Hallo zusammen,
ich habe ein Tabellenblatt erstellt, in dem durch mehrere Nutzer Datensätze in Zeilen eingegeben werden. Gleichzeitig sind in die Zeilen schon Formeln eingetragen und per Blattschutz gegen versehentliche Änderungen des Users geschützt.
Wird nun eine Zelle kopiert, ändern...
27.10.2009 22:25:08
Thread-ID: 1112615
4 Beiträge
Fehlermeldung bei Tabellenkopieren mit Makro
herbi

Hallo
ich habe ein Makro welches mir den Inhalt aller Tabellenblätter einer Datei der Reihe nach in ein extra Tabellenblatt "work" kopiert. Dabei wird der Inhalt von Tabellenblatt X ab A1 in das Tabellenblatt work ab Position B1 eingefügt. In Spalte A kommt vor jede Zeile der Name des Tabe...
26.01.2010 16:36:55
Thread-ID: 1133071
2 Beiträge
Anzeige
Tabellenblatt kopieren ohne Ref zu Originaltab
steffen.f

Hallo zusammen,
ich war schon glücklich, dass ich es geschafft habe, mit folgendem Code aus einer Vorlage ein Tabellenblatt in ein Workbook zu kopieren, in dem gerade gearbeitet wird.
Windows(arbeit).Activate
Sheets(Sheets.Count).Activate
s = Sheets.Count
ActiveSheet.Rows(2...
09.02.2010 11:34:24
Thread-ID: 1136926
3 Beiträge
Tabellen vergleichen, kopieren best. Zellinhalte
Markus

Hallo, liebe Excel-Spezialisten !
Ich habe diesen Beitrag bereits gestern in´s Forum gestellt - leider habe ich keine einzige Antwort erhalten (war wahrscheinlich schon zu spät); deshalb versuch ich´s nochmal:
Ich bin auf der Suche nach einem Makro das folgendes machen sollte:
Ich h...
23.04.2010 14:29:16
Thread-ID: 1153350
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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