Formule om vragen aan te passen

[buck0306]

Beste forum members,

Ik ben al een tijdje bezig met triviant vragen, die in een chat gebruikt gaan worden, aan te passen.
Nu is er een nieuw script nodig echter zit ik met mijn handen in het haar. Ik ben op zoek naar een formule die voor de vraag Q: plaatst en bij het antwoord A:
Daarnaast moet het antwoord in de regel eronder staan.

Voorbeeld oude situatie:
Sinds welk jaar behoorde de Filippijnen onder het beheer van de VSA:1898

Moet worden:
Q:Sinds welk jaar behoorde de Filippijnen onder het beheer van de VSA
A:1898

Heeft iemand hier een oplossing cq. script voor want om een kleine 10000 vragen handmatig aan te passen is monnikenwerk.

Bedankt
Roland

 

[HierEnNu]

Als de oorspronkelijke vraag in A1 staat gebruik dan de volgende formules:
="Q:"&LINKS(A1;VIND.ALLES(":";A1;1)-1)
="A:"&RECHTS(A1;LENGTE(A1)-VIND.ALLES(":";A1))

Succes.

M.

 

[buck0306]

Beste M,

Bedankt voor je formule om de vraag en antwoord te scheiden echter ik zou graag willen dat het antwoord dan in een aparte regel eronder komt is dit mogelijk binnen excel of moet ik hiervoor iets anders gebruiken.

Nu staat er netjes in B1 Q: met de vraag en in C1 A: antwoord
Graag zou ik dan willen zien dat er in B1 Q: met vraag en in B2 het antwoord
alleen is het dan wel de bedoeling dat de vraag van B2 naar B3 verhuist en het antwoord van B3 dan komt op B4 etc.

Groet Roland

 

[Wigi]

In B1:

="Q:"&LINKS(INDEX(A:A;(RIJ()+1)/2);VIND.ALLES(":";INDEX(A:A;(RIJ()+1)/2);1)-1)

In B2:

="A:"&RIGHT(INDEX(A:A;ROW()/2);LEN(INDEX(A:A;ROW()/2))-FIND(":";INDEX(A:A;ROW()/2)))

Beide selecteren en doorvoeren naar beneden. Dan Kopiëren, Plakken Speciaal > Waarden doen want deze formules zijn niet van de meest zuinige. Zeker niet 10000 van die formules.

Wigi

 

[GiMe]

Voor de duidelijkheid :
in B2 :
="A:"&RECHTS(INDEX(A:A;RIJ()/2);LENGTE(INDEX(A:A;RIJ()/2))-VIND.ALLES(":";INDEX(A:A;RIJ()/2)))

GiMe

 

[Wigi]

Voor de duidelijkheid :
in B2 :
="A:"&RECHTS(INDEX(A:A;RIJ()/2);LENGTE(INDEX(A:A;RIJ()/2))-VIND.ALLES(":";INDEX(A:A;RIJ()/2)))

GiMe

Bedankt, post niet nagekeken