Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
23.04.2024 21:33:46
Nur farbige/nicht farbige Zellen markieren
23.04.2024 21:29:56
Bestimmte Zellen auf andere Arbeitsblätter kopieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
812to816
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
812to816
812to816
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenballt mittles VBA kopieren

Tabellenballt mittles VBA kopieren
26.10.2006 09:53:09
Caro
Guten morgen zusammen,
ich habe folgendes Problem:
Ich habe eine Arbeitsmappe mit drei Tabellenblättern und ein Button. Wenn ich diesen Button anklicke, möchte ich nun das erste Tabellenblatt mittles VBA kopieren in eine ganz neue Excel Arbeitsmappe, die sich automatisch öffnen soll.
Danke
Caro

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellenballt mittles VBA kopieren
26.10.2006 10:14:00
marcl
Hallo Caro,
besteht die Mappe schon, oder soll eine neue angelegtwerden? Soll diese dann an einem bestimmten Ort gespeichert werden?
Gruß
marcl
AW: Tabellenballt mittles VBA kopieren
26.10.2006 10:33:06
Caro
Hallo,
die Arbeitsmappe, in die hineinkopiert werden soll, besteht noch nicht.
Die soll vorerst noch nciht gespeichert werden, sondern geöffnet bleiben.
Danke
Caro
AW: Tabellenballt mittles VBA kopieren
26.10.2006 10:18:59
Dan
Hi, hier ein Beispiel. Gruss Dan, cz
Option Explicit

Private Sub CommandButton1_Click()
Dim sh As Worksheet
Dim wb As Workbook
On Error Resume Next
Set sh = Worksheets(1)
If (sh Is Nothing) Then Exit Sub
On Error GoTo 0
Set wb = Workbooks.Add
sh.Copy Before:=wb.Worksheets(1)
End Sub

Anzeige
AW: Tabellenballt mittles VBA kopieren@Dan
26.10.2006 13:14:01
Rudi
Hallo Dan,
das ist Quatsch.
1. Blatt1 muss es geben, da die Mappe sonst keine Blätter hätte und das geht nicht.
2. Wenn man ein Blatt einfach ohne Angabe einer Zielmappe kopiert, wird automatisch eine neue Mappe angelegt. Workbooks.Add ist somit überflüssig.
Gruß
Rudi
AW: Tabellenballt mittles VBA kopieren@Dan
26.10.2006 13:22:39
Dan
Hi Rudi, ja Du hast Recht. Das was ich geschrieben habe ist zu kompliziert :-). Aber in dem ersten Punkt hast Du nicht so ganz Recht. Versuch das Fenster unsichtbar zu machen und dann lass Dein Code laufen. Du solltest einen Fehler kriegen. Gruss Dan, cz.
AW: Tabellenballt mittles VBA kopieren
26.10.2006 13:11:13
Rudi
Hallo,

Private Sub CommandButton1_Click()
Sheets(1).Copy
End Sub

Gruß
Rudi
Anzeige
AW: Tabellenballt mittles VBA kopieren
26.10.2006 13:23:40
Caro
hallo
danke, das funktioniert einwandfrei... aber ein Problem habe ich noch: in der Zielmappe darf die vba-Programmierung NICHT mit übergeben werden.
AW: Tabellenballt mittles VBA kopieren
26.10.2006 16:28:29
Rudi
Hallo,
und der Button auch noch weg?

Private Sub CommandButton1_Click()
Sheets(1).Copy
With ActiveSheet
.OLEObjects.Delete
With .Parent.VBProject.VBComponents(ActiveSheet.CodeName).CodeModule
.DeleteLines 1, .CountOfLines
End With
End With
End Sub

Gruß
Rudi
AW: Tabellenballt mittles VBA kopieren
26.10.2006 18:35:29
Caro
hallo,
also das mit dem Button war ein Beispiel. Die Kopierfunktion wird mittles eines Buttons in einem Formular aufgerufen.
Es darf nur in der Zielarbeitsmappe keine Programmierung mehr vorhanden sein.
Anzeige
AW: Tabellenballt mittles VBA kopieren
26.10.2006 18:45:59
Caro
Hallo nochmal,
bei deiner Funktion wird mir ein Fehler ausgegeben und zwar an diesem Punkt:
With .Parent.VBProject.VBComponents(ActiveSheet.CodeName).CodeModule
AW: Tabellenballt mittles VBA kopieren
26.10.2006 23:10:46
Herbert
Hi,
du kannst kein gesamtes Blatt kopieren und in éine andere Tabelle kopieren,
nur den relevanten Zellbereich.
mfg Herbert
AW: Tabellenballt mittles VBA kopieren
27.10.2006 13:44:43
Caro
Hallo,
gut, dann nur den Zellbereich, aber wie? und es darf NICHT die VBA-Programmierung mit übergeben werden.
danke.

303 Forumthreads zu ähnlichen Themen

ans Tabellenende mit Leerzeilen kopieren
Robert-M

Grüß´ Euch im Forum,
in einer Tabelle „MASTER“ will ich die Daten anderer Arbeitsmappen „DETAIL 1, -2, -3“ untereinander auflisten.
Der Vorgang ist simpel:
per Makro
kopiere ich nacheinander jeweils den Inhalt von „DETAIL 1 ...“,
gehe in die Tabelle MASTER,
suche hier di...
08.09.2008 21:49:00
Thread-ID: 1008257
10 Beiträge
Anzeige
Zelle in andere Tabelle mit Button kopieren
Benny

Hallo Zusammen!
Kann mir jemand weiterhelfen? Wie kann ich die unten stehende Formel entsprechend anpassen?
Private Sub CommandButton2_Click() Dim wks As Worksheet Set wks = Worksheets("Änderungsanträge") wks.Range("C3") = wks.Range("D3") End Sub
Danke im Voraus!
Benny
07.10.2008 10:06:48
Thread-ID: 1014629
4 Beiträge
Tabelle mit eingebetteten Makro kopieren
köhler

Hallo!
Wenn ich in der Tabelle ein Makro eingebettet habe, dann wird beim Kopieren zu einer neuen Datei das Makro nicht mehr mit dem Button angesteuert. Das Makro wurde mitkopiert aber der Button hat dann ein Bezug auf die "alte" Datei, von der ich das Tabellenblatt kopiert habe.
Wie k...
08.01.2009 12:33:58
Thread-ID: 1037865
6 Beiträge
Anzeige
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
Blatt kopieren mit VBA
Torsten

Hallo beisammen,
wie muß der Code vervollständigt werden, wenn ich das gerade aktive Blatt kopieren und immer an die letzte Position einfügen möchte?
Vielen Dank für Eure Tipps.
Gruß
Torsten
06.03.2009 16:36:27
Thread-ID: 1057377
5 Beiträge
Tabelle mit var. Inhalt kopieren
Robbie

Hallo zusammen, ich mal wieder ein Problemchen.
Ich habe ein Makro laufen das mit Excel 2003 erstellt wurde. Der Tabelleninhalt sol kopiert werden, der aber unterschiedlich lang ist. Nun hatte ich dies immer mit dem folgenden Code markiert:
Range("A2", Range("p65536").End(xlUp)).Select<...
20.03.2009 10:06:08
Thread-ID: 1062062
5 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
Anzeige

Links zu Excel-Dialogen

CommandButton

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
9
4
3
5
7
3
4
4
2
15
5
3
5
7
4
2
5
2
4
6
2
1
6
2
7