Heippa!
Ongelmana olisi sellainen, että pitäisi saada noin 1100 eri välilehden tiedot samalle välilehdelle samassa työkirjassa. Saan meidän projektitietokannasta tuotua tiedot exceliin, mutta se luo excelin niin, että jokainen projekti tulee omalle välilehdelleen, mutta tarvitsisin tiedot yhdelle ja samalle välilehdelle, jotta voin vertailla tietoja ja laskea eri asioita niiden perusteella. Käytännössä siis jokaisella välilehdellä on kolme riviä tietoa, jotka pitäisi saada siirrettyä yhdelle ja samalle välilehdelle luetteloksi.
Onnistuukohan tämä jotenkin järkevämmin kuin copy/pastettamalla, koska siinä menisi ikä ja terveys, kun niitä alkaisi nakuttamaan yhdelle ja samalle välilehdelle käsin.
Usean välilehden tiedot yhdelle välilehdelle
Tiedostamaton2016
2
152
Vastaukset 2
- välkkymätön
Löysin tuommoisen koodinpätkän netistä. Testasin sitä ja se toimi. Koodi tämmöisenä kopioi kaikilta välilehdiltä solut C3:C5 Taul4:seen alekkain. Jospa tuosta saisit muokkaamalla mitä tarvitset. Koodissa on nuo "Application. ScreenUpdating=False"-rivit siksi ettei taulukko "välkkyisi" siirron /kopioinnin aikana. Vaihda tuon Taul4 tilalle sen välilehden nimi jonne haluat tiedot kopioida.
Sub MakeSummaryTable()
Dim ws As Worksheet
Application.ScreenUpdating = False
Sheets("Taul4").Activate
For Each ws In Worksheets
If ws.Name <> "Taul4" Then
ws.Range("C3:C5").Copy
ActiveSheet.Paste Range("A65536").End(xlUp).Offset(1, 0)
End If
Next ws
Application.ScreenUpdating = True
End Sub Miksi sitä kaikkea tietoa tarvitsee tuoda, jos kerran 3 riviä vaan tarvitaan joka sivulta. Eli luetaan tiedostosta vaan ne tarvittavat 3 rivin tiedot sivuttain....
Keep EXCELing
@Kunde
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Gallup: Kansalaiset eivät usko velkajarruun
Puolet suomalaisista ei usko velkajarrun vaatimien sopeutusten toteutuvan, kertoo Iro Researchin kyselytutkimus. Kokoom691072- 64852
Sinulle nainen
En ehkä koskaan osannut sanoa tätä oikein. Minun vaikeuteni luottaa liittyi ennen kaikkea menettämisen pelkoon. Siihen66846- 53828
- 185821
Ethän voinut nainen tietää, että rikot rikotun
Omaa elämää taas mietin aamuyön tunteina. En vieläkään löytänyt muistin sokkeloista ainuttakaan onnen hetkeä. Kaipuu on72702- 42696
Martsusta tuli leuhka
Ja ylimielinen. Hän ei nosta persettäkään ilmaseksi . Luulempa et nämä ei tee hyvää hyvinvointivalmennuksille.... Nannal206680Hei rakkaani.
Kohtaaminen lähestyy. Miten teemme sen? Kumpi ottaa yhteyttä vai törmäämmekö jossain sattumalta? Tuleva vaimosi50663Kuisla Group Oy jättänyt yrityssaneeraushakemuksen
Samalla yrityssaneeraukseen on hakeutunut Kuisla henkilökohtaisesti ja Seinäjoen Motelli Oy, joka omistaa Sorsanpesän ki28624Kiulu myynnissä!
Kiulu hakee taas uutta yrittäjää. https://www.yritysporssi.fi/etela-pohjanmaa-lansi-suomi-finland/myytavat/yritykset/ma26578- 40518
Uskallanko laittaa sulle viestiä?
Se viesti on tossa valmiina ja lähettämistä vaille valmis. Kun ei kauhee sti tunneta niin eipä sillä olisi niin väliä. S45496Tulisiko naisille asettaa korkeammat eläkemaksut
Tämä tuli mieleeni kun luin aamun lööppejä. Japanissa alkaa olla "uutta nuorisoa" ihan urakalla, ikä alkaa sadan jälkeen169464Et pysty peittämään minulta
Sinä olet hyvä peittämään asioita niin halutessasi. Pystyt pitkiäkin aikoja salaamaan juttuja. Juuri mietin tuossa, olet47464- 18438
Mitä oikein tapahtui? Maajussi-Jetta sai tylyt pakit - Sulhoehdokas selittää: "Ei lentänyt kipinät"
Maajussille morsian -sarjassa etsitään rakkautta ja rinnalle kumppania. Yksi maajusseista on Jetta - liikunnallinen ja12427Makeinen, asiaa sinulle
Minua korkeampien voimien kehotuksesta sinua pyydetään avaamaan jokin yhteys asioista keskustelemisen takia kanssani. Il28393Huumekauppaako
”Huumekauppa johti rajuun väkivaltaan Kokkolassa – Kolme nuorta otettu kiinni, yksi epäillyistä alaikäinen”9374J-mies!
Meidän "suhde" (suhde mitä ei oikeastaan edes ole) on kielletty ja vaikea. En tiedä mihin uskot, mutta olet irl itsekin32372