Hirdetés

  2. Fórumok
  3. OS, alkalmazások
  4. Microsoft Excel topic
  5. (kiemelt téma)
  • Téma összefoglaló
    Utoljára frissítve: 2023-11-13 08:31

    Mobilarena

    A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
    Kérdés felvetése előtt olvasd el, ha még nem tetted.

Új hozzászólás Aktív témák

  • #12865 Delila_1 veterán poffsoft #12864
    Új Válasz #12865
    Új hozzászólás
    Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
    Privát üzenet küldése

    Delila_1

    veterán

    válasz poffsoft #12864 üzenetére

    Az évben a húsvét vasárnapját ez a makró számítja ki:

    Function Húsvét(Év As Integer) As Date
    Dim D As Integer
    D = (((255 - 11 * (Év Mod 19)) - 21) Mod 30) + 21
    Húsvét = DateSerial(Év, 3, 1) + D + (D > 48) + 6 - ((Év + Év / 4 + D + (D > 48) + 1) Mod 7)
    End Function

    A feltételes formázásba bevettem a húsvét hétfőjét is. A képlet:
    =VAGY(A1=Húsvét(ÉV(MA()));A1=Húsvét(ÉV(MA()))+1)

    Ennél egyszerűbb, ha évente felveszel két tartományt. Az egyiket nevezd el Ünnepnek, a másikat MNnak. Az első tartalmazza az év összes ünnepnapi dátumát, a másik a munkanappá lefokozott szombatokat (az idén 5-öt). A feltételes formázások:
    =NEM(HIBÁS(FKERES(A1;MN;1;0))) a szomorú szombatokra, és

    =ÉS(NEM(ÜRES(A1));VAGY(HÉT.NAPJA(A1;2)=6;HÉT.NAPJA(A1;2)=7;NEM(HIBÁS(FKERES(A1;Ünnep;1;0)))))
    a hétvégékre és ünnepnapokra.

    Külön is veheted a szombatot, vasárnapot, és az ünnepnapokat, ha az Excel verziód megengedi.

Új hozzászólás Aktív témák