Word Dateinamen ändern bei fortlaufender Rechnungsnummern Erstellung?

Moin,

Ich habe den Code ,aus dem Link des unten stehenden Threads, verwendet und würde gerne im Dateinamen noch zusätzlich zur Rechnungsnummer, den Nachnamen der Person haben, die ich anschreibe. Für die Empfängerauswahl habe ich eine Funktion ausgewählt, die die Kontaktdaten aus Outlook zieht.

Danke an BerchGerch für deine Mühe den Code umzuschreiben und hier einzustellen!

Ich hoffe ihr könnt mir helfen, wie ich den verwendeten Code umschreiben kann, dass es funktioniert.Da ich, was das Programmieren angeht, ziemlich talentfrei bin.

vielen Dank und beste Grüße

Word Rechnungsnummer soll automatisch weiterzählen? (Computer) - gutefrage

https://www.gutefrage.net/frage/word-rechnungsnummer-soll-automatisch-weiterzaehlen#answer-277395252

1 Antwort

Dudenox2

03.03.2020, 19:12

1. Eine Datei oder mehrere

2. Speicherst du den aktuellen Zähler

3. Falls nicht, dann benötigst du den Vorgänger

Simpel: Variable im Namen der Rechnung.

Name wird zerlegt. Variable wird hochgezählt. Datei wird erzeugt. Für mehr Info Datei schicken, ist sonst die Zeit nicht wert.

OskarWhite

Beitragsersteller

04.03.2020, 17:15

Moin Dudenox2,

ich habe eine Vorlage erstellt (.dotm Datei) mit unserem Layout (Kopf-und Fußzeile) und den Makro Code von BerchGerch aus dem Thread, den ich oben verlinkt habe genommen. Diese Vorlage öffne ich in Kopie und dann wird die Rechnung mit auto. Nr erzeugt. Nachricht per PN oder wie soll ich dir die Datei zukommen lassen?

danke schonmal

Ähnliche Beiträge

Word (VBA) Dokument mit fortlaufender Nummer+aktuellem Datum erstellen?

Hallo zusammen,

als Vorlage für Besprechungsprotokolle verwende ich ein Makro, das beim Öffnen die nächsthöhere Dokumentennummer auf Basis des Dateinamens erzeugt, konkret den folgenden Code (von GerchBerch):

https://www.gutefrage.net/frage/word-rechnungsnummer-soll-automatisch-weiterzaehlen

Nun möchte ich bei der Dokumentennummer und im Dateinamen das aktuelle Datum ergänzen. Den Code habe ich entsprechend angepasst (sVorgabe = "-" & Format(Date, "dd.MM.yyyy")) und die Vorlage funktioniert, jedoch nur für Protokolle am selben Tag. Beim Öffnen der Vorlage am nächsten Tag beginnt die Doknr. wieder bei eins; ist soweit verständlich, es ist kein entsprechender Dateiname im Ordner vorhanden.

Nun das Problem, ich bekomme es nicht hin bzw. funktionsfähig umgesetzt...

Für die Generierung der Nummer müsste wohl nur der "ersten" Teil des Dateinamens ohne das Datum, sprich die Laufnummer ausgelesen werden.

Für jeden Tipp/ Lösungsansatz bedanke ich mich vorab.

MfG Tobi

...zum Beitrag

Automatisch fortlaufende Rechnungsnummern mit Word 2007?

Kann man bei Word 2007 bei einer Word-Rechnungsvorlage eine Rechnungsnummer erstellen, die bei Erstellung einer neuen Rechnung automatisch die fortlaufende Rechnungsnummer nimmt? Wenn ja, wie stellt man das ein?

...zum Beitrag

Word Rechnungsnummer soll automatisch weiterzählen?

Hallo,

ich habe folgendes Problem und bitte um Hilfe. Ich habe eine Rechnung in Word mit der Rechnungsnummer 012-2018. Nun möchte ich, wenn ich das Wod-Dokument neu öffne, dass die Rechnungsnummer automatisch weiter zählt.

In meinem Beispiel 013-2018. Wie bekomme ich das Problem gelöst.

