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
335
Vastaukset 2
- 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
- 1501361
Mahdoton tilanne
Täällä monella tuntuu olevan jumissa oleva tilanne. Joillakin kaipuu ja ikävä on kestänyt jo vuosia. Osapuoli/puolet ova97939Välillä tulee haikeus
Et kaikki päättyi näin. Etten saanut vastauksia. Ei meitä oltu tarkoitettu. Niin se vain on.78884Tunteilla leikkiminen
Oletko leikkinyt kaivattusi tai jonkun kiinnostuneen tunteilla, pelannut jotain peliä tai pelleillyt asioilla? Miksi?113825- 41702
- 106597
Mä olin ihan peloissani sun lähellä
Huomasitko? En uskaltanut edes katsoa sua. Näin sivu silmällä sun vinon hymyn. Oliko hyvä vai paha juttu kun tulit lähel22564On ikävä sinua ihana
En jaksa syvempiä tuntoja enää kirjoittaa. Kaipaan sinun läsnäoloa ja läheisyyttä nainen. Hyvää yötä.28533- 45524
Mies miksi me ei voida aloittaa salaista suhdetta
Pakkoko siitä olisi kenellekään kertoa? Voitaisiin nähdä salaa jossain eri paikkakunnalla.69482