Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 14:48:50
"Eingabefeld" zwischen zwei Zeilen geht nicht weg.
24.04.2024 14:40:10
Zeilenumbrüche in Textbox zählen
24.04.2024 14:06:20
Gesamte Column löschen, wenn Column-Bereich leer
24.04.2024 13:44:05
Bezeichnung Tabellenblatt aus Zelle für Formel auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
696to700
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
696to700
696to700
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Blatt kopieren, benennen und in andere Mappe kopie

Blatt kopieren, benennen und in andere Mappe kopie
16.11.2005 11:48:22
Werner
Hallo,
ich habe mal eine komplizierte Frage:
Ich möchte auf Knopfdruck (Button) folgendes erreichen:
Das Tabellenblatt "Datenbank" in der Arbeitsmappe 1 soll kopiert werden und in einer anderen Arbeitsmappe (Arbeitsmappe 2) als neues Blatt eingefügt werden. Dabei soll als Name des neuen Blattes der Inhalt der Zelle A2 benutzt werden.
Anschließend soll das Blatt "Datenbank" in Arbeitsmappe 1 geleert werden.
Geht sowas?
Gruß
Werner

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blatt kopieren, benennen und in andere Mappe kopie
16.11.2005 12:34:14
haw
Hallo Werner,
hier ein Beispiel:

Sub Kopieren()
Dim ws As Worksheet
Set ws = ThisWorkbook.Worksheets("Datenbank")
ws.Copy
ActiveWorkbook.SaveAs Filename:=ws.Range("A1").Value
ActiveWorkbook.Close False
ws.Cells.ClearContents
End Sub

Gruß
Heinz
AW: Blatt kopieren, benennen und in andere Mappe k
16.11.2005 12:35:59
werner
Hallo Werner,
folgendem Code in ein Modul kopieren, dann sollte es klappen:
Option Explicit

Sub Test()
Workbooks("Mappe1").Sheets("Datenbank").Copy Before:=Workbooks("Mappe2").Sheets(1)
Workbooks("Mappe2").Sheets(1).Name = Range("A2").Text
Workbooks("Mappe1").Sheets("Datenbank").Activate
Cells.ClearContents
End Sub

Fehler gibt es u.U., wenn du den Vorgang wiederholst und in der 2. Mappe Namen doppelt auftreten - wenn das der Fall ist, kann man den Code aber noch anpassen.
Grüße
Werner
Anzeige

301 Forumthreads zu ähnlichen Themen

VBA-Formel um nur Berechnungswerte einzutragen
Matthias

Hallo Excel und Makrofans.
Ich habe folgende 2 Probleme. Erstmal zum ersten Problem:
Ich habe eine Datei in der ich Daten (Betriebsparameter [Druck, Temperatur usw.]) aus einem externen Programm einlese. Aus diesen Werten möchte ich gerne einige Werte Berechnen.
Zur Zeit mache ich d...
12.08.2008 08:51:00
Thread-ID: 1001053
6 Beiträge
Anzeige
nur Werte kopieren
Pet


Guten Abend,
könnte mal wieder etwas Hilfe von Euch gebrauchen.
Unten stehender Code kopiert die bedingte Formatierung aus Tabelle1 mit.
Wie muss ich es ändern, dass nur die Werte kopiert werden?
Vielen Dank vorab für Eure Hilfe.
Gruß, Pet
Sub SchaltflächeCopy() D...
01.11.2008 21:04:45
Thread-ID: 1021094
7 Beiträge
Nur Werte kopieren!
markus473

Hallo zusammen,
ich habe ein Makro, welches Daten kopiert.
Jetzt wäre es besser, wenn es nur die Werte kopiert, da dann die Formatierung erhalten bleibt.
Wie müßte das denn dann aussehen?
Danke Gruß Markus
Sub Uebernahme_Januar() Dim sh As Worksheet UF_Dateiauswahl1.Show I...
26.01.2009 15:27:51
Thread-ID: 1043917
7 Beiträge
Anzeige
Zugriff auf Tabellenblatt in anderer Datei
Ulrich

Hallo,
ich würde gerne in einer Datei eine Zusammenfassung darstellen, und gebe dazu einen Namen eines Tabellenblattes einer anderen Datei ein, aus der dann eine Zelle übernommen wird. Ziel ist es in der Zusammenfassung z.b. 2012 als Jahr (Name des Tabellenblattes) einzugeben und ich bekomm...
01.03.2009 18:03:43
Thread-ID: 1055274
2 Beiträge
nur werte kopieren!
lisa

Hallo zusammen
Dieses Thema ist nicht nur in diesem Forum mehrfach angesprochen worden.
Ich rafe es nicht, trotz Recherche, hiefür nur den Wert kopieren zu lassen.
Das ist mein Orig. Gode
Private Sub CommandButton3_Click() Sheets("Dateneingabe").Range("L2").Copy Sheets("Liefer...
03.03.2009 14:07:47
Thread-ID: 1055975
5 Beiträge
Autofilter - nur gefilterte Werte kopieren ?
Piet

Hallo zusammen,
angenommen ich habe in Spalte A diverse Produkte (Produkt A, Produkt B, usw.)
und in Spalte B diverse Zahlenwerte zu den Produkten.
Z.B.:
Produkt Wert
a 27
b 13
b 17
a...
08.04.2009 15:38:42
Thread-ID: 1067762
3 Beiträge
Nur Werte mit selber Jahreszahl kopieren
Heinz

Hallo Leute
Habe heute schon wieder ein Problem !!
Ich hoffe es kann mir bitte wieder jemand weiterhelfen.
Ich habe in "Daten" I1 eine Jahreszahl stehen. In K31:K162 und in M31:M162 Daten mit TTT*TT.MMM.JJ stehen.
Nun möchte ich Daten die in K31:K162 gleich mit der Jahrsezahl in...
26.06.2009 16:13:15
Thread-ID: 1084642
13 Beiträge
Nur den Inhalt kopieren
edie

Hallo zusammen,
was muss ich ändern damit nur der Inhalt kopiert wird?
Sub test() Dim wsT As Worksheet Dim wsS As Worksheet Dim i As Integer Dim RowsT As Integer Application.ScreenUpdating = False Set wsT = ActiveWorkbook.Sheets.Add(, Worksheets(Worksheets.Count), , xlWorksheet) wsT.Nam...
27.12.2009 23:27:15
Thread-ID: 1126034
3 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
5
4
6
6
6
1
4
2
12
2
2
3
12
2
4
2
3
4
2
35
6
1
10
1
5