laskuri

harjottelua

Mitenkä saan tehtyä laskurin, joka tietyn ehdon täytyttyä alkaa laskea sekunteja?
Elikkä jos esim soluun E1 tulee tulokseksi 1, niin silloin solussa F1 alkaa laskuri laskea nollasta ylöspäin sekunteja.

2

97

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • ko. taulukon moduuliin...

      Option Explicit

      Private Sub Worksheet_Calculate()
      If Range("E1") = 1 Then
      Aloita
      Else
      Lopeta
      End If
      End Sub

      moduuliin...

      Option Explicit
      Dim Ok As Boolean
      Sub Aloita()
      Ok = True
      Application.OnTime Now() TimeValue("00:00:01"), "Ajastin"
      End Sub
      Sub Lopeta()
      Ok = False
      Worksheets("Sheet1").Range("F1").Value = 0
      End Sub
      Sub Ajastin()
      If Ok Then
      Worksheets("Sheet1").Range("F1").Value = Worksheets("Sheet1").Range("F1").Value 1
      Application.OnTime Now() TimeValue("00:00:01"), "Ajastin"
      End If
      End Sub



      KeepEXCELing
      @Kunde

    • harjottelua

      Kiitti vastauksesta!!
      Täytyy illalla kokeilla vielä miten toimii.

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

    Luetuimmat keskustelut

    1. Mieleni harhailee sinussa

      Uskon että tykkäät minusta. On vain yksi elämä. Silti jään paikoilleni ja odotan että jokin muuttuu. Menin palasiksi, ei
      Tunteet
      8
      1258
    2. Toivotko, että

      hän tulisi juttelemaan sinulle, vai lähestytkö mieluummin itse?
      Ikävä
      89
      1135
    3. Jännitän sinua J mies

      Ei tästä tulee mitään. Tuskin kaikki olis mennyt näin moneen solmuun, jos olis tarkoitettu meidät yhteen.
      Ikävä
      103
      1037
    4. Kuinka kauan kesti että ihastuit

      Kaivattuusi? Jos lasketaan siitä hetkestä alkaen kun näit hänet ensi kerran. Oliko jokin tilanne tai tapahtuma, joka voi
      Ikävä
      51
      913
    5. Olen käyttäytynyt sinua kohtaan väärin toistuvasti

      Puolustuksekseni täytyy sanoa, että ei ole ollut tahallista vaan seurausta harhaisista luuloista ja ajatuksista. Esimerk
      Ikävä
      62
      787
    6. Vaikutat tosi mielenkiintoiselta ja

      paksulta. 😂 m - n
      Ikävä
      81
      705
    7. Orpo suunnittelee palestiinalaislasten Suomeen siirtoa

      "Sairaalahoitoa tarvitsevien lasten ottaminen Suomeen on lisäksi selvityksessä, Orpo sanoo. – Jos meillä on mahdolli
      Maailman menoa
      170
      667
    8. solmussa solmussa

      Tilanne solmussa. Umpisommussa🫢
      Ikävä
      35
      659
    9. Tunneälyä testaamaan!

      Testi pitää sisällään viisi osa-aluetta. Itse sain täydet tuosta ensimmäisestä eli 25/25. Kokonaispistemäärä oli 100/125
      Lesbot
      3
      656
    10. Saanko mies tulla sun kainaloon nukkumaan?

      En saa unta kun mietin sua❤️ Saako tulla sun viereen ja käpertyä sun kainaloon?
      Ikävä
      42
      613
    Aihe