Toin netistä osoitetietoja Exceliin ja ne ovat siellä nyt kaikki A-sarakkeessa (nimet, osoitteet, postinumerot...)
Nyt pitäisi siirtää henkilön jokainen tieto omaan sarakkeeseen (A-sarakkeessa on nimi, B-sarakkeessa on katuosoite, C-sarakkeessa on postinumero...)
Saakos tähän jonkilaisen järkevän makron tehtyä. Sellaisen osaan, jossa tietyn rivin solusta pystyy siirtämään tiettyn rivin tiettyyn soluun, mutta tämä pitäisi olla riippumaton rivinumerosta.
Sarakkeista tiedot riveittäin
sedemik
4
500
Vastaukset
- toi onnistu
tuolla data-> text to columns toiminnolla...
- sedemik
Tämä olisi ollut sitten seuraava kysymys. Kiitos tästä. Mutta palaan vielä alkuperäiseen kysymykseeni.
Mulla on siis tiedot nyt riveittäin:
(A1) Martti
(A2) Hämeenpolku 2
(A3) 20100 Turku
(A4)
(A5) Heikki
(A6) Hämeenpolku 7
(A7) 30100 Tampere
Ne pitäisi saada:
(A1) Martti (B1) Hämeenpolku 2 (C1) 20100 Turku
(A2) Heikki (B2) Hämeenpolku 7 (C2) 30100 Tampere
Osoitetietoja on aikas paljon, joten en viitsi niitä manuaalisesti alkaa siirtelemään jos tähän olisi helpompikin vaihtoehto. - auttaako
sedemik kirjoitti:
Tämä olisi ollut sitten seuraava kysymys. Kiitos tästä. Mutta palaan vielä alkuperäiseen kysymykseeni.
Mulla on siis tiedot nyt riveittäin:
(A1) Martti
(A2) Hämeenpolku 2
(A3) 20100 Turku
(A4)
(A5) Heikki
(A6) Hämeenpolku 7
(A7) 30100 Tampere
Ne pitäisi saada:
(A1) Martti (B1) Hämeenpolku 2 (C1) 20100 Turku
(A2) Heikki (B2) Hämeenpolku 7 (C2) 30100 Tampere
Osoitetietoja on aikas paljon, joten en viitsi niitä manuaalisesti alkaa siirtelemään jos tähän olisi helpompikin vaihtoehto.tämä, laittaa tiedot sarakkeisiin B:D
Sub muokkaa()
Dim rng As Range
Dim i As Long
Dim j As Long
Set rng = Cells(Rows.Count, 1).End(xlUp)
j = 1
For i = 1 To rng.Row Step 4
Cells(j, "B").Resize(1, 3).Value = _
Application.Transpose(Cells(i, "A").Resize(3, 1))
j = j 1
Next
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Hetken jo luulin, että en ikävöi sinua koko aikaa
Mutta nyt on sitten taas ihan hirveä ikävä jotenkin. Tiedätköhän sinä edes, kuinka peruuttamattomasti minä olen sinuun r356261JOKO OLETTE KUULLET, MITÄ KIURUVEDELLÄ ON SATTUNUT!
Oletteko jo kuulleet, mitä Kiuruvedellä on sattunut, voi hyvänen aika? Aivan viime tuntien aikana olisi sattunut, jos t193556Outoa että Trump ekana sanoutui irti ilmastosopimuksesta
kun Kaliforniaa riepottelee siitä johtuvat tuhoisat maastopalot. Hirmumyrskytkin ovat USA:ssa olleet tuhoisia.5182763Nolointa ikinä miehelle
On ghostata nainen jonka kanssa on ollut ystävä tai ollu orastavaa tapailua pidemmän aikaa. Osoittaa sellaista moukkamai591928Eli jos toisen hiki haisee ns. omaan nenään siedettävältä
Se kertoo hyvästä yhteensopivuudesta. Selvä! Olet mies minun. 🫵🥳321921- 261515
Sattuma ja muutama väärinkäsitys
vaikuttivat siihen millaiseksi tämä kaikki muodostui. Pienet aikanaan huomaamattomat käänteet. Seuraava näytös on jo tul311421Ei ois kyllä kivaa
Jos miestä ei kiinnostais ollenkaan minun seura. Aina huitelis ties missä tai olis omassa seurassaan. Kaikki muu ois kiv71251En tiedä miksi kerroin sinusta täällä
Siksi kai, kun meidän juttu on niin alkuvaiheessa, etten voi vielä puhua siitä kenellekään.171249Oho! Queen of Fucking Everything villitsee - Ikean sininen luottotuote nappasi hervottoman idean!
Ikea on ajan hermoilla! Aika hauska idea ja Queen of Fucking Everything -ajatus toimii hyvin tässäkin. Lue lisää: http111083