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
4
509
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
Putin lähti takki auki sotaan....
Luuli, että kolmessa päivässä hoidetaan, nyt on mennyt 3,5 vuotta eikä voitosta tietoakaan. Kaiken lisäksi putin luuli,1393877Näitä venäjä-faneja tuntuu edelleen vaan riittävän - kummallista
ja lähinnä siis ihan suomalaisia. Mitä hienoa ja hyvää he näkevät maassa joka on diktatuuri, maassa jossa ei ole sananv3362792Ulkoistin makuaistini Yleisradiolle
Nyt voimme luottaa siihen, että Virallinen Totuus tekee maistelutyön puolestamme. Me persulandiassa arvostamme priimaa,12219Sanna on pakottaja, domina
Pakotti sadistisessti työttömät hakemaan töitä, josta seurasi hirmuinen työttömyys. Näin on asia, jos uskomme Hesarin k452073Skodan hankintaan painostaminen toi potkut
Kylläpä on kovat keinot käytössä, kun on yritetty pakottaa hankkimaan Skoda painostuskeinoilla. Kyllä valinnan pitää oll141803No onneks ei tartte sit olla
Mustis ku se ootki sinä itte 😂😂 Oon pelännyt että ehkä teille kehkeytyy jotain enemmän ku niin paljon yhteistä mut....111595Niinistö neliraajajarrutteli Natoon liittymistä vielä sodan alettua
Myöntää nyt itsekin, mikä jo aikaisemmin tiedettiin. Marin vei Suomen ja Ruotsin Natoon. "”Myönnän auliisti jarruttelle1471321- 931232
Lahden kolarisuma ja automaattinen hätäjarrutusjärjestelmä
Olisiko uudehkojen autojen automaattinen hätäjarrutusjärjestelmä vähentänyt kolareiden määrää tuolla Lahden tiellä? Sumu901053- 541031