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

Einzelne Tabellenblätter apspeichern mit VBA

Forumthread: Einzelne Tabellenblätter apspeichern mit VBA

Einzelne Tabellenblätter apspeichern mit VBA
22.07.2008 10:15:00
Urmila
Hallo alle zusammen,
habe eine Frage:
Ich habe eine Exceldatei mit mehreren Tabellenblätter. Will jedoch die Spalten A bis Z kopieren, diese in einer neuen Exceldatei einfügen (Inhalte einfügen, Werte und Formate ebenfalls), Überschriften in Zeile A6 noch Autofilter und dies dann ohne "Blattregister", "Statusleiste", "Zeilen- und Spaltenüberschrift" etc. an einem bestimmten Pfad abspeichern (z.B. C:\Test\Bericht5.xls)
Diese wird dann desöfteren "geupdated" und nochmals unter dem selben Pfad abgespeichert.
Hierfür gibts doch sichrlich einen VBA Skript....
Danke
Urmila

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Einzelne Tabellenblätter apspeichern mit VBA
22.07.2008 10:48:00
Hajo_Zi
Hallo Urmila,
Excel hat auch einen Makrorecorder mit dem man wiederholende Prozesse aufzeichnen kann.

AW: Einzelne Tabellenblätter apspeichern mit VBA
22.07.2008 13:32:34
Urmila
Hallo Hajo,
dass Excel Makro aufzeichnen kann, schon kklar, aber nur bei "Workbook.Add" taucht eine Fehlermeldung auf. Kannst du mir da bitte weiter helfen? :-)
Urmila

Anzeige
AW: Einzelne Tabellenblätter apspeichern mit VBA
22.07.2008 15:33:00
Hajo_Zi
Hallo Urmila,
ich sehe Deinen Code nicht.
Gruß Hajo

AW: Einzelne Tabellenblätter apspeichern mit VBA
22.07.2008 16:11:00
Urmila
Ohh ja klar...sorry
ActiveSheet.Columns("A:Z").Select
ActiveSheet.Selection.Copy
Workbooks.Add
ActiveSheet.Columns("A:Z").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("A6").Select
Application.CutCopyMode = False
ActiveWindow.DisplayWorkbookTabs = False
With Application
.DisplayFormulaBar = False
.DisplayStatusBar = False
End With
ActiveWindow.DisplayHeadings = False
ActiveWindow.DisplayGridlines = False
ActiveSheet.Range("a6").Select
ActiveSheet.Selection.AutoFilter
ActiveWorkbook.SaveAs Filename:= _
"C:\Test\Nummer 1-autofilter.xls", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False

Anzeige
AW: Einzelne Tabellenblätter apspeichern mit VBA
22.07.2008 19:01:22
Hajo_Zi
Hallo Urmila,
Option Explicit

Sub Urnila()
ActiveSheet.Columns("A:Z").Copy
Workbooks.Add
With ActiveSheet.Columns("A:Z")
.PasteSpecial Paste:=xlValues, Operation:=xlNone
End With
Application.CutCopyMode = False
ActiveWindow.DisplayWorkbookTabs = False
With Application
.DisplayFormulaBar = False
.DisplayStatusBar = False
End With
ActiveWindow.DisplayHeadings = False
ActiveWindow.DisplayGridlines = False
ActiveSheet.Range("a6").Select
ActiveSheet.Selection.AutoFilter
ActiveWorkbook.SaveAs Filename:= _
"C:\Test\Nummer 1-autofilter.xls", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
End Sub


Gruß Hajo

Anzeige
AW: Einzelne Tabellenblätter apspeichern mit VBA
23.07.2008 10:31:00
Urmila
Perfekt,
genau das was ich brauchte, es funktioniert super
Vielen lieben Dank Hajo
Urmila
;

Forumthreads zu verwandten Themen

Beim Kopieren eines Tabellenblattes den VBA-Code e
Alfi

Hallo Excel-Gemeinde!
ich habe eine mehrblättrige Datei, per Makro kopiere ich ein Blatt und speichere dieses unter neuem Namen ab.
Dieses Blatt soll aber nicht mehr den VBA-Code der ursprübglichen Datei enthalten, sprich ein Blatt ohne Makros.
Wer kann mir helfen?
So sieht der...
09.09.2008 09:58:00
Thread-ID: 1008333
8 Beiträge
Steuerelement Listbox1 in tabelle wird in VBA n
Mike

Hallo
Ich habe in einer Tabelle aus der Symbolleiste Steuerelemente ein Listenfeld in eine Tabelle eingefügt. Der Objektname lautet "Listbox1".
Über ein Makro will ich nun diese Listbox füllen.
Listbox1.additem "Text"
wenn ich das Makro ausführen wird die Listbox1 jedoc nicht ge...
28.11.2008 11:59:00
Thread-ID: 1028645
3 Beiträge
Änderungen in Tabellen via VBA vornehmen
Wolfgang

