VBA apuja kaivataan

Anonyymi-ap

Yritin kokeilla tuollaista koodia millä solun arvon muuttuminen toiseksi käynnistää eri makrot.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not (Intersect(Target, Range("A1")) Is Nothing) Then
If Range("A1") = 1 Then
Application.Run "makri1"
Else
Application.Run "makro2"
End If
End If
End Sub

Periaatteessa toimii, mutta ei ihan niin kuin odotin. Toimii silloin kun käsin syöttää lukeman A1 soluun ja painaa enteriä.
Pitäisi saada toimimaan siten että kun solussa olevan kaavan tuottama lukuarvo muuttuu. Nyt se ei kaavan tuottamiin lukuarvoihin reagoi mitenkään.
Millaiset loitsut vaatisi ettei tarvitsi enterin painallusta siinä solussa?

11

421

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Anonyymi

      Kokeile näitä , jos olisi apua
      Worksheet object events
      Events on sheets are enabled by default. To view the event procedures for a sheet, right-click the sheet tab and click View Code on the shortcut menu. Select one of the following events from the Procedure list box.
      esim.
      Private Sub Worksheet_Calculate()
      Columns("A:F").AutoFit
      End Sub

      • Anonyymi

        Kiitos, olen autettu. En osaa kieliä, mutta ohjelmasi toimii hienosti.


      • Anonyymi
        Anonyymi kirjoitti:

        Kiitos, olen autettu. En osaa kieliä, mutta ohjelmasi toimii hienosti.

        Oleppa hyvä.


      • Anonyymi
        Anonyymi kirjoitti:

        Kiitos, olen autettu. En osaa kieliä, mutta ohjelmasi toimii hienosti.

        Hienoa jos muut sai apuja.
        Kuinka sinulla sattuikin olemaan sama pulma kuin minulla aloittajana. 😲


      • Anonyymi

        Vapunen tauolle ;D
        Mielestäni tämä vapunen pitäisi sulkea toistaiseksi !


      • Anonyymi
        Anonyymi kirjoitti:

        Hienoa jos muut sai apuja.
        Kuinka sinulla sattuikin olemaan sama pulma kuin minulla aloittajana. 😲

        Pulma on päässäsi kun vastaat itsellesi!


      • Anonyymi
        Anonyymi kirjoitti:

        Vapunen tauolle ;D
        Mielestäni tämä vapunen pitäisi sulkea toistaiseksi !

        Kirjautuminen pakolliseksi, ei täältä häiriköt muuten häviä!


      • Anonyymi
        Anonyymi kirjoitti:

        Kirjautuminen pakolliseksi, ei täältä häiriköt muuten häviä!

        Minä ajattelin ettet sinä kuitenkaan kiitä saamastasi avusta, niinpä annoin aiheellista kiitosta taitajalle, että olisi apu lähellä seuraavalla kerrallakin.


    • Anonyymi

      Hienoa, meillä on osaaviakin mukana.

    • Anonyymi

      VBA (Visual Basic for Applications) -ohjelmoinnin avulla voi luoda makroja myös LibreOffice Calc taulukkolaskentaa käytettäessä.

      • Anonyymi

        LibreOffice on paras.


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Tänään pyörit ajatuksissa enemmän, kun erehdyin lukemaan palstaa

      En saisi, silti toivon että sinä vielä palaat ja otetaan oikeasti selvää, hioituuko särmät ja sulaudummeko yhteen. Vuod
      Ikävä
      22
      5134
    2. Huomenta ihana

      Kauniskasvoinen ihanuus 😘 saan sut vielä
      Ikävä
      25
      4308
    3. Hei rakas...

      Miten on työpäivä sujunut? Rakastan sinua 💗
      Ikävä
      27
      2451
    4. Edelleen sitä on vaikea uskoa

      Että olisit oikeasti rakastunut muhun
      Ikävä
      34
      2234
    5. Toiveikas vai toivoton

      torstai? Ajatuksia?
      Ikävä
      37
      1998
    6. Vitsi mihin menit. Heti takasin.

      Mä näin sut tuu takasin! Oli kiire, niin en ehtiny sin perään!
      Ikävä
      15
      1908
    7. En ole koskaan kokenut

      Ennen mitään tällaista rakastumista. Tiedän että kaipaan sinua varmaan loppu elämän. Toivottavasti ei tarvitsisi vain ka
      Ikävä
      19
      1587
    8. Mukavaa päivää

      Mun rakkauden kohteelle ❤️ toivottavasti olet onnellinen
      Ikävä
      12
      1521
    9. Voi ei! Jari Sillanpää heitti keikan Helsingissä - Hämmästyttävä hetki lavalla...

      Ex-tangokuningas on parhaillaan konserttikiertueella. Hän esiintyi Savoy teatterissa äitienpäivänä. Sillanpää jakoi kons
      Suomalaiset julkkikset
      21
      1237
    10. Kerranki asiat oikein

      Ilkka ja muut pienpuolueeet...teitte hyvän työn kun valitsitte pätevän henkilön virkaan eikä kepulle passelia!! Jatkakaa
      Haapavesi
      10
      1164
    Aihe