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

Kalenderwoche in VBA

Forumthread: Kalenderwoche in VBA

Kalenderwoche in VBA
25.07.2002 15:56:22
Darwin
Nochmal Hilfe!
Hoffe ich nerve noch nicht :-)

Suche einen Weg mit dem ich in VBA die aktuelle Kalenderwoche herausbekomme.
Wer kann mir helfen?

Gruss Darwin

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Kalenderwoche in VBA
25.07.2002 15:59:16
Otto Ecker
aus einem alten Posting

Gruß Otto

Re: Kalenderwoche in VBA
25.07.2002 16:05:26
wope
? datepart("w",date)
Re: Kalenderwoche in VBA
25.07.2002 16:06:24
Nepumuk
Hallo Darwin
DatePart("ww", dein-datum , vbMonday, vbFirstFourDays)
Gruß
Nepumuk
Anzeige
Re: Kalenderwoche in VBA
25.07.2002 17:17:47
schauan
eventuell gehts auch so (jedenfalls ging's bei 97 noch):
Format(Now, "ww", vbMonday)
vbMonday wenn die Woche Montags beginnt, wie allgemein üblich.
gruss andre
;

Forumthreads zu verwandten Themen

Kalender mit KW und Datum
Johannes

Guten Morgen,
Ich hoffe ihr könnt mir bei meinem Problem helfen:
Ich wollte mir einen Jahreskalender erstellen der mir die KW anzeigt.
Das habe ich auch so hinbekommen.
Ist es aber möglich in eine Zelle ein Datumsbereich zu schreiben.
Also bei mir in J7 steht KW 4 und in der...
06.10.2016 08:58:14
Thread-ID: 1518276
7 Beiträge
aktuelle Kalenderwoche
Nadine

Hallo ihr Lieben,
ich hab ein kleines Excel-Problem.
Meine Tabelle ist wie folgt aufgebaut:
- in Spalte C stehen Namen
- in Zeile 9 die Kalenderwochen des Jahres.
- und dazwischen Arbeitsstunden, die jeder MA pro Woche gearbeitet hat oder arbeiten wird
Mein Problem:
...
16.06.2017 09:18:32
Thread-ID: 1564374
7 Beiträge
Anzeige
Suchen nach aktueller kalenderwoche
stormlamp

Hallo Zusammen,
mit diesem Script suche ich in Zeile 1 den Wert "5":
Rows("1:1").Select Selection.Find(What:="5", After:=ActiveCell, LookIn:=xlFormulas, LookAt _ :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _ False, SearchFormat:=False).Activate Wie muss der Co...
18.07.2019 09:04:33
Thread-ID: 1703067
4 Beiträge
Einlesen der aktuellen Kalenderwoche?
MikeS

Hallo,
kann ich in Visual Basic die aktuelle Kalenderwoche in eine Variable einlesen lassen???Vielen Dank für die Antwort!
lg, MikeS
:-)
05.12.2002 08:48:29
Thread-ID: 189125
3 Beiträge
Aktuelle Kalenderwoche einfügen
Alex H.
hallo!

wie kann ich in eine zelle auf "knopfdruck" die aktuelle kalenderwoche einfügen
lassen?

danke!
02.10.2003 09:26:57
Thread-ID: 317994
6 Beiträge
Aktuelle Woche anzeigen
patrick

Hallo Leute,
eine Frage kurz:
wie kann ich in Excel immer automatisch aktuelle Wochenzahl anzeigen lassen?
Wochendauer ist normal immer ab Montag bis Sonntag ist.!
So das z.B diese Woche immer WOCHE 20 in eine Zelle angezeigt ist, nächste Woche ab Montag WOCHE 21 usw..
Danke...
19.05.2006 07:15:11
Thread-ID: 765678
4 Beiträge
Aktueller Aufruf der Kalenderwoche
schwatzbaer

hallo,
ich soll für nen Freund einen Stundenzettel erstellen bei dem die aktuelle Kalenderwoche immer aktualisiert wird.
benötige Hilfe da ich davon ausgehe das ich ein makro schreiben muss.
Dank für eure Mühen
Schwatzbaer
12.03.2007 10:56:50
Thread-ID: 853475
3 Beiträge
Aktuelle Kalenderwoche zu einem Datum
Herbert

Hallo ihr Profis
Durch einen heutigen Beitrag bin ich darauf gekommen, dass ich ein ähnliches Problem habe, für welches ich bis dato keine Lösung gefunden habe.
Aufgabenstellung:
Zu einem Datum soll jeweils die aktuelle Kalenderwoche angezeigt werden.
Grundsätzlich brache ich j...
15.06.2007 12:53:16
Thread-ID: 878258
3 Beiträge
Anzeige
Kalender Steuerelement mit KW?
Vinz

Hallo Exceler(-innen),
ich möchte über ein Kalender-Steuerelement auch eine DIN-KW passend anzeigen und auswählen können. Kennt hierfür irgendwer eine Lösung? Sollte dann etwa so aussehen:
KW...Mo...Di...Mi...Do...Fr...Sa...So
48.......................................1.....2
49....
13.12.2007 19:03:50
Thread-ID: 934692
18 Beiträge
Kalender mit Schicht u. KW Anzeige ?
Wilfried

