HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Nächster Thread

Vorwärts blättern

Inhaltsverzeichnis

Arbeitstage ausfüllen

Forumthread: Arbeitstage ausfüllen
16 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Arbeitstage ausfüllen

02.05.2025 18:24:33

NicoHendrik

Hallo, Nico schon wieder,

Wenn ich in Spalte C ein Name eingebe, muss von K bis NL eine 5 drinstehen (hell grüne Farbe, Bedingte Formatierung.) Dadurch kann ich die Arbeitstage schön zählen.

Am Anfang ging so einigermaßen jetzt aber gar nicht mehr. Dies muss natürlich auch möglich sein für mehre Tabellen in eine Mappe.

Der Code steht in der Tabelle.

Bitte um Hilfe

Gruß Nico

https://www.herber.de/bbs/user/177309.xlsm

16
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Arbeitstage ausfüllen

02.05.2025 19:57:07

Uduuh
AW: Arbeitstage ausfüllen

03.05.2025 03:27:59

Piet
AW: Arbeitstage ausfüllen

03.05.2025 06:05:16

NicoHendrik
AW: Arbeitstage ausfüllen

03.05.2025 06:28:04

NicoHendrik
AW: Arbeitstage ausfüllen

03.05.2025 08:27:44

NicoHendrik
AW: Arbeitstage ausfüllen

03.05.2025 09:21:03

NicoHendrik
Das ist eigentlich...

03.05.2025 09:52:35

Case
AW: Das ist eigentlich...

03.05.2025 10:05:16

NicoHendrik
AW: Das ist eigentlich...

03.05.2025 11:55:29

NicoHendrik
Das hier sollte...

03.05.2025 15:26:27

Case
AW: Das hier sollte...

03.05.2025 16:08:48

NicoHendrik
AW: Arbeitstage ausfüllen

02.05.2025 21:01:54

NicoHendrik
AW: Arbeitstage ausfüllen

02.05.2025 21:30:44

Eifeljoi 5
AW: Arbeitstage ausfüllen

02.05.2025 22:10:02

NicoHendrik
Irgendwo im Code hab ich ein Fehler drin.

02.05.2025 22:14:31

Uduuh
AW: Irgendwo im Code hab ich ein Fehler drin.

02.05.2025 22:40:56

Eifeljoi 5

AW: Arbeitstage ausfüllen

02.05.2025 19:57:07

Uduuh

Hallo,
fcFreieTage() ist nicht definiert.
Was soll das sein?

Gruß aus'm Pott
Udo

AW: Arbeitstage ausfüllen

03.05.2025 03:27:59

Piet

Hallo Nico

hast du irgendwo noch eine alte Datei, mit dem ursprünglich funktionierendem Code??
Falls nein mein Rat aus eigener böser Erfahrung, vor Code Änderungen immer eine Kopie Datei erstellen.

mfg Piet

AW: Arbeitstage ausfüllen

03.05.2025 06:05:16

NicoHendrik

Hallo Piet,

die hat mal mehr oder weniger funktioniert

Gruß Nico

https://www.herber.de/bbs/user/177315.xlsm

AW: Arbeitstage ausfüllen

03.05.2025 06:28:04

NicoHendrik

Hallo Piet,

die halbwegs funktionierende Datei hab ich gepostet. Wenn ich zb. alle Namen lösche, geht es manchmal. Ein klares Muster kann ich aber leider nicht erkennen.
Was mal verwundert hat, ist das das mal sehr schön funktionierte und dann ohne mein Zutun Ärger machte.

Gruß Nico

AW: Arbeitstage ausfüllen

03.05.2025 08:27:44

NicoHendrik

Hallo Piet,

eigentlich muss das so sein, das wenn ich ein Name eintrage die ganze Zeile K bis NL mit eine 5 ausgefüllt wird. Wenn er dann gelöscht wird, die Zeile K bis NL dann auch gelöscht wird. Wenn dieser Code dann vor den Code wo die freien Tage und die Feiertage ausgewertet werden gesetzt wird, muss sie doch funktionieren. (War früher mal SPS-Programmierer und da hat der letzte Befehl immer Vorrang)

Zur Info. Die freien Tage sind in den Zellen I1 und J1

Ich weiß nicht!

Gruß Nico, hier wird es langsam kalt.

AW: Arbeitstage ausfüllen

03.05.2025 09:21:03

NicoHendrik

Hallo Piet,

Folgendes hab ich festgestellt:

