Thema Datum  Von Nutzer Rating
Antwort
Rot Makro zum Einfügen einer neuen Zeile
15.12.2022 08:34:45 Markus Keckeisen
Solved

Ansicht des Beitrags:
Von:
Markus Keckeisen
Datum:
15.12.2022 08:34:45
Views:
259
Rating: Antwort:
 Nein
Thema:
Makro zum Einfügen einer neuen Zeile

Hallo an alle Fachfrauen und Fachmänner,

ich bin ohne VBA-Kenntnisse und benötige Hilfe mit folgendem Problem, welches für Euch sicher keines darstellt:

Wie schaffe ich es im Excel 2016, dass in den folgenden beiden Befehlen nach der Copy in die nächste freie Zeile gesprungen wird ohne den vorigen Eintrag zu löschen?

        Worksheets("Bestellung Firma").Range("B26").Copy Worksheets("Anhang Firma").Range("A2") _

        Worksheets("Bestellung Firma").Range("G16:H16").Copy Worksheets("Anhang Firma").Range("C2") _

 

Komplettes Makro:

Sub aktivesBlattToPdf()

ChDir "U:\Strassacker\Namenschilder bestellen\"

    ActiveSheet.ExportAsFixedFormat Type:=x1TypePDF, Filename:= _

        Range("B26").Value & " " & Range("G16").Value & Format(Date, "-YYYY") & ".pdf", Quality:=x1QualityStandard, _

        IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _

        True

        Worksheets("Bestellung Firma").Range("B26").Copy Worksheets("Anhang Firma").Range("A2") _

        Worksheets("Bestellung Firma").Range("G16:H16").Copy Worksheets("Anhang Firma").Range("C2") _

        ThisWorkbook.Sheets("Bestellung Strassacker").Range("G16") = ThisWorkbook.Sheets("Bestellung Strassacker").Range("G16") + 1

End Sub

 

Vielen Dank für die Hilfe vorab!

Gruß Markus


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 Makro zum Einfügen einer neuen Zeile
15.12.2022 08:34:45 Markus Keckeisen
Solved