Seuraava ongelma: pitkä lukusarja allekkaisia lukuja. Niistä pitäisi poimia aina 5 lukua ja sitten laittaa ne 5 lukua sarakkeisiin. Eli aina 5 + 5 + 5...lukua pitäisi poimia siitä allekkain olevasta lukujonosta ja viedä aina ne 5 lukua sarakkeisiin, jolloin tulisi ne 5 lukua aina allekkain. Pahus kun ei tänne voi laittaa mitään kuvaa tms.
Millä kaavalla?
Excelin rivien muuttaminen sarakkeiksi
6
360
Vastaukset
- Anonyymi
Transpose muistaakseni. Pitää sitten maalata yhtä monta solua, ja olikohan painettava ctrl+enter. Voin kirjoittaa täyttä paskaakin, koska en ole moneen vuoteen käyttänyt.
- Anonyymi
Libre calcissa se on shift+enter.
Eli jos luvut on alekkain a-sarakkeessa, niin 5 kpl lukuja b,c,d,e,f -sarakkeisiin saa maalaamalla solut ja laittamalla kaava =transpose(a1:a5) ja sitten painamalla shift + enter.
Tuo siis järjestää solujen a1,a2,a3,a4 ja a5 luvut soluihin b1,c1,d1,e1 ja f1 (jos transpose-funktio on kirjoitettu ykkösriville).
Kopioimalla b1,c1,d1,e1 ja,f1 solut soluihin b6,c6,d6,e6 ja f6 tulee niihin soluihin arvot soluista a6,a7,a8,a9 ja a10.
Kun nyt maalaa solualueen b1:f10, niin kahvasta alas vetämällä saa sitten aina viiden rivein välin seuraavat a-sarakkeen 5 arvoa b-f-sarakkeisiin.
jos haluat koodin laita YV
https://www.dropbox.com/scl/fi/5m5zcscjfew5kbobb8sbz/Excel-rivit-sarakkeeseen.mp4- Anonyymi
Kokeile, pitäisi toimia.
Sub Macro1()
'
' Macro1 Macro
'
Dim r_c, k, n As Integer
'Calculate number of rows in range
r_c = Range("A:A").Cells.SpecialCells(xlCellTypeConstants).Count
n = r_c / 5
i = 0
k = 0
For i = 0 To r_c Step 5
k = k + 1
ActiveSheet.Range("A1:A5").Offset(i, 0).Select
Selection.Copy
ActiveSheet.Range("A1").Offset(0, k).Select
ActiveSheet.Paste
Next i
Application.CutCopyMode = False
End Sub - Anonyymi
Seuraava kaava sarakkeissa C–G kopioi luvut viiden jaksoissa sarakkeesta A. Eli, jos A-sarakkeessa on luvut 1:stä eteen päin, C–G -sarakkeisiin tulee
1 2 3 4 5
6 7 8 9 10
jne.
=OFFSET($A$1; MOD((COLUMN()-3);5)+(ROW()-1)*5; 0)- Anonyymi
Ja tämä kaava tekee sen, mitä kysyttiin:
=OFFSET($A$1; ROW()-1 +(COLUMN()-3)*5; 0)
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Naiset miltä kiihottuminen teissä tuntuu
Kun miehellä tulee seisokki ja ja sellainen kihmelöinti sinne niin mitä naisessa köy? :)312110Haistoin ensin tuoksusi
Käännyin katsomaan oletko se todellakin sinä , otin askeleen taakse ja jähmetyin. Moikattiin naamat peruslukemilla. Tu71846- 151321
- 81210
Tähdet, tähdet -tippuja Kake Randelin tilittää avoimena: "Tämä on viihdyttämistä, eikä sitä..."
ISO kiitos Kake lauluistasi!Nyt ei vaan studioyleisö lämmennyt. Olet legenda! Lue Kake Randelinin mietteet: https://w211195- 121117
Miksi kohtelit minua kuin tyhmää koiraa?
Rakastin sinua mutta kohtelit huonosti. Tuntuu ala-arvoiselta. Miksi kuvittelin että joku kohtelisi minua reilusti. Hais51061- 71025
- 61014
- 12997