Ak chcete automaticky aktualizovať dnešný deň v týždni, tento článok je pre vás. Tento článok sa zameriava na aktualizáciu používateľa v aktuálny deň v týždni prostredníctvom programu msgbox vo vba.
Otázka): Chcem kód na určenie dňa v týždni.
Na spustenie editora VB musíme postupovať podľa nižšie uvedených krokov
- Kliknite na kartu Vývojár
- Zo skupiny kódov vyberte Visual Basic
- Kliknite na Vložiť a potom na Modul
- Tým sa vytvorí nový modul
- Do modulu zadajte nasledujúci kód
Sub TodaysDay ()
Vyberte Case CasePart („w“, Date, vbMonday)
Prípad 1
MsgBox „Po“
Prípad 2
MsgBox „Ut“
Prípad 3
MsgBox „Streda“
Prípad 4
MsgBox „Thur“
Prípad 5
MsgBox „Pia“
Prípad 6
MsgBox „so“
Prípad 7
MsgBox „Slnko“
Ukončiť výber
Koniec pod
Poznámka: Dnešný dátum je 5. júna 2015, t.j. piatok
“VbMonday” používa sa na vrátenie pondelka ako prvého dňa v týždni; v prípade, že nedeľa je prvým dňom v týždni, potom musíte použiť “Vb Nedeľa”
- Okno makra otvoríte stlačením klávesovej skratky ALT + F8
- Vyberte makro, ktoré ste práve vytvorili
- Kliknite na Spustiť a my dostaneme názov dnešného dátumu.
- Ak chcete zmeniť formát z piatka na piatok
- V kóde musíte vykonať malé zmeny
Sub TodaysDay ()
Vyberte Case CasePart („w“, Date, vbMonday)
Prípad 1
MsgBox „pondelok“
Prípad 2
MsgBox „utorok“
Prípad 3
MsgBox „Streda“
Prípad 4
MsgBox „Štvrtok“
Prípad 5
MsgBox „Piatok“
Prípad 6
MsgBox „sobota“
Prípad 7
MsgBox „nedeľa“
Ukončiť výber
Koniec pod
- Tentokrát budete môcť zobraziť celé meno dňa.
V tomto môžeme použiť pole správ VBA na upozornenie používateľa na aktuálny deň v týždni.
