Thema Datum  Von Nutzer Rating
Antwort
Rot Speichern unter
31.10.2020 11:25:02 Nico
NotSolved
31.10.2020 13:52:22 ralf_b
NotSolved
31.10.2020 14:06:57 volti
NotSolved
31.10.2020 14:10:04 volti
NotSolved
31.10.2020 14:35:01 Nico
NotSolved
31.10.2020 15:58:10 volti
NotSolved
31.10.2020 16:38:07 Nico
Solved
01.11.2020 11:56:57 RPP63
NotSolved

Ansicht des Beitrags:
Von:
Nico
Datum:
31.10.2020 11:25:02
Views:
825
Rating: Antwort:
  Ja
Thema:
Speichern unter

 

Hallo,

Ich habe folgendes Problem:

in Zelle K52 steht ein Dateiname.

Ich habe nun ein Macro aufgezeichnet welches die Datei immer mit der Dateiname in K52 abspeichern soll wenn ich ein Button betätige. Sie macht es das erste mal richtig (zb. Dateiname " Heute")

Wenn ich aber das zweite mal abspeichere und in K52 steht "Morgen" ändert sich der Dateiname nicht sondern bleibt "Heute"

Es wäre schön wenn mir jemand helfen kannSub PDFDokumentation()

'

' PDFDokumentation Makro

'

 

'

    Sheets("Arbeitszeit Dokumentation").Select

    ActiveSheet.Unprotect

    Range("K51").Select

    Selection.Copy

    Range("K52").Select

    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

        :=False, Transpose:=False

    Application.CutCopyMode = False

    Selection.Copy

    Application.CutCopyMode = False

    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:= _

        "/Users/onhhollander/Desktop/Abrechnung Hollander WorkingHours/PDF Dokumentationen Hollander/Doko. Hollander Dezember 2023.pdf" _

        , Quality:=xlQualityMinimum, IncludeDocProperties:=True, IgnorePrintAreas _

        :=False, OpenAfterPublish:=False

    ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= _

        False

    Sheets("Befehle").Select

End Sub

 

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 Speichern unter
31.10.2020 11:25:02 Nico
NotSolved
31.10.2020 13:52:22 ralf_b
NotSolved
31.10.2020 14:06:57 volti
NotSolved
31.10.2020 14:10:04 volti
NotSolved
31.10.2020 14:35:01 Nico
NotSolved
31.10.2020 15:58:10 volti
NotSolved
31.10.2020 16:38:07 Nico
Solved
01.11.2020 11:56:57 RPP63
NotSolved