Gruß

...zum Beitrag

Einzelne Seitenzahlen in word entfernen ohne das sich andere automatisch entfernen?

Hallo zusammen, ich habe eine Frage und zwar wie kann ich wenn ich z. B 10 Seiten als fortlaufende seitenzahl habe dann aus einer Seite die Seitenzahl entfernen ohne das die anderen sich entfernen? Weil sobald ich eine Zahl entferne entfernen sich auch automatisch die vorherigen.

...zum Beitrag

fortlaufende Nummer in Seriendruck bei Word 2007

ich komme nicht drauf...

habe diesmal 5 gleichelautetende rechnungen zu stellen. daher nutze ich in word 2007 den seriendruck. die adresse bekomme ich aus outlook.

nun braucht natürlich jede rechnung eine eigene rechnungsnummer.

wie kann ich eine fortlaufende nummer in dem seriendruck einbauen. denn selbst manuell ändern geht ja nicht, da sonst alle rechnungen wieder die gleiche nummer aufweisen.

besten dank.

...zum Beitrag

Word Seitenzahl falsch wegen fortlaufenden Abschnittswechsel?

Hallo,

habe ein Word Dokument mit Inhaltsverzeichnis, leider sind aber die Seitenzahlen falsch.

Und zwar fängt es immer wieder bei 1 an wenn auf der vorherigen Seite ein fortlaufender Abschnittswechsel drinnen ist (das sind einige im ganzen Dokument).

Ich habe natürlich bereits die Seitenzahl formatiert mit "fortsetzen bei vorherigem Abschnitt" aber das funktioniert nicht, da irgendwie auf der vorherigen Seite immer zwei dieser Abschnittswechsel drinnen sind.

Also wenn ich die Kopf/Fußzeilen aufmache sehe ich das Seite 17 Abschnitt 1 ist und Seite 18 ist dann bereits Abschnitt 3 zum Beispiel.

Vielleicht weil es wichtig ist sein könnte noch die Erklärung wie diese Abschnittswechsel eingefügt wurden: Das sind nämlich quasi automatische vom Word und zwar wurde die Funktion unter Layout -> Spalten -> Zwei benutzt.

Bin am verzweifeln bitte helft mir.

Danke und LG

...zum Beitrag

Schreibe ich in Word einen englischen Text, muss ich jede Menge Dinge wie Beschriftungen, Titel des Inhaltsverzeichnis per Hand auf Englisch umstellen?

Gibt es eine Möglichkeit, dass Word bei einem englischsprachigen Text automatisch englische Beschriftungen etc. verwendet?

...zum Beitrag

Word 2007 wie zwei verschiedene Seitennummerierungen auf einer Seite?

Bin beim Formatieren meiner Masterarbeit und habe im Anhang einige Transkripte, die ich im Text zitiere und die alle jeweils mit der Seitennummerierung 1 beginnen. Nun muss ich unten in der Fußzeile fortlaufend durchnummerieren (also bei Seite 120 weiterzählen) und oben möchte ich die Seitenanzahl des Transkripts einfügen. Da aber alle Transkripte Zeilennummerierungen haben verschiebt sich alles sobald ich einen Umbruch einfüge. Gibt es irgendeine Möglichkeit beide Seitennummerierungen irgendwie einzufügen? Ich hoffe das ist einigermaßen verständlich beschrieben

Danke schon einmal!

...zum Beitrag

Excel, mehrere Dateien, eine fortlaufende Nummer?

Also es geht darum, dass ich eine Excel Datei habe, die vervielfältigt wird, es entstehen also mehrere Dateien in einem Order. Jede Datei bekommt eine Nummer, die fortlaufend sein soll (z.B. wie Rechnungsnummern) Kann ich einer Datei in einer Zeile eine Formel einfügen, die dafür sorgt, dass die nächste Datei "dieselbe Zahl+1" automatisch erhält.

...zum Beitrag

Pdf trennen und automatische Benennung?

