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

116

    Vastaukset

    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. Tiedätkö, että haluaisin panna

      Sinua. Onko sinulla samanlaiset ajatukset ja tunteet?
      Ikävä
      156
      2748
    2. Se oli siinä sitten

      Yhdysvaltain presidentti Donald Trump on määrännyt kaiken maan Ukrainalle toimittaman sotilaallisen tuen tauolle, kertoo
      NATO
      726
      2450
    3. Paljonko aikaa on kulunut siitä kun viimeksi tapasit hänet?

      Päiviä? Viikkoja? Kuukausia? Vuosia?
      Ikävä
      53
      2364
    4. Mikä sinua ja kaivattuasi

      Yhdistää?
      Ikävä
      135
      2210
    5. Ajelen varmaan siellä suunnalla

      taas yöllä, vahingossa käyn sun pihalla. 😏 m
      Ikävä
      63
      1895
    6. Trump tekee rauhan Amerikan ja Venäjän ehdoilla

      Ukraina luovuttaa Venäjän haluamat alueet Venäjälle. Ukraina luovuttaa Amerikan haluamat arvokkaat mineraalit Amerikall
      Maailman menoa
      247
      1730
    7. Hyväksytty kaivattusi

      Vartaloa vai et? Rehellinen vastaus
      Ikävä
      31
      1391
    8. Syvälliset keskustelut

      Olisivat tärkeintä ensisijaisesti hänen kanssaan Tulisi sellainen hetki, mutta kaikki meni pieleen
      Ikävä
      20
      1329
    9. Olisipa sitä henkisesti eheämpi ja rohkeampi

      mikään maallinen mammona ei itseäni kiinnosta, eikä sen menetys kiinnostus. Mutta kun kohtaa jonkun sykäyttävän ihmisen,
      Ikävä
      16
      1215
    10. Minulta loppuu aika

      Halusin olla täydellinen. Nyt näyttää siltä että viimeinen kiristys jää puolitiehen, sillä h-hetki on jo ihan kohta käsi
      Ikävä
      31
      1212
    Aihe