Makro ohjelmointia

jykke3

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.

2

336

    Vastaukset 2

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • 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

    1. Suomalaisten pinna paloi - Ärsytys iskee uudesta TTK-juontajasta "Eihän tälle voi kun nauraa"

      Oliko Veronica Verho hyvä valinta TTK-juontajaksi? Uuden TTK-juontajan henkilöllisyyttä on arvailtu siitä asti, kun Va
      Suomalaiset julkkikset
      58
      1686
    2. Nainen, onko sinussa sitä aitoa feminiinisyyttä jäljellä

      Vai onko se jäänyt meikkien, korujen, hameiden ym. alle peittoon? Onko naisellisuutesi aitoa vai opetettua? Jos teet nai
      Ikävä
      365
      1172
    3. Kirjoita jotain

      Kivaa, hellää ja piristävää
      Ikävä
      138
      963
    4. Missäs se Miss Suomussalmi luuraa?

      Jokin aika sitten eräs myyjätär tituleerasi itsensä Miss Suomussalmeksi. Asiakas oli kuulemma Tokmannin kassalla todennu
      Suomussalmi
      14
      804
    5. Voisit nainen joskus vastata minulle

      Ja antaa jotain itsestäsi. Pientä tunnistetta ja juttua itsestäsi ja meistä. Kannustan.
      Ikävä
      63
      632
    6. Varmaan aika moni

      Haluaisi sinut enemmän kuin mielellään
      Ikävä
      41
      608
    7. Päälle hautaus?

      Hautauksissa puhutaan päällehautauksista jos vaikka mies on kuollut ensin ja vaimo 20 vuotta myöhemmin! Todellisuudessa
      Lieksa
      90
      568
    8. Mitäpä luulet että tykkääkö

      kukaan kaivatustasi ?
      Ikävä
      47
      562
    9. On tuota ikäeroa meillä kyllä aivan liian paljon

      Etsi samanikäistä kuin olet, niin minäkin.
      Ikävä
      45
      508
    10. Mies Naiselle pyydän...

      älä satuta minua.
      Ikävä
      47
      495
    Aihe