Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 10:38:52
Bedingte Formatierung per VBA / MaxPoint
25.04.2024 10:30:04
Suche mit MINWENNS und Rückgabe mehrerer Werte
25.04.2024 09:47:49
Daten aus mehreren Dateien untereinander importieren
25.04.2024 09:31:31
Bild "In Zelle platzieren"
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
196to200
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
196to200
196to200
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wochentag in VBA abfragen

Wochentag in VBA abfragen
31.12.2002 00:13:53
Franz
Hallo Fachleute,

folgende VBA-Zeile ist falsch, aber sie zeigt vielleicht was ich rauskriegen möchte:

IF Wochentag von Cells(t,m) gleich Sonntag THEN

Kann mir bitte jemand sagen, wie das richtig heißen muss?

Danke im Voraus

Gruß Franz

18
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Wochentag in VBA abfragen
31.12.2002 00:18:37
Boris
Hallo Franz,

in A5 steht dein Datum:

7 ist gleich Sonntag, wenn du den Parameter bei Weekday auf 2 stellst. Ansonsten ist Sonntag 1.

Gruß Boris

Re: Wochentag in VBA abfragen
31.12.2002 00:19:45
r.sch.
Hi Franz
setze für die einzelnen Tage ... =1 .. usw bis 7
Gruß
Reinhard
Re: Wochentag in VBA abfragen
31.12.2002 00:31:54
Franz
Hallo Boris,

vielen Dank für Deine Antwort. Ich habe nicht ein Datumsfeld, sondern einen ganzen Kalender und möchte per VBA den Samstag und den Sonntag einfärben. Kannst Du mir da bitte weiterhelfen?

Gruß Franz

Re: Wochentag in VBA abfragen
31.12.2002 00:46:08
Thomas Scher
Hallo Franz,
warum nimmst du denn nicht eine Bedingte Formatierung ??

Wenn Zellwert gleich "Samstag" dann Rot oder so ??

Gruß

Thomas

Anzeige
Re: Wochentag in VBA abfragen
31.12.2002 00:52:36
Boris
Hallo Franz,

also das war aus deiner Frage nun wirklich nicht ersichtlich.
Prinzipiell geht das genauso mit dem Makro:

Sub test()
If Weekday(Cells(x,y), 2) > 5 Then
Cells(x,y).Interior.Colorindex = 3
End If
End Sub

und das ganze in eine For-Next-Schleife einbinden.
Aber der Hinweis ist ja bereits gekommen:
Nutze einfach die bedingte Formatierung.

Gruß Boris

Re: Wochentag in VBA abfragen
31.12.2002 01:01:17
Franz
Hallo Thomas,

aus zwei Gründen: erstens wird der Kalender ohnehin durch ein Makro erzeugt mit noch ein paar anderen Dingen dazu. Und zweitens habe ich dann die drei Möglichkeiten der bedingten Formatierung frei für anderes.

Gruß Franz

Anzeige
Re: Wochentag in VBA abfragen
31.12.2002 01:09:22
Franz
Hallo Boris,

tut mir leid, wenn ich nicht klar geschrieben habe. Aber ich habe trotzdem noch ein Problem: ich bekomme jetzt in der Zeile
If Weekday(Cells(t, m), 2) > 5 Then
die Fehlermeldung: Typen unverträglich.

Mit der bedingten Formatierung klappts doch auch !?!
Die Formatierung der Zelle ist
Was mache ich falsch???

Gruß Franz


Re: Wochentag in VBA abfragen
31.12.2002 01:13:14
Franz
Hallo Boris,

Nachtrag, ist was abgeschnitten: die Formatierung ist:
Benutzerdefiniert : "T."

Franz

Re: Wochentag in VBA abfragen
31.12.2002 09:04:16
andre
hallo franz,
steht dort auch wirklich ein datum bzw. eine Zahl?
der fehler kommt bei mir (ex8) nur, wenn dort (noch) andere zeichen stehen.
gruss andre
Anzeige
Re: Wochentag in VBA abfragen
31.12.2002 09:15:29
Franz
Hallo Andre,

Danke für Deine Antwort. Es steht tatsächlich nur die Zahl und der Punkt drin, definiert als: Benutzerdefiniert "T.": 1. | 2. | 3. usw. Allerdings steht natürlich die Formel drin, die das Datum berechnet. Kann es daran liegen?

Gruß

Franz

Re: Wochentag in VBA abfragen
31.12.2002 09:43:54
andre
hallo franz,
hatte auch =heute() drin, und damit gings. aber poste mal deine formel, sonst kann ich nichts weiter dazu sagen.
gruss andre
Re: Wochentag in VBA abfragen
31.12.2002 10:01:32
Franz
Hallo Andre,

Das Jahr steht in A1.
In der C2 Zelle des 1. Januar steht: =DATUM($A$1;1;1)
In C3 für den 2. Januar steht: =+C2+1 usw.

Gruß Franz

Re: Wochentag in VBA abfragen
31.12.2002 10:38:36
Boris
Hallo Franz,

geh unter Format - bedingte Formatierung.
Markiere C2 bis C367 (oder wie weit auch immer), beginnend bei C2.

Formel ist:
=WOCHENTAG(C2;2)>5 und Format zuweisen. Fertig.

Gruß Boris

Anzeige
Re: Wochentag in VBA abfragen
31.12.2002 10:40:52
andre
hallo franz,
läuft.

gruss andre
Re: Wochentag in VBA abfragen
31.12.2002 10:55:59
Franz
Hallo Boris,

ja ist klar, das klappt ja auch. Aber ich habe ja versucht das mit VBA zu machen, damit die 3 Bedingungen unter Bedingte Formatierung für anderes frei bleiben. Und da habe ich eben bei Deinem gestrigen Vorschlag die Meldung Typen unverträglich bekommen. Trotzdem danke, ich versuch's weiter.

Gruß Franz

Re: Wochentag in VBA abfragen
31.12.2002 10:58:32
Franz
Hallo Andre,

danke, ich versuche es nochmal. Kann jetzt grad leider nicht (hab ein paar Kinder zu versorgen :-)), melde mich später wieder.

Gruß Franz

Re: Wochentag in VBA abfragen
31.12.2002 11:25:47
Franz
Hallo Andre,

klappt nicht, bekomme nach wie vor die Meldung: Typen unverträglich und markiert ist dabei die Zeile: If Weekday(Cells(t - 1, m), 2) > 5 Then.
Hier mal mein kompletter Code, vielleicht findest Du ja den Fehler:

For t = 3 To 58 Step 5 ' Schleife für Monate
For m = 3 To 33 ' Schleife für Tage pro Monat
Cells(t, m).Font.ColorIndex = -4105 ' Feiertagszeilen Textfarbe automatisch
Cells(t - 1, m).Interior.ColorIndex = -4142 ' Datumszeilen Hintergrundfarbe automatisch
Cells(t, m).Interior.ColorIndex = -4142 ' Feiertagszeilen Hintergrundfarbe automatisch
Cells(t, m).Font.FontStyle = "Fett" ' Feiertagszeilen Schriftschnitt
Cells(t + 1, m).Interior.ColorIndex = -4142 ' Urlaubszeilen Hintergrundfarbe automatisch
If Weekday(Cells(t - 1, m), 2) > 5 Then
Cells(t - 1, m).Interior.ColorIndex = 3
End If
Next m ' Schleifenzähler (For m)
Next t ' Schleifenzähler (For t)

Gruß Franz

Anzeige
Re: Wochentag in VBA abfragen
31.12.2002 11:41:55
andre
hallo franz,
da brauch ich mal das blatt dazu. maile es mir mal bitte. der code alleine dürfte i.o. sein.
gruss andre

90 Forumthreads zu ähnlichen Themen

Datum aus Tag, Jahr, KW auslesen
Stephan

Gibt es eine Möglichkeit das Datum auszulesen aus:
Mo = Montag
Jahr=2008
KW=1
Besten Dank
Stephan
16.08.2008 22:23:00
Thread-ID: 1002369
7 Beiträge
Anzeige
Datum bestimmen aus Arbeitstage
Patricio

Hallo Leute,
ich suche jetzt schon über einer Std. und kann nichts finden. Jetzt brauche ich eure Hilfe. Es geht um eine Datumserrechnung.
In Spalte A steht ein Datum (z.B. heute). In Spalte B Anzahl von Arbeitstagen. In Spalte C soll das Datum errechnet werden, das sich aus der Summe d...
31.03.2009 23:17:37
Thread-ID: 1065778
3 Beiträge
Wochentag aus Zelle mit Datum
MikeM

Hallo zusammen,
hab ein Problem und hoffe auf eine Lösung.
Ich möchte mir gerne aus einem Datum den Wochentag anzeigen lassen - allerdings als Text.
Beispiel:
Zelle A1 = 11.02.2009 (formatiert als TT, da ich nur den Tag brauche, also 11, da es sich um einen Kalender handelt)
...
18.05.2009 14:47:49
Thread-ID: 1075909
4 Beiträge
Anzeige
Wochentag aus Datum | Herbers Excel-Forum
pweksictul
Hi,
ich habe eine Zelle mit einem Datumswert (z.B. "01.01.2010"), die benutzerdefinert formatiert ist "TTT", in dem Fall wird also "Fr" angezeigt. Nun möchte ich über ein Makro alle Zellen mit "So" hellgrau hinterlegen. Wie letztere geht, weiß ich, aber mit ActiveCell.Value kann ich nur auf den...
13.01.2010 16:42:32
Thread-ID: 1129588
4 Beiträge
Wochentag aus Datum zählen
Bastian

Hallo,
ich habe einen Zeitraum von zwei Wochen. Also von 07.6.2010 bis 22.6.2010. In die Spalte A habe ich die Werbungen, die in der Spalte B eingetragene Datums angezeigt werden. Jede Werbung kann einmal, oft oder niemals angezeigt werden. Zur Veranschaulichung werde ich versuchen, meine F...
10.06.2010 19:38:20
Thread-ID: 1161311
5 Beiträge
VBA: Tagesdatum auf 3 Zellen aufteilen
KlausF

Hallo Forum,
ich stehe gerade vor folgendem Problem:
Ich habe einen Button, der zellfüllend in einer beliebigen Zelle steht, z.B. in A2
Ich möchte jetzt auf Klick immer das heutige Tagesdatum wie folgt aufteilen:
die darüber liegende Zelle (hier A1) bekommt den Tag von Heute() i...
15.10.2010 15:37:47
Thread-ID: 1182643
4 Beiträge
Monatstage aus Datumsbereich errechnen
MathiasW.

Hallo Excel Freunde,
ich möchte aus Start- u. Enddatum, die Tage für jeden Monat im Datumsbereich errechnen.
Dazu habe ich in Zelle B2 das Startdatum, in Zelle B3 ist das Enddatum.
In den Zellen D2:D13 stehen die Monatsnamen Januar bis Dezember, daneben in E2:E13 sollen die Ergebnis...
19.01.2011 18:33:09
Thread-ID: 1196502
3 Beiträge
VBA Code / Freitags Werte aus Zelle auslesen
potetos00

Guten Tag,
ich bitte um Hilfe für folgendes Problem:
ich möchte aus den Arbeitsblatt "Berechnung" den Wert der Zelle "E5" JEDEN FREITAG auslesen. Dieser Wert soll dann in das Arbeitsblatt "Übersicht" in die Zelle "D2" eingetragen werden. In der Zelle E5 steht immer eine Zahl.
z.b: a...
20.08.2011 15:08:34
Thread-ID: 1226909
10 Beiträge

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
6
2
2
3
5
3
4
3
2
9
3
5
2
7
1
2
10
2
3
12
9
19
11
10
12