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
- 1681759
Taas puukotus yläristillä!
Tänään taas puukotettu hengiltä ihminen Kuopiontien läheisyydessä yläristillä! Nyt näitä alkaa olla viikoittain!551644Olen päättänyt tappaa itseni tämän vuoden puolella
Minulla ei ole oikeastaan mitään hävittävää. Elämäni on surkeaa ja tunnen ihmisten tuijotukset ja supinat. Ne nauravat r1231237Mitä teillä grillataan juhannuksena? Anna oma vinkkisi grilliherkkuihin
Kesä ja juhannus on grillailun kulta-aikaa. Mitä teillä grillataan juhannuksena? Anna oma vinkkisi grilliherkkuihin. Ka701211- 1111018
Ihana juhannusperinne
Lähdemme aina juhannuksena aivan hirveässä kännissä kiikkerällä veneellä pieliselle! Se on hauskaa ja jännittävää puuhaa56921Mistä tunnistaa suomussalmelaisen kassajonossa
Terveiset täältä Kuopiosta! Olen aikoinaan Suomussalmelta lähtenyt maailmalle ja muutaman mutkan kautta päätynyt savon s90889La 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ää: htt10796Älä itke rakas.
Tunnen sun kyyneleet silmissäni. Kaikki tulee menemään hyvin. Loppu häämöttää jo...57763- 59735