Excel ja VBA, solun arvon kasvattaminen,

ad-amb

Hei!

Datanomiopinnoista muutama vuosi kulunut ja kun ei tarvetta ole ollut - unohtuu helpotkin asiat nopeasti. Kyseessä yksinkertainen varastosaldojen seurantaan tarkoitettu taulukko.

Ongelma/tilanne:

A sarakkeessa on tuotteiden nimiä riveillä 1-20.
B sarakkeessa on tuotteiden varastosaldot.
C sarakkeessa on myydyt määrät.
D sarakkeessa näkyy erotus.
E sarakkeesta olisi tarkoitus lisätä annettu arvo B-sarakkeen varastosaldolle
F sarakkeesta olisi tarkoitus lisätä annettu arvo C-sarakkeen myydyille määrille
- Voiko tuota toteuttaa jollain funktiolla vai vaatiiko makron?

- Kaikki yhteen tuotteeseen liittyvät arvot (varastosaldo/myydyt/erotus - sekä syötettäville arvoille olevat solut) ovat aina samalla rivillä.

- Tarkoituksena on ettei vanhaa varastosaldoa tarvitse laskea päässä yhteenlaskun yhteydessä vaan tuon määrän voisi syöttää aina rivin perässä olevasta solusta - niin, että määrän syöttämisen jälkeen, enteriä painamalla - summa lisääntyisi B tai C -sarakkeeseen ja syötetty arvo katoaisi tämän jälkeen tuosta solusta jossa määrä kirjoitettiin.

Tuntuu taas liian vaikealta, vaikka onhan jo Exceliä sekä Accessia aikoinaan jauhettu omasta mielestä niin paljon, että tämän pitäisi olla helppoa kauraa?

Sekavaa selittää kun ei ole riittävästi kahvia,
kiitos kaikille aikansa tuhlanneille! Viikonloppuja,

2

506

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • ja tosiaan peruskauraa... ei edes ½ kupillista kahvia mennyt ;-)

      taulukon moduuliin...

      Private Sub Worksheet_Change(ByVal Target As Range)
      On Error Resume Next
      Application.EnableEvents = False
      If Not Intersect(Target, Range("E:F")) Is Nothing Then
      Target.Offset(0, -3) = Target.Offset(0, -3) Target
      Target = ""
      End If
      Application.EnableEvents = True
      End Sub

      • ad-amb

        ..kumartaa!

        Toimii loistavasti, olen siis vähintään puolikuppia velkaa ;-)
        Kiitos kertaalleen,
        T: Antti


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

    Luetuimmat keskustelut

    1. Vihamielisyys naisia kohtaan on jo yllättävän suuri ongelma

      Esiintyy laajemmassa mittakaavassa, mitä vain tällä palstalla. Mistä tuo ilmiö nyt oikein johtuu, ja saa alkuvoimansa?
      Sinkut
      403
      2190
    2. Odotan sitä hetkeä

      kun nähdään taas. Tiedän, että sinäkin odotat. Kun se päivä koittaa, katseesi hakee minua. Ehkä arkailemme toisiamme väh
      Ikävä
      63
      1333
    3. Olen melko vakuuttunut

      etten tule olemaan koskaan täysin onnellinen ilman sinua. En uskonut, että näin kävisi kenenkään kanssa. Kunnes sain kok
      Ikävä
      83
      1320
    4. Leijonat Maailmanmestareita!

      Ihanaa Leijonat, ihanaa!!!
      Maailman menoa
      137
      1208
    5. Muistatko kaivattusi

      Syntymäpäivän? Päivämäärä riittää. 🌹
      Ikävä
      89
      1171
    6. Minkälaisessa asennossa

      Haluaisit kaivattusi kanssa olla?
      Ikävä
      99
      1029
    7. Postimerkki kirjeeseen ja kortiin maksaa jo 3 euroa!

      https://yle.fi/a/74-20229241 Kyllä tämä on järjetön hinta, Posti tuhoaa itsensä tällä hinnalla, täytyyhän Postin "Herro
      Maailman menoa
      133
      954
    8. Sinä siellä lähistöllä

      Tahtoisin tutustua paremmin 💫
      Ikävä
      48
      890
    9. Mulla on ikävä

      sua nainen ja niitä katseita ❤️ Lupaatko, että katseemme kohtaa taas?
      Ikävä
      47
      821
    10. Sitä saattaa vähän hölmöillä

      rakkauspäissään, jos tunteita on enemmän kuin osaa käsitellä. Alkuhölmöilyt on söpöä ja sallittavaa.
      Ikävä
      60
      770
    Aihe