Itselläni on makro joka poistaa rivejä, mutta onko millä koodilla saan makron käyttämään kaavasta saatuja arvoja?
Makro:
Rows("8:14").Select
Selection.Delete Shift:=xlUp
Eli millä saan että numero 8 määrittyy kaavan mukaan esim 8 = B8 solu ja 14 olisi B9 solu.
Makro ohjelmointia
jykke3
2
155
Vastaukset
- rivienpoisto
Yksi mahdollinen keino on esim. tällainen. Osaat varmaan soveltaa itsellesi sopivan.
Sub poistaRivit()
Range("A1").Select
alku = ActiveCell.Value
Range("B1").Select
loppu = ActiveCell.Value
Rows(alku & ":" & loppu).Select
Selection.Delete Shift:=xlUp
Range("A1").Select
End Sub Sub poistaRivit()
On Error Resume Next
Rows(Range("B8") & ":" & Range("B9")).Delete
End Sub
Keep EXCELing
@Kunde
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Vain vasemmistolaiset rakennemuutokset pelastavat Suomen
Kansaa on ankeutettu viimeiset 30+ vuotta porvarillisella minäminä-talouspolitiikalla, jossa tavalliselta kansalta on ot1313970- 203558
Purra on kantanut vastuuta täyden kympin arvoisesti
Luottoluokituksen lasku, ennätysvelat ja ennätystyöttömyys siitä muutamana esimerkkinä. Jatkakoon hän hyvin aloittamaans173407- 793357
Persut huutaa taas: "kato! muslimi!"
Persut on lyhyessä ajassa ajaneet läpi kaksi työntekijöiden oikeuksien heikennystä, joita se on aiemmin vastustanut. Pe613254- 493061
- 292925
- 802769
- 542677
- 192387