Siirtomakro

Siirtelijä (makro)

Hei,


Osaisiko joku tehdä makron, joka siirtää excel-taulukosta solut A1, D3, E3 ja F4 tiedot toiselle excel-taulukolle (c://ABC.xls) ja laittaa ne riville 1. toisen kerran kun siirtoja tekee (siis excel taulukko 2) niin tiedot siirtyy riville 2 ja kolmannella kerralla ku ajaa makron ((siis excel taulukko 3) niin tiedot siirtyy seuraavalle riville jne. Elikkä idea olisi se, että yhteen taulukkoon voisi helposti kerätä eri taulukoiden tiedot helposti ja ne siirtyvät taulukkoon ABC aina allekkain.
Tietenkin se voisi pahatua ylhäältä alaspäin. Niin että ensimmäiselle riville tehtäisiin uusi rivi johon uudet tiedot siirtyvät ja muut tiedot ovat sen alapuolle.
Mutta kuitenkin niin, että missä tahansa taulukossa ajan makron tiedot siirtyvät taulukkoon ABC:hen.

Jos joku viitsisi auttaa, niin olisin hyvin kiitollinen!

1

286

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • kunde

      oli vissiin termit hukassa kun puhuttiin työkirjaa taulukkona ja taulukkoa taulukkona, joten ajattelin mennä aidan matalimmasta kohtaa yli...
      siis samassa työkirjassa kopioi ABC taulukkoon kaikki muut taulukon
      määritellyt alueet
      Sub Siirrä()
      Dim ws As Worksheet
      Dim vika As Long
      On Error Resume Next
      Application.ScreenUpdating = False
      With Worksheets("ABC")
      .Activate
      .Cells.Clear
      End With
      vika = 0
      For Each ws In ActiveWorkbook.Sheets
      If Not ws.Name = "ABC" Then
      ws.Range("A1").Copy Range("ABC!A1").Offset(vika, 0)
      ws.Range("D3").Copy Range("ABC!A1").Offset(vika, 1)
      ws.Range("E3").Copy Range("ABC!A1").Offset(vika, 2)
      ws.Range("F4").Copy Range("ABC!A1").Offset(vika, 3)
      vika = vika 1
      End If
      Next
      Application.ScreenUpdating = True
      End Sub

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

    Takaisin ylös

    Luetuimmat keskustelut

    1. Arman Alizadin viesti puna-aktivisteille: "Pitäkää lärvinne nytkin kiinni"

      Arman Alizad kritisoi vasemmiston kaksinaismoralismia. Iranissa syntynyt suosikkijuontaja Arman Alizad pakeni perheensä
      Maailman menoa
      348
      4422

    2. Minja Koskela nostanut vasemmistoliiton kannatuksen ennätykseen

      Koskela valittiin puolueen johtoon lokakuussa 2024, ja silloin Ylen kysely antoi puolueelle 9,3 prosentin kannatuksen.
      Maailman menoa
      143
      2490

    3. Antti johtaa Petteriä jo 7,1 prosenttiyksiköllä

      Tällä menolla sdp menee kokoomuksesta kierroksella ohi jo tällä vaalikaudella. https://yle.fi/a/74-20213575
      Maailman menoa
      82
      2116

    4. Harmi nainen kun

      olet niin elähtäneen näköinen. Miestä et koskaan löydä itelles. j
      Ikävä
      144
      1646

    5. Hotelli kainuu

      Mietityttää, hotelli Kainuussa, se, että asiakkaat voivat valita ketä saa olla ja ketä ei, Illan aikana asiakkaina!
      Kuhmo
      43
      1180

    6. Eikö me voitais

      Vaan harrastaa seksiä kun muusta ei tule mitään
      Ikävä
      26
      1177

    7. Kuinka pitkä välimatka

      on teidän kotien välillä?
      Ikävä
      32
      1126

    8. Mistä kehon osasta

      Pidät minussa eniten?
      Ikävä
      79
      1061

    9. Seuraavakin hallitus joutuu leikkaamaan

      Sitähän tämä hallitus nyt höpöttää, kun itse on ajanut tilanteen katastrofaaliseksi. Orpon hallitus lähti suurin puhein
      Maailman menoa
      140
      1013

    10. Ovatko vastasyntyneet vauvat syntisiä?

      Se ihmisten keksimä järjetön perisynti, jos ovat!
      Luterilaisuus
      345
      1005
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt