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. Olisko jo aika?

      Voisitko jo viimein puhua tai avata edes yhteydet sen mahdollistamiseksi.
      Ikävä
      109
      1330
    2. Kuin moni sun

      Perään on jäänyt itkemään?
      Ikävä
      96
      811
    3. Hyvä tietää

      Onko jotain, mitä hänen olisi hyvä tietää?
      Ikävä
      57
      728
    4. Miten uimaportaat voivat maksaa 250 000 euroa?

      Ei mitenkään, jokainen täysjärkinen sen tietää. Ei se ihme ettei verovarat riitä. https://www.is.fi/taloussanomat/art-2
      Maailman menoa
      123
      696
    5. Mikä oli suurin

      Ongelma välillämme?
      Ikävä
      84
      682
    6. Jussi kutsuisi eduskunnan koolle, jos joku pyytäisi

      Eikös oppositio ole huudellut eduskuntaa koolle jo monta viikkoa? "– En ole saanut siihen liittyvää pyyntöä tai toivett
      Maailman menoa
      106
      659
    7. Rakas, ihana rakkain elämäni rakkaus

      Minäkin tarvisin ne sanat sinulta. Tosin annat sen tunteen läsnäolollasi.. jos vain me vielä nähdään.. pelkään sitä maai
      Ikävä
      36
      653
    8. Hei gaggelibylly ootko valmis?

      Tuun kohta hakee sut ratsullani miesprinsessa ❤️
      Ikävä
      77
      570
    9. Rakastamisesi tarkoitus

      Mikä oli kaiken tarkoitus? En sitä tiedä, en ymmärrä. Olet mielessäni, alati. Olen miettinyt. Ei sillä taida olla merki
      Ikävä
      49
      530
    10. Martinalle onnea

      Kaunis Martina täyttää tänään 44 vuotta! Olkoon syntymäpäivä iloa ja onnea täynnä.
      Kotimaiset julkkisjuorut
      215
      519
    Aihe