Hallo,
in einer Mappe befinden sich 3 Tabellenblätter; Gesamt, Grunddaten und Altdaten - In Gesamt werden unterschiedlich viele Daten, die aber alle immer das Format zu Tabelle Grund- und Altdaten haben, eingespielt. Im beiliegenden Code, wenn ich ihn richtig interpretiere, werden Veränderu...
06.12.2008 15:50:24
Thread-ID: 1030699
7 Beiträge
Anzeige
VBA: String+TAB an inaktives Windowsfenster senden
Melanie

Hallo allerseits,
ich moechte aus Excel heraus mit VBA code einen String (z.b "Hallo") + TAB (oder ENTER) an ein 'fremdes' WindowsapplicationFenster schicken (keine Officeanwendung), wobei das Fensterhandle (oder auch das entsprechende TextFeldHandle bekannt sind).
Allerdings soll die...
09.12.2008 08:37:52
Thread-ID: 1031241
9 Beiträge
Anzeige
VBA Script in andere Tabellen
Jörg

Hallo,
mich würde mal interessieren, ob es möglich ist, das Script einer Tabelle öffentlich für andere Tabellen zu machen. Derzeit ist es so, wenn ich das Makro in anderen Tabellen anwende, öffnet sich erst die Tabelle in der das Makro drin steht. Kann man das umgehen?
Für Eure Hilfe vi...
14.01.2009 11:42:23
Thread-ID: 1039546
16 Beiträge
Anzeige
VBA-Code in einem String erzeugen und dann ausführ
Dirk

Hallo!
Gibt es eine Möglichkeit, VBA-Code auszuführen, der in einer String-Variablen vorliegt, die zuvor dynamisch erzeugt wurde? Sprich: Ich möchte VBA-Code dynamisch erzeugen und anschließend ausführen. Geht das irgendwie?
Ich hoffe, das ist so verständlich.
Vielen Dank,
Dirk<...
20.01.2009 20:08:36
Thread-ID: 1041981
4 Beiträge
Anzeige
VBA Code mit VBA in Tabelle kopieren - Fehler?!
Andreas

Hallo Herber Fans,
ich habe mir heute aus der Recherche eine Möglichkeit rausgesucht, einen Code über VBA in ein anderes VBA Worksheet zu kopieren. Das dies in VBA überhaupt geht ist ja schon genial. Es soll ein Code in das VBA Worksheet des activeworkbooks kopiert werden.
Der Code dafü...
11.02.2009 15:56:00
Thread-ID: 1049657
3 Beiträge
Auslesen_Tabellenblattname_eintragen-siehe VBA
Fabio

Hallo zusammen,
mit dem Makro unten aus dem Forum lese ich diverse Exceldateien in einem Verzeichzis aus. Soweit ich das gesehen habe, liest das Makro immer das "erste" Tabellen-Blatt aus.
Aktuell habe ich folgendens:
- Ein Verzeichnis mit 10 Excel-Dateien
- Die Exeldatein haben...
06.04.2009 11:13:51
Thread-ID: 1067062
4 Beiträge
Strings vergleichen in 2 verschiedenen Tabellen
Mario

Hallo zusammen,
ich versuch mal mein Problem zu beschreiben:
Tabelle 1 ist ein Schichtplan, der die Namen der MA, eingeteilt in verschiedene Gänge, mit dem Zusatz "Gang" enthält, z.B. Mayer Hans 12.
Tabelle 2 ist ein Anwesenheitsplan, der die Namen incl. Personalnummer hat, z.B. May...
26.07.2009 14:32:41
Thread-ID: 1091022
8 Beiträge
Strings vergleichen in 2 verschiedenen Tabellen
Mario

Hallo zusammen,
hier ist ein Code von fcs, um Namen in versch. Tabellen zu vergleichen. Mein Problem dabei ist, _
dass ich nicht erwähnt habe, dass sich die Namen im Laufe der Zeit im Tabellenblatt Woche ä _ ndern, sprich es kommt jeden Tag eine neue Zahl mit Leerzeichen dazwischen daz...
01.08.2009 13:47:36
Thread-ID: 1092733
7 Beiträge
String in Tabelle umstellen
Alis

Hallo Zusammen,
ich wollte gerne die Lösung von diese Aufgabe:
ich habe ein String sieht als Beispiel so aus: &(A/b)&C&D&(E/F) (/ ist oder)
diese String soll in Excel Tabelle so aussehen:
&A &C &D &E
&A &C &D &F
&...
02.09.2009 07:43:49
Thread-ID: 1099959
2 Beiträge
VBA-Funktion in Pivot-Tabelle
Ziegenpeter

Hallo Zusammen!
Vielleicht kann mir jemand bei folgendem Problem helfen:
Ich habe per VBA eine Funktion namens Sigma() geschrieben. Sie funktioniert problemlos. Nun will ich diese Funktion auch in einer Pivot-Tabelle nutzen, das funktioniert nicht.
Beispiel:
Das einzufügende ber...
10.09.2009 20:19:28
Thread-ID: 1101842
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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