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

    LOGOUT

    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

  • #43885 Fferi50 Topikgazda oke #43884
    Új Válasz #43885
    Ú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

    Fferi50

    Topikgazda

    válasz oke #43884 üzenetére

    Szia!
    Kérdések:
    A D oszlop celláiban egy-egy feltétel (szó) szerepel? Mert akkor vagy kapcsolat van a feltételek között. Ezt ki lehet értékelni egyetlen kifejezéssel:
    If "alma,körte,eper,csoki,autó" Like "*" & Range("D1").Value & "*" then Range('"A1").Interior.Color=vbYellow
    Ha az egész oszlopot nézed, akkor pedig For Each ciklus használható:
    Dim cl as Range
    For Each cl In Range("D1:D5000").Cells
    If cl.Value="" Then Exit For 'ha nincs érték a cellában, kilépünk a ciklusból
    If "alma,körte,eper,csoki,autó" Like "*" & cl.Value & "*" then cl.Offset(0,-3).Interior.Color=vbYellow
    Next
    Az "alma,körte,eper,csoki,autó" helyére a szűrni kívánt szöveget írd be.
    A Like operátor a mintához hasonlót keresi, tehát az 5 közül bármelyik feltétel fennál, a színezés megtörténik.

    Üdv.

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