Vraag : lay-out voor woorddocument

Ik heb geschreven één of andere code om gegevens te krijgen een sql gegevensbestand, vormt en het aan een woordfusie document.
it werkt binnen boete plaatst, maar het enige probleem is de lay-out. ik gegevens van verscheidene collums, en omdat zij niet alle zelfde lengte zijn, lees krijgt de output messy.

example


Belarus verkoopt door Exclusieve 25
Belarus
Kazakhstan
Kazakhstan door Exclusieve 25
Russia verkoopt door Exclusieve 25
Tajikistan verkoopt door Exclusieve 25/>Ukraine
Uzbekistan verkoopt door Exclusieve 25

what verkoopt die ik ben de collumsout.

any- suggesties te voeren zou houden van?


" codeBody " 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

Dim rec8 als Nieuwe ADODB.Recordset
rec8.Open „SELECTEREN dbo. [Video-TV-rechten-Royalty]. Land, dbo. [Video-TV-rechten-Royalty] .landnaam, dbo. [Video-TV-rechten-Royalty] .recht, dbo. [Video-TV-rechten-Royalty] .percentage,“ _
           & „dbo. [Video-TV-rechten-Royalty] .memo, dbo. [de rechten van royaltyTV] .contractid, dbo. Exclusivetekst.tekst ZOALS exclusief VAN dbo. [de rechten van royaltyTV] BINNEN TREED“ _ toe
           & „dbo. [Video-TV-rechten-Royalty] OP dbo. [de rechten van royaltyTV] .contractid = dbo. [Video-TV-rechten-Royalty] .nr WEGGEGAAN BUITEN SLUIT zich aan bij dbo. Exclusivetekst OP dbo. [Video-TV-rechten-Royalty] .exclusive = dbo. Exclusivetekst. [ja-nee]“ _
        & „WAAR ([video-TV-rechten-Royalty]. [nr] =“ & dealmemo_contract_id & „) ORDE DOOR dbo. [Video-TV-rechten-Royalty]. Land“, _
        adLockOptimistic CurrentProject.Connection, adOpenKeyset,
'strtext talen
Als rec8.RecordCount > 0 toen
    rec8.MoveFirst
    Doe tot rec8.EOF
       strtext8 = strtext8 & Versiering (rec8! [Landnaam]. Waarde) & vbTab & „„& Versiering (rec8! [Recht]. Waarde) & vbTab &“ „& Versiering (rec8! [exclusief]. Waarde) & vbTab &“ „& Versiering (rec8! [percentage]. Waarde) & vbTab &“ „& Versiering (rec8! [Memorandum]. Waarde) & vbCrLf
       Debug.Print strtext8
       rec8.MoveNext
    Lijn

Antwoord : lay-out voor woorddocument

Vond het zelf, maakte lijst met 5 pagemarks, en de code in 5 sepaerateselecties verdelen
Andere oplossingen  
 
programming4us programming4us