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

335

    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. Miksi naiset haluavat itseään vanhemman kumppanin? Vai haluavatko?

      Tuolla toisessa ketjussa tuli esille tämä kysymys ja se on mielestäni hyvä kysymys. Kiitos scrg:lle tämän kysymyksen esi
      Sinkut
      355
      1075
    2. Väleistä

      Minkälaiset välit sinulla on kaivattusi kanssa?
      Ikävä
      71
      738
    3. Missä vaiheessa

      Unohdit minut? Onko sinulla oikeasti mies jota rakastat? Tiedän että möhlin ja odotin liikaa. Ei tarvitse vastata jos et
      Ikävä
      37
      686
    4. Ajatteletko usein vielä

      Meitä?
      Ikävä
      49
      580
    5. Jännitän sua!

      En tiedä miksi! 🤭
      Ikävä
      41
      578
    6. Miksi meidän yhteys vain

      Säilyy? Säilyy ja säilyy? Joku syyhän siihen on?:))
      Ikävä
      63
      533
    7. SDP: tiukkaa maahanmuuttopolitiikkaa ilman rasismia

      Analyysin mukaan demareiden uuden maahanmuuttolinjan suurin ero konservatiivioikeiston vastaavaan on rasismin puute. ht
      Maailman menoa
      320
      496
    8. Kun tulet mun luo

      Mies, niin tuotko suklaata tullessasi? ;)
      Ikävä
      75
      471
    9. Mulla on ikävä sua

      Pakko se on myöntää, mulla on ikävä sua 🥺💔.. En kyllä haluaisi sitä myöntää kun tämä tilanne on niin hankala. Oon yri
      Ikävä
      19
      471
    10. kasariperjantai 2026

      Ajatuksia vuoden 2026 kasariperjantaista...ainakin porukkaa oli mun mielestä liikkeellä tosi paljon ja fiilinki noin yle
      Iisalmi
      22
      459
    Aihe