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
7
870
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. - Anonyymi
🍒🍒🍒🍒🍒🍒🍒🍒🍒🍒
😍 Nymfomaani -> https://ye.pe/finngirl21#18187520C
🔞❤️💋❤️💋❤️🔞❤️💋❤️💋❤️🔞
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 1 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 1275705
Mikä on vaikeinta siinä, että menetti yhteyden kaivattuun, jota vielä ajattelee?
Mikä jäi kaihertamaan? Jos jokin olisi voinut mennä toisin, mitä se olisi ollut? Mitä olisit toivonut vielä ehtiväsi san3952499- 1312400
Persut rahoittavat velkarahalla rikkaiden ökyelämää
Minkä vuoksi persut eivät leikkaa rikkailta, joilla on maksukykyä? Tuskinpa tuo persujen käytös saa Suomen kansalta hyv42042- 56976
- 10952
Kun ei numeroa
niin en edes voi viestittää, et suunnitelmiin tuli muutos. Ikävä on, ja kasvaa vaan🤍8932- 51872
- 76795
Temusta tilaamiseen tulee muutos
Alle 150 euron tullivapaus poistuu. Vihdoinkin kankea EU saa jotakin aikaiseksi. https://www.iltalehti.fi/digiuutiset/101765