Thema Datum  Von Nutzer Rating
Antwort
Rot Eine einzige Tabelle aus Arbeitsmappe speichern
 30.06.2014 14:08:35 Tom
NotSolved
30.06.2014 19:42:20 Holger
NotSolved

Ansicht des Beitrags:
Von:
Tom		 Datum:
30.06.2014 14:08:35		 Views:
1114		 Rating:
     
Antwort:
  Ja
Thema:
Eine einzige Tabelle aus Arbeitsmappe speichern

Hallo Forum,

ich habe einen kurzen VBA-Code. Allerdings bewirkt der nicht ganz das, was ich haben möchte. Der VBA-Code speichert die gesamte Arbeitsmappe. Ich würde gerne aber nur eine Tabelle der Arbeitsmappe in einem bestimmten Pfad speichern. Könntet ihr mir dabei helfen bitte?

 

Sub SaveAsValues_Data()

Dim lastrow As Integer

lastrow = 0

ChDir Range("save_path")

    'Speichern unter neuem Namen
    ActiveWorkbook.SaveAs Filename:= _
        Range("path"), FileFormat:= _
        xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
        , CreateBackup:=False
      
    ActiveWorkbook.Sheets.Select
        
    Cells.Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
       
    Application.CutCopyMode = False

    Sheets("Result").Select
    Sheets("Result").Range(Cells(lastrow + 3000, 2), Cells(3000, 50)).ClearContents
       
    Sheets.Select
   
    ActiveWorkbook.Save

End Sub

MFG

Tom

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 Eine einzige Tabelle aus Arbeitsmappe speichern
 30.06.2014 14:08:35 Tom
NotSolved
30.06.2014 19:42:20 Holger
NotSolved