Tiedon kerääminen Excelissä

XXYYXX

Osaako joku neuvoa, kuinka saan Exceliin makron seuraavasta:
B3 soluun laitetaan numero ja maksolla siirretään toiseen soluun esim H4.
Tämän jälkeen lisätään B3 soluun uusi numero ja tämä pitäisi saada siirrettyä H5 sarakkeeseen ja lukuja lisättäisiin loputtomasti ja niiden pitäisi tehdä lista sarakkeeseen H.
Tällä hetkellä makro näyttää tältä:
Sub Makro2()
'
' Makro2 Makro
'
' Pikanäppäin: Ctrl a
'
Range("B3").Select
Selection.Copy
Range("H4:H300").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False


End Sub

Tällä kopio siis H4:H300 saman B3 arvon.
Nyt en neuvoa löydä / pää ei pelaa, jotta saisi tämän toimimaan.

6

122

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Hohhoijaati

      Macrot on jäätävä turvallisuus uhka!

      • Tottaturiset

        Eikös juuri Norjalainen alumiini sulattamo ajettu alas MsOffisen takia.
        Macrot kielossa monessa yrityksessä ja yleisesti suositeltuna kieltää.
        Joten tee taulukkosi ilman macroja.
        Vaihka turvallista siitä silläkään saa, mutta ei ihan niin helpon hyökätä.

      • Makrofobiaa
        Tottaturiset kirjoitti:

        Eikös juuri Norjalainen alumiini sulattamo ajettu alas MsOffisen takia.
        Macrot kielossa monessa yrityksessä ja yleisesti suositeltuna kieltää.
        Joten tee taulukkosi ilman macroja.
        Vaihka turvallista siitä silläkään saa, mutta ei ihan niin helpon hyökätä.

        Vaaraa voi olla vain sellaisista makroista, joiden toiminnasta ei ole tietoa.

    • kokeilepatätä

      Cells(Range("H" & Rows.Count).End(xlUp).Row 1, 8) = Range("B3")

    • MSosaalukee

      Microsft ainakin kerää ihan kaiken tiedon, vakoilu on täydellinen.

      • Makrofobiaa

        Jos kerää, vahinko on tapahtunut asennettuasi MSOfficen. Ei sun omat makrot sua vakoile, ellet sitten ole jotenkin jakautunut persoona.

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

    Takaisin ylös

    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
      2461

    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
      1247

    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
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt