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. Suomalaiset nuoret Eu:n köyhimpiä?

      Suomalaisen nuoren varallisuus keskimäärin 5000e. Eu:ssa keskimäärin 25 000e.
      Maailman menoa
      168
      1323
    2. Mikä on sun ja kaivattusi nimen viimeinen kirjain?

      Välillä näin päin...
      Ikävä
      88
      1204
    3. Sofia teki aika pahat oharit

      Leikkiikö Sofia kansainvälistä kosmopoliittia vai menikö rehdisti pupu pöksyyn, kun perui viestillä tulonsa puoli tunti
      Kotimaiset julkkisjuorut
      205
      1100
    4. Mikä on toinen nimesi?

      Tiedätkö naisen?
      Ikävä
      67
      931
    5. Mikä on kaivattusi

      Nimi väärinpäin🤔🙃
      Ikävä
      58
      694
    6. Kohdataanko me

      Enää?
      Ikävä
      52
      573
    7. Mikä kaivatussasi

      on niin erityistä?
      Ikävä
      32
      558
    8. Muiden vaikutus

      Oletko antanut muiden vaikuttaa mielipiteisiisi, tunteisiini tai valintoihisi suhteessa kaivattuusi?
      Ikävä
      80
      526
    9. No tavallaan seuraava kohtaaminen on käänteentekevä

      Koska sanon sulle että rakastan sua. On aika. Pösilö.
      Ikävä
      29
      494
    10. Miten J sitten tehdään se?

      Varaanko kumin?
      Ikävä
      45
      487
    Aihe