Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1016to1020
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
1016to1020
1016to1020
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Einzelne Registerkarte in neue Datei speichern

Einzelne Registerkarte in neue Datei speichern
14.10.2008 11:46:43
Herbert
Hallo Experten,
ich möchte per Button eine einzelne Registerkarte meiner Excel-Datei im Format: "Text (Tabstopp-getrennt)(*.txt)" abspeichern. Die neue Datei soll im Ordner C:\temp erscheinen. Der Name der neuen Datei ist eigentlich egal.
Wäre für jeden Vorschlag dankbar.
Danke und Gruß.
Herbert

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Einzelne Registerkarte in neue Datei speichern
14.10.2008 11:55:00
otto
Hi,
vielleicht so:

Sub Speichernunter()
Dim dateiPfad As String
Dim Name As String
dateiPfad = "C:\temp\"
Name = "Test"
Worksheets("Tabelle1").Copy
Worksheets("Tabelle1").SaveAs Filename:=(dateiPfad &  Nummer) _
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
End Sub


gruß
otto

AW: Einzelne Registerkarte in neue Datei speichern
14.10.2008 12:05:50
Herbert
Hallo,
danke für die schnelle Hilfe. Bei Ausführung des Codes erscheint die Fehlermeldung: "Index außerhalb des gültigen Bereiches". Der Bereich:
Worksheets("Tabelle1").SaveAs Filename:=(dateiPfad & Nummer) _
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
wird dabei gelb hinterlegt.
Anzeige
AW: Einzelne Registerkarte in neue Datei speichern
14.10.2008 12:06:43
Rudi
Hallo,

Sub SaveAsTxt()
Dim strSep As String, strDat As String, _
iCols As Byte, iRows As Integer, _
iR As Long, strTxt As String, strTmp, _
strPfad As String
strPfad = "c:\temp\"
Reset
With ActiveSheet
iRows = .UsedRange.Rows.Count
iCols = .UsedRange.Columns.Count
strSep = Chr(9)
strDat = strPfad & ActiveSheet.Name & ".txt"
Open strDat For Output As #1
For iR = 1 To iRows
strTmp = .Range(.Cells(iR, 1), .Cells(iR, iCols))
strTmp = WorksheetFunction.Transpose(WorksheetFunction.Transpose(strTmp))
strTxt = Join(strTmp, strSep)
Print #1, strTxt
Next iR
Close #1
End With
End Sub


Gruß
Rudi

Anzeige
Super! Vielen Dank!
14.10.2008 12:20:00
Herbert
Funktioniert spitze. Große Klasse. Würde ich auch gern so programmieren können.

305 Forumthreads zu ähnlichen Themen

Durchrechnung nur für ein Blatt ausschalten
KlausF

Hallo Excelperten!
In einer Datei schalte ich beim Öffnen mittels AutoOpen-Makro die automatische Durchrechnung bisher ganz aus.
Wie kann ich aber die automatische Durchrechnung nur für ein bestimmtes Blatt (z.B. Tabelle1) abschalten?
Geht das überhaupt so eingeschränkt?
Besten...
13.09.2008 15:37:53
Thread-ID: 1009517
3 Beiträge
Anzeige
Tabellenblatt separat speichern als csv
Herbert

Hallo,
der beigefügte Code wurde mir freundlicherweise hier bereit gestellt. Aus einer Datei wird ein Tabellenblatt in eine neue Datei im Ordner C:\temp gespeichert. Das Dateiformat der neuen Datei ist csv. Die einzelnen Werte der neuen csv-Datei werden durch Semikolon getrennt. Ich benötig...
16.10.2008 16:07:00
Thread-ID: 1016905
6 Beiträge
tabellenblatt in Excel mit neuer Instanz kopieren
chris

Hallo zusammen,
ich habe eine frage.Vielleicht könnt ihr mir helfen.
ich versuche eine Auswertung zu erstellen und diese soll in eine neue Instanz von Excel kopiert werden.
Aber irgendwie klappt das nicht :(
Ich habe unten einen code angefügt damit ich als erstes eine neue Insta...
10.02.2009 13:39:15
Thread-ID: 1049055
8 Beiträge
Anzeige
Kopiertes Tabellenblatt aus Vorlage speichern
Bertram

Hallo zusammen,
ich bekomme seit Neuestem beim Speichern einer Datei (mittels VBA) manchmal eine Fehlermeldung. Ich habe zwar schon im Archiv gesucht, aber nix gefunden. Wahrscheinlich liegt's an meinen Suchbegriffen, denn ich hab die Fehlermeldung noch nie vorher gesehen und weiß nicht, wi...
05.03.2009 12:20:42
Thread-ID: 1056776
11 Beiträge
Nur Tabellenblatt speichern nicht ganze Arbeitsm
Horst

Hey !
Da eine meiner Arbeitsmappe immer mehr Arbeitsblätter (Tabellen) bekommt. Möchte ich diese irgendwie ausgliedern und nur bei bedarf wieder reinladen.
Kann ich das irgend wie per Marko oder zu Fuß erledigen?
Das heißt unter ihrem Namen ablegen. Und irgendwie (per extra Menüpunk...
19.03.2009 09:54:34
Thread-ID: 1061709
3 Beiträge
Nur Tabellenblatt speichern nicht ganze Arbeitsm
Horst

Hey !
Da eine meiner Arbeitsmappe immer mehr Arbeitsblätter (Tabellen) bekommt. Möchte ich diese irgendwie ausgliedern und nur bei bedarf wieder reinladen.
Kann ich das irgend wie per Marko oder zu Fuß erledigen?
Das heißt unter ihrem Namen ablegen. Und irgendwie (per extra Menüpunk...
19.03.2009 11:41:16
Thread-ID: 1061772
10 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
nur eine Tabelle anwählen, falls ...
Peter

Guten Tag
Gelegentlich wähle ich in einer Arbeitsmappe gleichzeitig mehrere Tabellen an, wenn ich beispielsweise bei allen die gleichen Änderungen durchführen will.
Nun habe ich mir eine Routine geschrieben, die auf allen Tabellen ein Passwort setzt oder entfernt.
Diese Routine läuf...
02.06.2009 09:34:43
Thread-ID: 1078545
8 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
2
3
5
7
13
10
2
9
2
7
21
6
5
5
7
13
2
4
3
5
6
4
5
10
7