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

450

    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. Anna minulle anteeksi

      Anna minulle anteeksi. Minä pyydän.
      Ikävä
      152
      1878
    2. Kun viimeksi kohtasitte/näitte

      Mitä olitte tekemässä? Millainen ympäristö oli? Löydetään toisemme...
      Ikävä
      130
      1741
    3. Olet kyllä vaarallisen himokas

      Luova, kaunis, määrätietoinen, pervo, mielenkiintoinen, kovanaama, naisellinen ja erikoinen.
      Ikävä
      102
      1497
    4. Anna vielä vähän vihreää valoa

      Teen sitten siirtoni, nainen. Tiedän, että olet jo varovaisesti yrittänyt lähestyä, mutta siitä on jo aikaa. Jos tunnet
      Ikävä
      17
      1203
    5. Mikä on hän on ammatiltaan?

      Vai tiedätkö mitä kaivattusi tekee työkseen?
      Ikävä
      68
      1187
    6. Mitä ajattelit silloin kun

      Löysit hänet?
      Ikävä
      64
      1151
    7. Syksyinen aamuketju suden

      Hyvää huomenta ja kaunista syyspäivää. 🌞🍁🍂☕
      Ikävä
      219
      965
    8. Oletko tutustunut muihin

      Samalla tavalla kuin häneen?
      Ikävä
      66
      787
    9. Uskotko että kohdataan vielä?

      Kysymys otsikossa, aloitukseen ei muuta lisättävää.
      Ikävä
      45
      730
    10. Miksi homous puhuttaa konservatiiveja vuodesta toiseen?

      Kysymykseen on vastattukin Kansanlähetyksen osalta: "Miksi sukupuoleen ja seksuaalisuuteen liittyvät asiat ovat konserv
      Luterilaisuus
      191
      704
    Aihe