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

467

    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. Ikävöin sinua kokoyön!

      En halua odottaa, että voisin näyttää sinulle kuinka paljon rakastan sinua. Toivon, että uskot, että olen varsin hullun
      Ikävä
      44
      3126
    2. Kova karman laki

      Karman lain kautta pahantekijä tehdessään pahaa toteuttaa koston ja rangaistuksen sille jolle pahaa on tehty. Tämä tarko
      Hindulaisuus
      508
      1917
    3. Päivieni piristys, missä olet?

      Toit iloa ja valoa mun elämään ☀️ Nyt mennyt kohta viikko ettei ole nähty. Kaipaan nähdä sua silti ja pelkään vaikka tei
      Ikävä
      17
      1900
    4. Näen jatkuvasti Sompasaunalla alastomia miehiä ja naisia

      jotka menevät siihen viereiseen rantaan myös uimaan alasti. Sompasaunat on siis Mustikkamaalla Helsingissä, ja kuljen si
      Maailman menoa
      78
      1680
    5. Älä mahdollisesti ota itseesi

      En voinut tietää. Sitäpaitsi.. niin
      Ikävä
      18
      1502
    6. Jos sinä olisit pyrkimässä elämääni takaisin

      Arvelisin sen johtuvan siitä, että olisit taas polttanut jonkun sillan takanasi. Ei taida löytyä enää kyliltä naista, jo
      Tunteet
      43
      1388
    7. Ota nainen yhteyttä ja tee Tikusta asiaa?

      Niin sitten minä teen Takusta asiaa.
      Ikävä
      26
      1322
    8. Millainen kaivattusi luonne on?

      Millaisia luonteenpiirteitä arvostat kaivatussa? Oletteko samanlaisia luonteeltanne?
      Ikävä
      90
      1319
    9. Helena ja Mikko Koivun ero jatkuu edelleen ja loppua ei näy.

      Voi eikä, miksi menee noin vaikeaksi avioero ja sopua ei tää ex- pari vaan saa.
      Kotimaiset julkkisjuorut
      114
      1147
    10. UPM suunnittelee paperintuotannon lopettamista LPR:ssa

      Ilta-Sanomissa oli uutinen. Metsäyhtiö UPM suunnittelee paperintuotannon lopettamista Kaukaan-tehtaalla Lappeenrannassa
      Lappeenranta
      110
      1123
    Aihe