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
334
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
Taas puukotus yläristillä!
Tänään taas puukotettu hengiltä ihminen Kuopiontien läheisyydessä yläristillä! Nyt näitä alkaa olla viikoittain!642187Mitä teillä grillataan juhannuksena? Anna oma vinkkisi grilliherkkuihin
Kesä ja juhannus on grillailun kulta-aikaa. Mitä teillä grillataan juhannuksena? Anna oma vinkkisi grilliherkkuihin. Ka901459La Promesa sarjan ystäville iso pettymys - Yleltä lisäinfoa asiasta
La Promesa suosikkisarjan kohtalosta on tullut tietoa. Tämä ei kyllä välttämättä ilahduta sarjan faneja. Lue lisää: htt141264- 1101123
- 1011047
- 107832
Nyt kun olen vähän huppelissa niin uskallan sanoa
Mikä minua oikein närästää... Tiedän että meillä on ollut vaikeaa mutta miten kauan sulla on ollut toinen mies vai oliko54702Työttömät risusavottaan
Tuli tässä juhannusnuotiolla sellainen idea mieleen, että miksei työttömiä velvoiteta tekemään hanttihommia, kuten risus262588- 59576
- 38574