Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1908to1912
1908to1912
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

mit fortlauf. Datum ohne So/Mo drucken

Forumthread: mit fortlauf. Datum ohne So/Mo drucken

mit fortlauf. Datum ohne So/Mo drucken
09.12.2022 20:10:09
Shary
Hallo zusammen
Ich möchte gerne ein Blatt mit fortlaufendem Datum in der Zelle K8 drucken. Dabei sollen jeweils Sonntag und Montag weggelassen werden. Perfekt wäre dies immer für einen Monat. Kann mir da jemand weiterhelfen?
Danke und Gruss shary
Anzeige

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
=ARBEITSTAG(K8-1;1)+1
09.12.2022 20:29:07
lupo1
... und dies in irgendeinem Event verpacken.
AW: =ARBEITSTAG(K8-1;1)+1
09.12.2022 22:14:53
Shary
Ist das nicht nur eine Formel? Damit druckt es noch nicht oder?
Der Druck sollte für einen Monat sein, aber ohne die Sonntage und Montage im Format 01. Januar 2023
Ich habe es mit einem Makro versucht, aber nur mit Aufzeichnen geht das nicht.
Anzeige
Du solltest meinen Beitrag ganz lesen
09.12.2022 22:15:53
lupo1
Informiere Dich über Ereignisse.
AW: Du solltest meinen Beitrag ganz lesen
09.12.2022 23:32:34
shary
Ich habe deinen Beitrag ganz gelesen. Da steht:
Antwort auf: AW: =ARBEITSTAG(K8-1;1)+1
... und dies in irgendeinem Event verpacken
Und jetzt:
Betreff: Du solltest meinen Beitrag ganz lesen
Informiere Dich über Ereignisse.
Hilft mir nur leider nicht, weil ich nicht weiss wie alles zusammen zu bringen. Deshalb frag ich ja.
Anzeige
Dann wird Dir jmd. helfen
10.12.2022 00:06:15
lupo1
... ich habe immer keine Lust auf VBA, aber andere schon.
Der Jemand ist wach ;)
10.12.2022 07:58:05
RPP63
Moin!
Da ich ohnehin gerade daran sitze, Tagesjournale monatsweise auszudrucken:
Hinweise:
• Das Makro nutzt die Funktion ARBEITSTAG.INTL() mit dem dritten Argument 2 (Wochenende SO & MO)
• Es werden (noch) keine Feiertage berücksichtigt! (bei Interesse: Melden!)

Sub Monatsdruck()
Dim Monatsletzter As Date, Monat As Variant
' "Monat" unbedingt im Format mm/yy eingeben
' ansonsten Schleife (Falscheingabe) oder Abbruch!
Do
Monat = Application.InputBox( _
"Druck-Monat im Format mm/yy, bspw. 02/23", , _
Format(Date, "mm""/""yy"))
Loop Until Monat Like "[0-9][0-9]/[0-9][0-9]" Or Monat = False
If Monat = False Then
MsgBox "Abbruch durch Benutzer!", vbExclamation
Exit Sub
End If
Monatsletzter = CDate("1/" & Monat) - 1
Call Mach_Es(Monatsletzter)
End Sub
Sub Mach_Es(Datum As Date)
Dim Check&: Check = Month(Datum) + 1
With Tabelle1 'CodeName des Tabellenblatts evtl. anpassen!
Datum = WorksheetFunction.WorkDay_Intl(Datum, 1, 2)
Do
.Range("K8") = Datum
.PrintPreview 'Test, zum Ausdruck .PrintOut nehmen!
'    .PrintOut
Datum = WorksheetFunction.WorkDay_Intl(Datum, 1, 2)
Loop Until Month(Datum) > Check
End With
End Sub
Gruß Ralf
Anzeige
Achtung! Wichtige Änderung!
10.12.2022 08:24:07
RPP63
Hmmmh!
Blöder Fehler!
Ausgerechnet für den Dezember gibt es (natürlich!) eine Endlosschleife!
Deshalb unbedingt folgende Zeile ändern:
alt und falsch: Loop Until Month(Datum) > Check
neu und richtig: Loop Until Month(Datum) <> Check
Sorry!
AW: Achtung! Wichtige Änderung!
10.12.2022 16:24:54
shary
Das ist ja schon ziemlich komplex, da wäre ich alleine verloren. Vielen Dank!
Mit dem Makro setzt es mir jetzt das neue Datum ein und die Druckansicht geht auf, dann kann ich auf drucken klicken, das funktioniert auch. Aber dann kommt nur die erste Seite raus, weiter geht es nicht. Sprich der 3.1.22 kommt, dann gehts nicht weiter. Mache ich etwas falsch?
Anzeige
AW: Achtung! Wichtige Änderung!
10.12.2022 16:40:22
RPP63
Du siehst aber schon meine mit Hochkomma gekennzeichneten Kommentare?

      .PrintPreview 'Test, zum Ausdruck .PrintOut nehmen!
