Solun 4 viimeistä merkkiä

vb aloittelija

Miten saan valittua ne solut, joiden neljä viimeistä merkkiä on määritelty? Esimerkiksi kun haluan poistaa rivit, joiden solujen arvon neljä viimeistä merkkiä on esimerkiksi päivämäärässä ( ppkkvvvv) 2011?

3

203

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • vb aloittelija

      Nyt kokeilin tällaista, mutta miksihän se ei poista kaikkia kerralla? Joutuu ajamaan makron monta kertaa ennen kuin kaikki halutut on hävinneet; völillä kyllä ottaa kaikki.

      Range("B1:B50").Select

      For Each Cell In Selection
      Vuosi = Val(Right(Cell, 4))
      If Vuosi = "2007" Then
      Cell.EntireRow.Delete

      End If
      Next Cell

      • 6

        Koodi hyppää solun yli, kun poistetaan rivi. Luuppi olisi parempi käydä lopusta alkuun.


      • vb aloittelija
        6 kirjoitti:

        Koodi hyppää solun yli, kun poistetaan rivi. Luuppi olisi parempi käydä lopusta alkuun.

        Joo, yritin luuppia mutten saanut toimimaan. Tuli toinenkin kysymys; jos lasketan rivien määrän, miten saan tuon arvon sisällytettyä Rangeen.

        Pitäisi saada Range("C1:C(RiviMaara)").Select


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Kumpi vetoaa enemmän sinuun

      Kaivatun ulkonäkö vai persoonallisuus? Ulkonäössä kasvot vai vartalo? Mikä luonteessa viehättää eniten? Mikä ulkonäössä?
      Ikävä
      87
      1714
    2. Ei se mene ohi ajan kanssa

      Näin se vaan on.
      Ikävä
      85
      1222
    3. Tavoitteeni onkin ärsyttää

      Sua niin turhaudut ja unohdat koko homman
      Ikävä
      110
      1113
    4. Tunnistebiisi

      Laita joku tunnistebiisi, niin tiedän ett oot täällä ja kaipaat ehkä mua
      Ikävä
      67
      906
    5. Taidat tykätä linnuista paljon

      Mikä on sun lemppari ☺️😉🥹🦢🐦‍⬛🦉🦜🦚
      Ikävä
      102
      874
    6. Okei nyt mä ymmärrän

      Olet siis noin rakastunut, se selittää. Onneksesi tunne on molemminpuolinen 😘
      Ikävä
      56
      818
    7. Miks käyttäydyt noin?

      Välttelet kaikkia kohtaamisia...
      Ikävä
      47
      731
    8. Ei sun tarvi jännittää enää

      en yritä enää mitään. Tiedän että olin mauton ja sössin kaiken.
      Ikävä
      36
      722
    9. Olen huolissani

      Että joku päivä ihastut/rakastut siskooni. Ja itseasiassa haluaisin, ettei hän olisi mitenkään sinun tyyppiäsi ja pitäis
      Ikävä
      47
      671
    10. Minkälainen ääni mulla on mies

      Sinun mielestä?
      Ikävä
      33
      653
    Aihe