1) wenn ich einen Name eintrage, macht der Code das richtig. Mit den 2. aber dann nicht mehr.
Wenn ich nach den ersten Name "Tabelle aufräumen" betätige macht er beim 2. Name das richtig.

2) Wenn ich mehr as 2 Namen (also im Block) lösche geht der Code auf Störung (If Target.Value > "" Then)

Gruß Nico

Das ist eigentlich...

03.05.2025 09:52:35

Case

Moin Nico, :-)

... klar: ;-)

Du schaltest hier (zum zweiten Mal) die Events ab - und nicht mehr ein: ;-)

'...

Dim s As Long, cel As Range, FT As Variant

On Error GoTo errExit

Application.EnableEvents = False

'...

Schalte die nach "errExit:" wieder ein: ;-)

'...

errExit:

Application.EnableEvents = True

End Sub

Dann geht es zumindest wieder. Man sollte den Code aber mal "aufräumen" und klar strukturieren. ;-)

Servus
Case

AW: Das ist eigentlich...

03.05.2025 10:05:16

NicoHendrik

Vielen Dank Case,

funktioniere jetzt.

Mit dem Aufräumen, naja, so weit bin ich noch lange nicht. Bin erst vor ca. 1/2 Jahr mit Excel angefangen und mein Alter
erlaubt es mir auch nicht, noch ein Excel Experte zu werden.

Groß Nico

AW: Das ist eigentlich...

03.05.2025 11:55:29

NicoHendrik

Hallo Case,

ich hab noch folgende Probleme versgestellt:

1) Wenn ich mehre Namen (also im Block) lösche, kommt Laufzeit Fehler 13. Danach funktioniert das Ausfüllen nicht mehr, auch nicht,
wenn ich die Datei schliesse und wieder öffne. Das geht erst wieder wenn ich mit den Rechner einen Neustart gemacht habe.

2) Obwohl ich ein sehr schnellen Rechner habe, empfinde ich es sehr langsam wie die Zellen ausgefüllt werden, wenn ein Name eingetragen wurde.

Gruß Nico

Das hier sollte...

03.05.2025 15:26:27

Case

Moin Nico, :-)

... etwas schneller laufen und auch für mehrere beim reinkopieren in C klappen: ;-)
https://www.herber.de/bbs/user/177324.xlsb

Man könnte/müsste da noch etwas aufräumen, aber ich bin ehrlich - da habe ich gerade keine Lust zu. ;-)

Wie sagt mein bei uns so schön - frei nach Torfrock: "Hier wird gerudert und nicht geschludert!". ;-)

Servus
Case

AW: Das hier sollte...

03.05.2025 16:08:48

NicoHendrik

Case, ich dank dir trotzdem für deine Mühe.

Grüsse aus den hohen Norden

AW: Arbeitstage ausfüllen

02.05.2025 21:01:54

NicoHendrik

Frei Tage kann mann oben einstellen. Die frei Tage sind nicht immer die Wochenenden

Gruß Nico

AW: Arbeitstage ausfüllen

02.05.2025 21:30:44

Eifeljoi 5

Hallo

Nochmals!!!
A) Ist der Aufbau so Fix??
B) Wenn Ja ist das immer nur für maximal ein Jahr??
C) Für welches Bundesland sollen die Feiertage zählen??
D) Ist dir bewusst das bei diesem Aufbau die oben aus zu wählenden freien Tagen für alle Mitarbeiter gleich sein müssen??
E) Darf es eine xlsx Datei sein?
F) Wenn alles mit Ja ist darf Power Query genutzt werden?

AW: Arbeitstage ausfüllen

02.05.2025 22:10:02

NicoHendrik

Mir geht es nur darum den Fehler den ich bei dem Code gemacht hab zu reparieren.

Aufbau ist fix
Nur VBA ist hier möglich
Ohne Macros geht es nicht
Die freien Tage können schon jetzt für jeden Eintrag verändert werden
Power Query Nein

Irgendwo im Code hab ich ein Fehler drin. Alles lieft schon mal

Irgendwo im Code hab ich ein Fehler drin.

02.05.2025 22:14:31

Uduuh

hab ich dir doch schon geschrieben. fcFreieTage fehlt.

AW: Irgendwo im Code hab ich ein Fehler drin.

02.05.2025 22:40:56

Eifeljoi 5

Hallo Uduuh

Das die Feiertage fehlen ist mir auch schon aufgefallen.
Ich würde den VBA zum laufen bringen, aber dazu habe ich kein Bock mehr mit so was ab zu geben.
Ich bin jetzt komplett hier raus.

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