Thema Datum  Von Nutzer Rating
Antwort
Rot Definiertes Tabellenblatt als neue Arbeitsmappe speichern
13.07.2022 16:13:30 Janine
Solved
13.07.2022 19:48:19 ralf_b
NotSolved
13.07.2022 20:22:52 xlKing
NotSolved
13.07.2022 20:24:25 xlKing
NotSolved
14.07.2022 08:26:56 Janine
NotSolved
14.07.2022 11:58:53 xlKing
NotSolved
14.07.2022 16:28:21 Janine
NotSolved
14.07.2022 16:28:22 Janine
NotSolved
14.07.2022 17:11:56 Gast1901
Solved
18.07.2022 16:15:12 Janine
Solved
18.07.2022 16:41:42 Janine
Solved
14.07.2022 11:49:04 Gast99286
Solved

Ansicht des Beitrags:
Von:
Janine
Datum:
13.07.2022 16:13:30
Views:
123
Rating: Antwort:
 Nein
Thema:
Definiertes Tabellenblatt als neue Arbeitsmappe speichern

Hallo Liebes VBA Froum 

Nachdem mir hier letztes Mal wunderbar geholfen wurde habe ich ein neues Problem:

Ich möchte aus einer bestehenden Arbeitsmappe das Tabellenblatt "Uebersicht" in einer separaten Arbeitsmappe abspeichern (Kopie). 

Der Dateipfad dazu ist pro Jahr gleich, nach Jahreswechsel ändert sich dieser. 

Es ist nicht der gleiche Pfad wie dort wo Bereits meine Ausgangsarbeitsmappe gespeichert ist.

In meinem VBA Buch habe ich folgenden Code gefunden, allerdings ist dieser für alle Arbeitsmappen einer Datei. 

Sub TabellenAlsDateienSpeichern()
Dim strPfad As String
Dim wksBlatt As Worksheet
Dim wkbZiel As Workbook
Application.ScreenUpdating = False
Application.DisplayAlerts = False
strPfad = ThisWorkbook.Path & "\Tabellen\"
If Dir(strPfad, vbDirectory) = "" Then
MkDir strPfad
End If
For Each wksBlatt In ThisWorkbook.Worksheets
wksBlatt.Copy
Set wkbZiel = ActiveWorkbook
wkbZiel.SaveAs (strPfad & wksBlatt.Name)
wkbZiel.Close savechanges:=False
Next wksBlatt
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

Meine Fragen hierzu:

1. Es macht doch mehr Sinn den Dateipfad als Konstante anzulegen und pro Jahr dann anzupassen? 

2. Wie kann ich den bestehenden Code ändern, dass dieser nur für die Arbeitsmappe "Uebersicht" aktiv ist?

3. Ich möchte die Arbeitsmappe nur mit folgenden Namen abspeichern: Name des Bearbeiters + Genauer Speicherzeitpunkt Datum Uhrzeit Minuten und Sekunden.

Irgendwie tue ich mich mit der Anpassung sehr schwer...

Vielen Dank für eure Hilfe!

Liebe Grüsse

Janine


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Definiertes Tabellenblatt als neue Arbeitsmappe speichern
13.07.2022 16:13:30 Janine
Solved
13.07.2022 19:48:19 ralf_b
NotSolved
13.07.2022 20:22:52 xlKing
NotSolved
13.07.2022 20:24:25 xlKing
NotSolved
14.07.2022 08:26:56 Janine
NotSolved
14.07.2022 11:58:53 xlKing
NotSolved
14.07.2022 16:28:21 Janine
NotSolved
14.07.2022 16:28:22 Janine
NotSolved
14.07.2022 17:11:56 Gast1901
Solved
18.07.2022 16:15:12 Janine
Solved
18.07.2022 16:41:42 Janine
Solved
14.07.2022 11:49:04 Gast99286
Solved