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?
Solun 4 viimeistä merkkiä
vb aloittelija
3
175
Vastaukset
- 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
20e Riskitön veto 20e talletuksella VB:lle
Pssst! Vinkki viis rotvallinreunalla eläjille. VB tarjoaa 20 euron riskittömän vedon ensitallettajille vedonlyöntiin.42437- 1161607
Viiimeinen viesti
Sinulle neiti ristiriita vai mikä nimesi sitten ikinä onkaan. Mulle alkaa riittää tää sekoilu. Oot leikkiny mun tunteill361346Analyysiä: Kiuru-keissi oli ja meni - demarit hävisi tässäkin
Tapauksen tultua julki alkoi demarit ja muu vasemmisto selittään, että tämä oli poliittista väkivaltaa, siis ennen kuin1561181- 521095
- 1131082
- 571041
Suomessa on valittava 2 lucia neitoa...
Maahanmuuttajille oma lucia neito ja Suomalaisille oma SUOMALAINEN Lucia neito....sama juttu on tehtävä miss Suomi kisoi1051034Olet tärkeä
mutta tunnen jotain enemmän ja syvempää. Jos voisinkin kertoa sinulle... Olen lähinnä epätoivoinen ja surullinen.46909- 60882