Angenommen man hat bspw. eine Pdf mit mehreren Rechnungen die alle dieselbe Vorlage haben. An einer bestimmten Stelle steht eine Rechnungsnummer.
Jetzt meine Frage: gibt es ein Programm, welches diese Pdf trennen und dann automatisch die Rechnungsnummer als Dateinamen übernimmt. Also wenn man das halt irgendwo im Programm angibt „hey an der und der stelle steht die Nummer die soll als dateiname genommen werden“

Adobe acrobat pro kann bei mir die Pdf trennen aber macht immer seite 1, seite 2 etc als Dateinamen. Und das ist unvorteilhaft bei einer grösseren Datei

...zum Beitrag

Wie macht man Word idiotensicher?

Mein Opa verwendet oft Word. Allerdings hat er oft Probleme damit: Word schließt ohne zu speichern, er löscht ausversehen den ganzen Text, PC ist plötzlich aus.

Wie kann man Word idiotensicher machen? Also dass automatisch alles gespeichert wird und auch wiederherstellen vorige Versionen?

...zum Beitrag

Word: Fortlaufende Nummerierung über Feld-Funktion?

Hallo zusammen,

ich möchte in Word ein Feld einfügen, in dem automatisch eine Nummerierung enthalten ist. Allerdings soll diese Nummerierung folgendermaßen aussehen: Nr.: 001, dann Nr.: 002 und so weiter.. bei den zweistelligen Nummern soll dann dort stehen: Nr.: 010, Nr.: 011 etc. und dasselbe dann auch für die dreistelligen. Wie kann ich das in der Feldfunktion einstellen?

Danke für eure Hilfe!

...zum Beitrag

Bei Serienbrief Dokumente einzeln Speichern mit Makro funktioniert nicht?

Ich möchte die Dokumente im Serienbrief einzeln automatisch speichern mittels Makro und habe das unten angefügte Makro dafür auch gefunden aber es funktioniert bei mir noch nicht sondern debugt immer und zeigt Fehler in der Variable an. Ich hab auch den Pfad schon auf mein Dokument angepasst. Muss ich evtl noch den Dateinamen ändern?

Sub Test()
 '
 ' Serienbrief in einzelnen Word Dokumenten speichern
 '
 Dim Dateiname As String
 Dim LetzterRec As Long
     
 Application.ScreenUpdating = False
 Application.Visible = False

 Const path As String = "C:\Test\"          'Pfad anpassen
 ActiveDocument.MailMerge.DataSource.ActiveRecord = wdLastRecord
 LetzterRec = Word.ActiveDocument.MailMerge.DataSource.ActiveRecord
 ActiveDocument.MailMerge.DataSource.ActiveRecord = wdFirstRecord


     With ActiveDocument.MailMerge
         .DataSource.ActiveRecord = wdFirstRecord
         Do
             If .DataSource.ActiveRecord > 0 Then
                If .DataSource.DataFields("VorNachname").Value <> "0" Then
                     .Destination = wdSendToNewDocument
                    .SuppressBlankLines = True

                     With .DataSource
                         .FirstRecord = .ActiveRecord
                         .LastRecord = .ActiveRecord
                
                         Dateiname = path & .DataFields("VorNachname").Value & ".docx"
                
                     End With
                        .Execute Pause:=False
                 
                         ActiveDocument.SaveAs FileName:=Dateiname           'Speichern unter Dateiname
                        ActiveDocument.Close False
                 End If

               End If
               
             If .DataSource.ActiveRecord < LetzterRec Then
                 .DataSource.ActiveRecord = wdNextRecord
             Else
                 Exit Do
             End If
         Loop
     End With
     
     Application.Visible = True
     Application.ScreenUpdating = True
 End Sub

...zum Beitrag

Word Datei Automatisch Speichern, aber lokal?

Wiesoo kann man in Word nicht eine Datei automatisch speichern, die lokal auf der Festplatte liegt, warum geht das nur in OneDrive?

Ich mein, Visual Studio Code hat die Funktion ja auch, und das ist ja genauso von Microsoft..

Hä?

...zum Beitrag

Was möchtest Du wissen?

Deine Frage stellen