'    .PrintOut
Heißt:
Nicht .PrintPreview, sondern .Printout
Am Anfang war noch ein Fehler, nimm

Dim Check&: Check = Month(Datum) + 1
If Check = 13 Then Check = 1

Anzeige
AW: Achtung! Wichtige Änderung!
20.12.2022 14:37:43
shary
Hallo, sorry der lange Unterbruch - mich hat die Grippe erwischt.
Also ich habe nochmals alles durchgeschaut und natürlich hatte ich da den falschen Ausdruck. Jetzt habe ich das geändert, jetzt druckt es mir zb. für den Januar den 3.1. geht dann aber nicht weiter. Sprich den restlichen Monat druckt es nicht aus. Sicher auch irgendso ein Anfängerfehler den ich mache?
Anzeige
AW: Achtung! Wichtige Änderung!
29.12.2022 19:59:09
shary
So ich habs nochmals getestet. Ohne deine Änderung loopt es unendlich auch im Januar. Wenn ich deine Änderung eingebe, bleibt er aber auf dem ersten Datum (3.1.23) stehen. Kannst du mir nochmals helfen?
AW: Achtung! Wichtige Änderung!
29.12.2022 20:04:11
shary
Amen, es klappt: Es sind halt einfach keine kleinen Tippfehler erlaubt. Ich danke für die Hilfe!
Anzeige

Forumthreads zu verwandten Themen

Text fortlaufend kopieren
Joachim

HI,
ich habe ein Problem mit der Formatierung einer Textbox. Folgendes: ich habe auf meinem Sheet mehrere Zellen mit Textinhalt. Dieser Zextinhalt hat leider Zeilenumbrüche. Nun möchte ich den Text von B15 in eine Textbox einlesen:
For Each C In Range("B15")
TextBox4.Value = C.Value...
01.09.2008 10:46:00
Thread-ID: 1006350
7 Beiträge
Zeile fortlaufend nach Textdatei
Daniel

Hallo,
in einer Tabelle wird laufend ein Wert berechnet. Nun möche ich mit Worksheet_Calculate
ein Makro aufrufen, das diesen Wert, untereinander (zeilenweise) in eine Textdatei schreibt.
Das habe ich bisher, ich dachte \n bewirkt einen Zeilenumbruch...tut es aber nicht. Stattdess...
02.10.2008 10:12:00
Thread-ID: 1013799
4 Beiträge
log-Dateien fortlaufend importieren
Schulze

Liebe Excelianer,
unser Admin ist kürzlich mit einer Frage an mich herangetreten (einmal "Experte" immer "Experte" :-), von der ich mal wieder dachte: "Null Problemo!" bei der Umsetzung sah es dann "mal wieder" etwas anders aus...
Er möchte log Dateien des Mailservers in Excel einlesen...
18.11.2008 12:50:00
Thread-ID: 1025616
2 Beiträge
Formatierung Daten in Prozent fortlaufend
Wolfgang

Guten Morgen,
ich möchte unter einer Tabellenspalte mit Daten von z.B. (Spalte A =5, Spalte B =17, Spalte C =32.... bis Spalte X = 790) eine Formatierung bzw. Formel erstellen die mir automatisch, unter jeder Spalte, die jeweiligen Prozente der oberen Zahlen anzeigt
- wobei unter Spalt...
21.11.2008 07:54:55
Thread-ID: 1026590
7 Beiträge
Daten fortlaufend von Formular in Range schreiben
Formular

