Alueen kopiointi eri tiedostoista

Ongelma: Minulla on viisi tiedostoa koneella. Joka tiedostossa on A4 kokoinen tiedosto samassa paikassa.
Kerään yhteen tiedostoon (tied_yht.xlsm) jokaisesta neljästä muusta tiedostosta samasta kohtaa A4 kokoisen alueen.
Muut tiedostot ovat tied_1.xlsm, tied_2.xlsm,…tied_4.xlsm.
Kopio alue on joka tiedostossa D5:J55. Nyt pitäisi kerätä alueet D5:J55 tiedostoon tied_yht.xlsm allekkain solusta J3 alkaen. Joka tiedossa on solussa D1 polku C:\omat\tied_1.xlms, …C\omat\tied_4.xlsm.
Miten tämä onnistuu ilman leikepöydän kasvattamista?
13750
Äänestä

Muut lukivat myös

Vastaukset 13

Vanhimmat

Exeli voi luke/kopioida dataa toisesta tiedostosta. Olen tehnyt vastaavia toimintoja.
Miksi pitäisi käyttää leike pöytää?
Joudut vaan opiskelemaan Exelin käyttöä tai ostamaan ko. palvelun.

Äänestä

Tuota samaa olen minäkin miettinyt kunnes huomasin ettei "leikepöytä" käytännössä kasvakaan yhtään.

Olen kovasti yrittänyt selvittää kuinka suuri tila tarvitaan kiintolevyltä tai muistitikulta kun tiedosto on tuon mainitsemasi A4 kokoinen.

Äänestä

Näinkö on että minä joudun opastamaan tässäkin asiassa?

Äänestä

No hyvä on, nyt en lupaudu videoimaan tätä vastausta, koska ratkaisu on erittäin yksinkertainen.

1.) Avaa tiedosto/taulukko johon olet kokoamassa solujen sisältöä muista taulukoista.

2.) Avaa tiedosto/taulukko josta olet poimimassa solujen sisältöä.

3.) Pistä soluun = merkki, ja siirry taulukkoon mistä aiot solujen sisältöä siirtää. Aktivoi alueen ensimmäinen solu, ja paina ENTER -näppäin.

4.) Olet nyt siirtänyt koontilomakkeelle yhden solun sisällön, voit vetämällä solun nurkasta laajentaa valintaa. Tässä vaiheessa ei enää tarvita sitä lähde tiedostoa/taulukkoa avoinna, viittausalue laajenee vaikka tiedosto ei enää olisikaan avoin.

Se oli siinä, eikö ollutkin helppoa. Ei käytetty leikekirjaa missään vaiheessa.

Äänestä
  • Aloittaja

    Sain tehtyä tällaisen ratkaisun. Tässä kerätään Keraa_tanne tiedostoon Antti.xlsm, Katri.xlsm, Erkki.xlsm ja Mia.xlsm tiedostoista samanlainen alue. Ohjelma avaa yksitellen tiedostot ja vie alueen Keraa_tanne lehdelle allekkain jättäen yhden rivin väliin.

    Sub Keraa_Lomakkeet()
    Keraa_tanne = Application.ActiveWorkbook.Name
    'Olet Keraa_tanne tiedoston Nelja_sivua lehdellä
    ' Täällä on soluissa D5:D9 4 linkkiä. Ensimmäinen linkki esim. C:\Datat\Antti.xlsm
    For L = 1 To 4
    Range("D5").Select
    ActiveCell(L, 1).Select
    Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
    Sheets("Lomake").Select
    P_lomake = Application.ActiveWorkbook.Name
    Application.Workbooks(P_lomake).Activate
    If L = 1 Then
    Application.Workbooks(Keraa_tanne).Sheets("Nelja_sivua").Range("J3:P53") = _
    Sheets("Lomake").Range("D5:J55").Value
    ActiveWindow.Close
    ElseIf L = 2 Then
    Application.Workbooks(Keraa_tanne).Sheets("Nelja_sivua").Range("J55:P105") = _
    Sheets("Lomake").Range("D5:J55").Value
    ActiveWindow.Close
    ElseIf L = 3 Then
    Application.Workbooks(Keraa_tanne).Sheets("Nelja_sivua").Range("J107:P157") = _
    Sheets("Lomake").Range("D5:J55").Value
    ActiveWindow.Close
    ElseIf L = 4 Then
    Application.Workbooks(Keraa_tanne).Sheets("Nelja_sivua").Range("J159:P209") = _
    Sheets("Lomake").Range("D5:J55").Value
    ActiveWindow.Close
    End If
    Next L
    End Sub

    Linkin tekeminen löytyy Excelistä "Lisää" valikosta. Siellä on maapallo ja ketjun pala.

    Äänestä

  • kevike kirjoitti:

    Sain tehtyä tällaisen ratkaisun. Tässä kerätään Keraa_tanne tiedostoon Antti.xlsm, Katri.xlsm, Erkki.xlsm ja Mia.xlsm tiedostoista samanlainen alue. Ohjelma avaa yksitellen tiedostot ja vie alueen Keraa_tanne lehdelle allekkain jättäen yhden rivin väliin.

    Sub Keraa_Lomakkeet()
    Keraa_tanne = Application.ActiveWorkbook.Name
    'Olet Keraa_tanne tiedoston Nelja_sivua lehdellä
    ' Täällä on soluissa D5:D9 4 linkkiä. Ensimmäinen linkki esim. C:\Datat\Antti.xlsm
    For L = 1 To 4
    Range("D5").Select
    ActiveCell(L, 1).Select
    Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
    Sheets("Lomake").Select
    P_lomake = Application.ActiveWorkbook.Name
    Application.Workbooks(P_lomake).Activate
    If L = 1 Then
    Application.Workbooks(Keraa_tanne).Sheets("Nelja_sivua").Range("J3:P53") = _
    Sheets("Lomake").Range("D5:J55").Value
    ActiveWindow.Close
    ElseIf L = 2 Then
    Application.Workbooks(Keraa_tanne).Sheets("Nelja_sivua").Range("J55:P105") = _
    Sheets("Lomake").Range("D5:J55").Value
    ActiveWindow.Close
    ElseIf L = 3 Then
    Application.Workbooks(Keraa_tanne).Sheets("Nelja_sivua").Range("J107:P157") = _
    Sheets("Lomake").Range("D5:J55").Value
    ActiveWindow.Close
    ElseIf L = 4 Then
    Application.Workbooks(Keraa_tanne).Sheets("Nelja_sivua").Range("J159:P209") = _
    Sheets("Lomake").Range("D5:J55").Value
    ActiveWindow.Close
    End If
    Next L
    End Sub

    Linkin tekeminen löytyy Excelistä "Lisää" valikosta. Siellä on maapallo ja ketjun pala.

    Miksi ei näinkin.

    Äänestä

No joo, ehkä tuo ei niin yksi selitteinen ohje ollut etteikö pieni GIF animaatio avuksi olisi. Animaatiossa tuo alueen valinta tehdään samalta taulukolta, mutta asia ei miksikään muutu kun se tehdään kahden tiedoston välillä.

https://s2.gifyu.com/images/alue.gif

Äänestä
  • Kiitos TURPO.

    Äänestä

Tämä ongelma lienee nyt ratkaistu.

Äänestä
  • Siltä se vaikuttaa.

    Äänestä

  • Ei ole osaajat minnekään kaikonneet.

    Äänestä

Linkit ovat se viho viimeisin keino, mutta jos ei osaa muuten kopioida, niin ei kai sitten väliä, kunhan jollakin keinolla saa toimivan ratkaisun aikaan...

Äänestä
  • Missä sinä niitä linkkejä näät, normaalit soluviittaukset tuossa on kyseessä. Herrajumala miten sekasin olet koko ukko.

    Etkö ymmärrä mikä se "linkki" on?

    Äänestä

Ketjusta on poistettu 1 sääntöjenvastainen viesti.

Kommentoi aloitusta


kevike kirjoitti:

Ongelma: Minulla on viisi tiedostoa koneella. Joka tiedostossa on A4 kokoinen tiedosto samassa paikassa.
Kerään yhteen tiedostoon (tied_yht.xlsm) jokaisesta neljästä muusta tiedostosta samasta kohtaa A4 kokoisen alueen.
Muut tiedostot ovat tied_1.xlsm, tied_2.xlsm,…tied_4.xlsm.
Kopio alue on joka tiedostossa D5:J55. Nyt pitäisi kerätä alueet D5:J55 tiedostoon tied_yht.xlsm allekkain solusta J3 alkaen. Joka tiedossa on solussa D1 polku C:\omat\tied_1.xlms, …C\omat\tied_4.xlsm.
Miten tämä onnistuu ilman leikepöydän kasvattamista?

Anonyymi
5000

Ilmoita asiaton sisältö

  • Sisältää materiaalia, joka on loukkaavaa, herjaavaa, rasistista, uhkailevaa tai ahdistelevaa.

  • Materiaali sisältää nimiä, yhteystietoja tai muita henkilökohtaisia tietoja. Julkisuuden henkilöistä, julkisissa viroissa toimivista ihmisistä sekä yritysten vastuuhenkilöistä saa keskustella työhön liittyen. Myös yksityiselämään liittyvistä asioista voi keskustella siltä osin, kuin niistä on julkisesti kerrottu.

  • Sisältää lapsille haitallista tai heiltä kiellettyä materiaalia. Seksuaalinen sisältö on sallittua aiheeseen tarkoitetuilla palstoilla, joiden ikäraja on 18 vuotta.

  • Lainvastaista sisältöä voi olla mm. yksityiselämää loukkaavan tiedon levitys, kiihottaminen kansanryhmää vastaan, laiton uhkaaminen, alaikäisiin liittyvä seksuaalinen sisältö/grooming, petokset, identiteettivarkaudet, kunnianloukkaukset ja tekijänoikeusrikkomukset.

  • Sisältö ei liity palstan tai keskusteluketjun aiheeseen.

  • Viesti ei ole suomea tai ruotsia (pl. International Forums), se sisältää mainontaa, se sisältää tekijänoikeuksin suojattua materiaalia, se on massapostitus tai jokin muu syy.

Jaa keskustelu