Hallo Leute und prost Neujjahr, vielleicht könnt Ihr helfen, der Einfachheit halber habe ich meine Tabelle hier abgelegt: Die Datei https://www.herber.de/bbs/user/48759.xls wurde aus Datenschutzgründen gelöscht Ich möchte im Feld A9(rot markiert) einmal F(rühschicht) oder S(Spätschicht) einsetz...
02.01.2008 17:56:15
Thread-ID: 938363
7 Beiträge
Kalender mit KW
Holger
Einen schönen Abend wünsche ich.
Habe einen variablen Kalender mit Kalenderwochen in rot.
Dei KW´s stehen über den Wochentagen.
Am liebsten wäre mir, dass die KW nur immer über die Montags steht, also immer nur einmal.
Komme da leider nicht alle weiter, würde mich über einen Tip sehr...
07.02.2023 22:40:47
Thread-ID: 1919402
7 Beiträge
Aktuelle Kalenderwoche aus Datensatz
Chrisi
Hallo liebe Excel Community,

ich programmiere gerade ein Makro und bin jetzt bei folgendem Punkt:

Ich habe einen Datensatz in meinem Tabellenblatt "Alle_Daten" wobei je weiter man nach unten geht der Datensatz immer weiter zum aktuellen Datum kommt.

Ich habe noch ein Tabe...
19.06.2023 13:45:55
Thread-ID: 1934159
16 Beiträge
Anzeige

Infobox / Tutorial

Kalenderwoche in VBA ermitteln

Schritt-für-Schritt-Anleitung

Um die aktuelle Kalenderwoche in VBA zu ermitteln, kannst du die folgende Schritt-für-Schritt-Anleitung befolgen:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Füge ein neues Modul hinzu, indem du mit der rechten Maustaste auf "VBAProject (DeineDatei.xlsx)" klickst, dann "Einfügen" und "Modul" wählst.

  3. Kopiere den folgenden Code in das Modul:

    Sub AktuelleKalenderwoche()
   Dim kw As Integer
   kw = Application.WorksheetFunction.WeekNum(Date, vbMonday)
   MsgBox "Die aktuelle Kalenderwoche ist: " & kw
End Sub

  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Führe das Makro aus, um die aktuelle Kalenderwoche anzuzeigen.

Häufige Fehler und Lösungen

  • Fehler: "Der Name 'Application' ist nicht definiert."

    • Lösung: Stelle sicher, dass du den vollständigen Code korrekt kopiert hast. Überprüfe, ob die Excel-Referenzen im VBA-Editor aktiv sind.

  • Fehler: Es wird immer '1' angezeigt.

    • Lösung: Überprüfe, ob du das richtige Datum verwendest. Der WeekNum-Funktionsaufruf sollte korrekt auf das aktuelle Datum zeigen.

Alternative Methoden

Es gibt mehrere Wege, um die Kalenderwoche in Excel VBA zu ermitteln:

  1. DatePart-Funktion:

    Sub KalenderwocheMitDatePart()
   Dim kw As Integer
   kw = DatePart("ww", Date, vbMonday, vbFirstFourDays)
   MsgBox "Die aktuelle Kalenderwoche ist: " & kw
End Sub

  2. Format-Funktion:

    Sub KalenderwocheMitFormat()
   Dim kw As String
   kw = Format(Now, "ww", vbMonday)
   MsgBox "Die aktuelle Kalenderwoche ist: " & kw
End Sub

Beide Methoden zeigen dir die aktuelle Kalenderwoche an.

Praktische Beispiele

Hier sind einige praktische Beispiele für die Verwendung der aktuellen KW in verschiedenen Situationen:

  • Aktuelle Kalenderwoche in einer Zelle anzeigen:

    Sub KWInZelle()
   Cells(1, 1).Value = "Aktuelle KW: " & Application.WorksheetFunction.WeekNum(Date, vbMonday)
End Sub

  • Kalenderwoche in einem Bericht nutzen: Du könntest die Kalenderwoche in einem Bericht verwenden, um wöchentliche Daten zu aggregieren oder zu analysieren.

Tipps für Profis

  • Nutze Access VBA, um die Kalenderwoche auch in Datenbanken zu ermitteln, was besonders nützlich für Reporting-Zwecke ist.
  • Es ist hilfreich, die Funktionalitäten von Excel und VBA zu kombinieren, um dynamische Berichte zu erstellen, die sich automatisch an die aktuelle Kalenderwoche anpassen.

FAQ: Häufige Fragen

1. Wie kann ich die aktuelle Kalenderwoche in Excel anzeigen? Für die Anzeige der aktuellen Kalenderwoche in Excel kannst du die oben beschriebenen VBA-Makros verwenden. Alternativ kannst du auch die Funktion =WEEKNUM(HEUTE(), 2) in eine Zelle eingeben.

2. Was ist der Unterschied zwischen WeekNum und DatePart? WeekNum gibt direkt die Kalenderwoche zurück, während DatePart mehr Flexibilität bietet, um verschiedene Teile eines Datums zu extrahieren.

Beliebteste Forumthreads (12 Monate)

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