Hi,
wie kann ich denn folgende Abfrage bzw kopieren erledigen:
Ich habe Ein Formular mit Textbox'n und Combobox'n
auf einem Bestimmte Tabellenblatt ("Daten") möchte ich nun die Folgenden Inhalte kopieren (button)
Auf dem Tabellenblatt ("Daten") habe ich ein Range B33 : F42 (also...
29.01.2009 09:26:24
Thread-ID: 1044806
3 Beiträge
Fortlaufende Preise
tor

Hallo zusammen,
ich habe da ein kleines Problem:
Ich ermittle mir anhand von Kosten einen Tarif (Spedition) der in PalettenSparten aufgeteilt wird.
also:
- 1 Palette = 74€
- 2 Paletten = 146€
- 3 Paletten = 216 €
- usw.
Jetzt kommt es aber durch unterschiedliche...
16.03.2009 13:58:04
Thread-ID: 1060726
4 Beiträge
fortlaufende nummern einfügen
ben

hallo leute
ich habe folgendes problem. in einer spalte a stehen wahllos daten und es können leerzeilen vorhanden sein. jetzt will ich bei betätigung eines button immer wenn in einer zelle der spalte a ein wert auftaucht eine fortlaufende nummer zuordnen. leider bekomm ich es nur hin wenn a...
05.05.2009 10:06:00
Thread-ID: 1072981
13 Beiträge
Fortlaufende Integer-Zahl mittels Zeit & Datum?
Dennis

Hallo Forum,
ich benötige für viele kleine Prozesse eine fortlaufende 8-stellige Integer-Zahl. Dazu wollte ich in der Auto_open() das Datum und die Zeit zu Hilfe nehmen, damit sich die Zahl ganz sicher nicht wiederholt und dann bei jedem Prozess, der eine neue ID verlangt, die Zahl um 1 erh...
25.05.2009 10:59:30
Thread-ID: 1077099
11 Beiträge
fortlaufende Numerierung beim drucken
guido

Moin Moin
bin schon etwas länger auf der Suche nach einem vba Tool für Excel, dass mir beim Ausdruck automatisch die Seiten durch nummeriert nach dem ich die Startseitenzahl festgelegt habe.
Zur kurzen Erklärung:
Ich habe eine Excel Vorlage (DIN A4) erstellt und diese in zwei Seiten...
27.05.2009 12:35:30
Thread-ID: 1077676
5 Beiträge
Fortlaufende Uhrzeit in Statusleiste zei
Lang

Hallo Excelfreunde,
wer kann weiterhelfen? Habe versucht, in der Statusleiste die nachfolgende Prozedur (stammt aus Thema: Ereignis - OnTime, Text-Index: 067199) an's Laufen zu bringen. Es wird nur eine feste Uhrzeit angezeigt. Eine Zellenanzeige brauche ich nicht.
'Public Const gsMacro...
27.06.2009 15:30:36
Thread-ID: 1084832
3 Beiträge
Fortlaufende Nummer
Pedro

Hallo zusammen!
Habe da einen Bericht, der eine fortlaufende Nummer erhalten soll. Und zwar sollte diese Nummer mit dem aktuellen Datum (=HEUTE()) gekoppelt sein. D.h. der Bericht von heute 08.07.2009 hat die fortlaufende Nummer 93, der morgige Bericht die Nummer 94 etc.
Dieser Bericht...
08.07.2009 16:21:10
Thread-ID: 1087234
3 Beiträge
Anzeige
Datum fortlaufend
Ralf

Hallo zusammen, habe ein kleines Problem und hoffe auf Hilfe.
Also ich soll einen Bauzeitenplan erstellen ind habe in der Spalte A eine Zeitschiene mit einem Anfang und einem Ende der Bastelle in einem Datumsvormat eingegeben.
Jetzt ist diese Zeitschiene farblos und es soll als arbeitsf...
15.07.2009 15:18:35
Thread-ID: 1088852
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige