Ongelmana on tehdä makro, joka kuvan vasemmanpuoleisesta taulukosta tekisi kuvan oikeanpuoleisen mallin mukaisen taulukon. Exceliin tuodaan viikottain uusi tiedosto, jossa rivien määrä vaihtelee.
Kuva: http://aijaa.com/wGtbyb
Kuva: http://aijaa.com/wGtbyb
Vastaukset 4
Vanhimmat
Miksi? Vasemmassa kuvassa tiedot näyttävät olevan hyvässä järjestyksessä.
Siksi, että vastaanottaja ohjelma tajuaa sen.
noduuliin...
Sub Muokkaa()
Dim vika As Long
Dim vika2 As Long
On Error Resume Next
Application.ScreenUpdating = False
Worksheets("Sheet2").Range("A:B") = ""
vika = Worksheets("Sheet1").Range("A65536").End(xlUp).Row
For i = 1 To vika - 1
vika2 = Worksheets("Sheet2").Range("A65536").End(xlUp).Row 1
Worksheets("Sheet1").Range("A1:E1").Copy
Worksheets("Sheet2").Range("A" & vika2).PasteSpecial Transpose:=True
Worksheets("Sheet1").Range("A" & i 1 & ":E" & i 1).Copy
Worksheets("Sheet2").Range("B" & vika2).PasteSpecial Transpose:=True
Next
Application.ScreenUpdating = True
Application.CutCopyMode = False
Worksheets("Sheet2").Activate
Range("A1").Select
Rows("1:1").Delete
Range("A1").Select
End Sub
miittele nimet ja alueet sopiviksi sopivaksi
Keep EXCELing
@Kunde
Kiitos!
Ensi viikolla pääsen testaamaan!