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

232

    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. Pride-rautu korvaamaan kirjolohi

      Kekkosen saatanan tunari meni muuttamaan aikoinaan sateenkaariväen kalan nimen. Unkarin vallankumouksen innoittamana n
      Maailman menoa
      34
      2468
    2. Purran aikaisemmat kannattajat siirtyneet Lindtmanin leiriin

      Melkoinen muutos on käynnissä Suomen politiikan kentällä. Tulevista häviäjistä on hirmuinen kiire päästä ajoissa voittaj
      Maailman menoa
      106
      2371
    3. Järkyttävä hetki - Ellen Jokikunnas pöyristyy italialaisen lääkärin työstä

      Unelmia Italiassa -sarjassa ollaan Ellen Jokikunnaksen perheen kanssa Italiassa. Jokikunnas ja Rask ovat rempanneet kakk
      Tv-sarjat
      26
      1459
    4. Oot tosi epätavallinen

      ja erikoinen nainen. Tykästyä ikihyviksi sun kaltaiseen naiseen, mitä tästä pitäis edes ajatella.
      Ikävä
      49
      1247
    5. Työeläkkeet ovat pois työntekijän palkasta

      Jokainen työeläkkeen nimissä maksettu euro on otettu pois työtä tekevältä palkansaajalta. Mitä korkeampi työeläketaso o
      Maailman menoa
      33
      1182
    6. Etkö sä muru mussakaiseni ymmärrä

      Että me päästään lähenemään vain kaveruuden kautta? Vain siten mä voin lähettää sulle kuvia ja viestejä 😌 Tänäänkin o
      Ikävä
      30
      996
    7. Etkö voi antaa edes vihjettä mulle?

      Minkä vain me tiedettäisiin? Naiselta miehelle.
      Ikävä
      73
      942
    8. Muistatko? Maisa Torppa jakso räjäytti Veitolan somen: "epäaitoa ja teeskentelyä"...

      Maisa Torppa täyttää tänään 35 vuotta, onnea! Maria Veitola vieraili Yökylässä-ohjelmassa aikansa kohujulkkis Maisa To
      Suomalaiset julkkikset
      11
      871
    9. Terveisiä lintutornilta

      Viipurista nousee kauhea savupatsas. Miksi ?
      Maailman menoa
      37
      790
    10. Kaksi viikkoa enää Rakas...

      Tietäisinpä miten toimia...
      Ikävä
      53
      785
    Aihe