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
507
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
- 1702071
Törkeä eläinsuojelurikos Sonkajärvellä
Pohjois-Savossa Sonkajärvellä noin 40 kissaa ja reilut 10 koiraa on jouduttu lopettamaan kaltoinkohtelun vuoksi, kertoo371455Jotkut ihmiset pelkäävät syöpää sairastavaa
On hauskaa, kun kertoo jollekin, että "minulla on syöpä". Jotkut käyttäytyvät kuin se olisi tarttuva tauti. Eivät uskall1321154Se ei ihan oikeasti vaatisi kuin yhden
Tekstiviestin... Jos rakastat minua vielä toivoisin että laittaisit minulle viestiä. Rakastatko? Oletko oikeasti niin pe56892- 55846
Lavrov suivaantui Stubbille perustellusti.
Lavrov perusteli suivaantumistaan tosiasioilla Suomen tarinasta sotiemme jälkeen, tutkija Tynkkynen ja pankkihenkilö Sol250804Kääminsä polttanut taksi suomussalmella
Vieläkö sillä hermonsa menettäneellä hulluja ylinopeuksia ajavalla asiakkaansa haukkuvalla( jos ajat paska kyydin hänen20782Jorma Uotinen avaa sanaisen arkkunsa TTK-miesparista ja koko uudistuksesta: "Sehän on..."
Tanssii Tähtien Kanssa -parketilla nähdään ensimmäistä kertaa Suomessa tanssiparina miespari kauden alusta asti. Mikko S17732Aina ku nään sun kuvan
Tekis mieli kirjoittaa viesti: Moi kulta, on ikävä❣️🤗 ihan noin vain, lyhyt ja ytimekäs 😁🤭58713Sukupuolia on vain kaksi- kohukassista tuli kova tuomio perheenisälle oikeudessa.
https://www.iltalehti.fi/kotimaa/a/4d4db0d9-4dda-4ba6-a699-25d725683ad6 Miten näin normaalista kassissa olevasta tekstis197631