MS-Office-Forum
Google
   

Zurück   MS-Office-Forum > Microsoft Office > Microsoft Excel
Registrieren Forum Hilfe Alle Foren als gelesen markieren

Banner und Co.

Antworten
Ads Der Renner, 11 Entwicklertools für Access, Tipps & Trick und offene Datenbanken zum einzigartigen Preis.
Themen-Optionen Ansicht
Alt 13.09.2017, 08:51   #1
bitzundbytes
Neuer Benutzer
Neuer Benutzer
Engel Frage - Vortlaufende Rechnung mit rechnungsnummer abspeichern

Guten Morgen zusammen,

eine frage

Ich habe den Befehl rechnungsnummer erstellt als Vortlaufend

So als nächstes soll die Vortlaufende rechnungsnummer auch so abgespeichert werden.

Private Sub Workbook_Open()
With Sheets("Sheet1")
.Range("I15") = .Range("I15") + 1

End With
End Sub

Sub ExampleToSaveWorkbook()


ActiveWorkbook.SaveAs "Z:AbteilungKundendienstWerksverkauf9_2017KW 37Rechnungen" & Sheets("Sheet1").Range("I15") & ".xls"

End Sub



ich habe schon ganz viele Befehle reinkopiert. bin am Ende

Kann mir da jemand Helfen oder mir ein Tip geben bitte
bitzundbytes ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 13.09.2017, 09:10   #2
Silentwolf
MOF User
MOF User
Standard

Hallo,
Du könntest die Rechnungsnummer als Variable speichern die Du dann als Dateiname verwendest.

dim rngRechNr as range
dim strDateiname as string

set rngRechNr = 'Dein Bezug'
strDateiname = CStr(rngRechNr)

nicht getestet aber so in der Art sollte es vielleicht funktionieren

__________________

Gruß
Albert
Silentwolf ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 13.09.2017, 09:33   #3
RPP63neu
MOF Meister
MOF Meister
Standard

Moin auch von mir!
Etwas Grundlagenwissen:
Eine ReNr muss nicht fortlaufend (SIC!) sein!
Es reicht (und dies bietet sich auch an), wenn sie eindeutig ist.
Außerdem ist eine als .xls(x) gespeicherte Rechnung nicht zulässig!!
(sie könnte ja jederzeit nachträglich geändert werden)

Für das Excel-Blatt
Zahlenformat JJJJ"_"MM"_"TT"_"hh"_"mm
Tabelle6

 AB
1ReNr:2017_09_13_10_30

Formeln der Tabelle
ZelleFormel
B1=JETZT()


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8

Der Speicher-Code als PDF (Tabelle anpassen!):
Sub Speichern()
Tabelle6.ExportAsFixedFormat _
xlTypePDF, _
"H:\Temp\" & Format(Now, "yyyy_mm_dd_hh_nn")
End Sub


Gruß Ralf

__________________

Meine Logik war nicht fehlerhaft, nur meine Interpretation!
Tuvok
RPP63neu ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 13.09.2017, 09:39   #4
RPP63neu
MOF Meister
MOF Meister
Standard

Ergänzend noch zum "seltsamen" Zahlenformat:
Dadurch ist sichergestellt, dass die Sortierung im Explorer chronologisch vorgenommen wird.

__________________

Meine Logik war nicht fehlerhaft, nur meine Interpretation!
Tuvok
RPP63neu ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 13.09.2017, 10:00   #5
bitzundbytes
Threadstarter Threadstarter
Neuer Benutzer
Neuer Benutzer
Standard

Danke euch werde es nachher ausprobieren und werde dazu ein Feedback abgeben danke für die Schnelle Antwort super Service von Euch
bitzundbytes ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 14.09.2017, 08:25   #6
bitzundbytes
Threadstarter Threadstarter
Neuer Benutzer
Neuer Benutzer
Standard

Leider bekomme ich es nicht hin
kann mir jemand die Vorlage schreiben bitte ich bin zu blöd
bitzundbytes ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 14.09.2017, 08:44   #7
RPP63neu
MOF Meister
MOF Meister
Standard

Wie soll man einen angepassten Code schreiben, wenn man Deine Datei nicht kennt?

__________________

Meine Logik war nicht fehlerhaft, nur meine Interpretation!
Tuvok
RPP63neu ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 14.09.2017, 16:20   #8
bitzundbytes
Threadstarter Threadstarter
Neuer Benutzer
Neuer Benutzer
Standard

Da haben Sie recht werde mich Melden PN
bitzundbytes ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Ads
Antworten


Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Besucher: 1)
 
Themen-Optionen
Ansicht

Forumregeln
Es ist Ihnen nicht erlaubt, neue Themen zu verfassen.
Es ist Ihnen nicht erlaubt, auf Beiträge zu antworten.
Es ist Ihnen nicht erlaubt, Anhänge anzufügen.
Es ist Ihnen nicht erlaubt, Ihre Beiträge zu bearbeiten.

vB Code ist An.
Smileys sind An.
[IMG] Code ist An.
HTML-Code ist An.
Gehe zu


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:35 Uhr.


Partner und Co.
Access-Paradies -Alles rund um die Datenbank Microsoft Access -Code -Programme-Tools -Tipps   Kostenlose Tipps & Tricks, Downloads und Programme   www.kulpa-online.com - Tipps - Tricks - Tutorials - Meinungen - Downloads uvm...   vb@rchiv · Willkommen in der Welt der VB Programmierung   Access-Garhammer - Hier finden Sie jede Menge Beispiel-Datenbanken zu Access und mehr ...   mcseboard.de   Die Top Seite für Excel-VBA-Makros uvm.

Powered by: vBulletin Version 3.6.2 (Deutsch)
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.

Copyright ©2000-2010 MS-Office-Forum. Alle Rechte vorbehalten.
Copyright ©Design: Manuela Kulpa ©Rechte: Günther Kramer
Eine Verwendung der Inhalte in anderen Publikationen, auch auszugsweise,
ist ohne ausdrückliche Zustimmung der Autoren nicht gestattet.
Beachten Sie bitte auch unsere Nutzungsbedingungen.