Gegevens uit cellen onder elkaar naast elkaar weergeven

[Koppelstukje]

Hoi,

Ik heb een excel sheet met wat gegevens.

voorbeeld

1.Wat is de afstand tussen de school en de bushalte?
A.1 km
B.2 km
C.2,5 km
2.Hoeveel lampen hangen in het lokaal.
A.1
B.9
C.12

Alle vragen staan in deze volgorde , eerst een nr dan de vraag .
Ook steeds A B C

Wat ik zou willen is dit .
1.Wat is de afstand tussen de school en de bushalte? A.1 km B.2 km C.2,5 km

De vraag in kolom E dan antwoord A in F antwoord B in G en dan antwoord C in H.

Is dit mogelijk in vba ? Het zijn namelijk heel veel vragen.

 

[edmoor]

Ik neem aan dat je dat in Excel hebt?
Plaats dan even een voorbeeld documentje.

 

[rebmog]

Kan ook zonder VBA. Zie voorbeeldje.

 

[Koppelstukje]

Bekijk bijlage Test helpmij.xlsx

 

[edmoor]

Maar heb je al bekeken wat rebmog voor je maakte? Dat werkt prima.

 

[Koppelstukje]

Zit net te experimenteren met het bestandje van Rebmog. Werkt inderdaad goed.

Maar als ik alle cellen die nu op volgorde staan wil kopieeren zijn het verwijzingen , hoe haal ik dan alle formule's weg en dat de vragen blijven staan ?

Ben niet zo heel erg thuis in Excel.

 

[snb]

Met een macro:

Sub M_snb()
  sn = Columns(1).SpecialCells(2)
  
  For j = 1 To UBound(sn) Step 4
      Cells(j \ 4 + 1, 5).Resize(, 4) = Array(sn(j, 1), sn(j + 1, 1), sn(j + 2, 1), sn(j + 3, 1))
  Next
End Sub

 

[Koppelstukje]

Werkt goed , bedankt allemaal voor de medewerking en voorbeelden.:thumb: