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?
Alueen kopiointi eri tiedostoista
13
638
Vastaukset
- Anonyymi
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. - Anonyymi
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. - Anonyymi
Näinkö on että minä joudun opastamaan tässäkin asiassa?
- Anonyymi
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.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.- Anonyymi
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.
- Anonyymi
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- Anonyymi
Kiitos TURPO.
- Anonyymi
Tämä ongelma lienee nyt ratkaistu.
- Anonyymi
Siltä se vaikuttaa.
- Anonyymi
Ei ole osaajat minnekään kaikonneet.
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...
- Anonyymi
Missä sinä niitä linkkejä näät, normaalit soluviittaukset tuossa on kyseessä. Herrajumala miten sekasin olet koko ukko.
Etkö ymmärrä mikä se "linkki" on?
Ketjusta on poistettu 1 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Miksi persuilla ei ole firmoja?
Kuten vasemmisstolaisilla, esim. Sannalla MA\PI. Eikö ole aika erikoista?837101Persut hommasivat Suomeen 35 000 pientä lasta v. 2015
Onko Riikka Purra nyt tavoittelemassa tätä samaa historiallista persujen utopiaa? Purram kaksinaamaisessa pelissä vaadit267053Purran tuhoja tuskin saadaan koskaan korjatuksikaan
Purra on aiheuttanut Suomen taloudelle karmaisevat tuhot. Sen lisäksi Purra on ajanut myös suuren osan Suomen kansasta k1096168Persujen kaksoisstandardit: Räsäsen uhkailu paha, Virran uhkailu hyvä
Tässä taas nähdään kuinka kaksinaamaista porukkaa persut ovat. Mitäs persut tähän?455404Miksette persut irtisanoudu Kirkin lausunnoista?
Kirkhän muun muassa vaati raiskattuja naisia pidättäytymään abortista ja vaimoja alistumaan aviomiestensä tahtoon. Mik845238Demarikultin uhri kertoo
Demarikultin uhri kertoo: “En saanut mennä edes suihkuun ilman lupaa” – Seksuaalisen hyväksikäytön uhri kertoo vuosistaa635205Miksi vasemmistolaiset eivät omista yhtään firmaa?
Vasemmistolaiset eivät omista yhtään firmaa joka työllistäisi ihmisiä. Miksi? No siksi, että jos vasemmistolainen perus405108Sanna valittiin Euroopan huonoimmaksi pääministeriksi
Sannan kaudella Suomi oli ainut maa missä bkt laski. Kannattaa huomata, että luvut valitsi Sannan huonoimmaksi. Ihmiset274595Purran vuoro kiihoittua Lepomäen sääristä
"Ulkoministeri Elina sanoo, ettei muuta pukeutumistaan sen mukaan, kenet tapaa, ja että hän ei suostuisi peittämään kasv163467Vasemmistolaiset paskat eivät nousseet seisomaan kun Akaan kaupunginvaltuusto
vietti hiljaisen hetken Charlie Kirkin muistoksi https://www.aamulehti.fi/uutiset/art-2000011523016.html3003390