Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: Herhalend sjabloon aanmaken  (gelezen 3251 keer)

0 leden en 1 gast bekijken dit topic.

Offline Temmerman_Diego

  • Ervaren lid
  • ***
  • Berichten: 313
  • Geslacht: Man
  • Don Diego
Herhalend sjabloon aanmaken
« Gepost op: 03 augustus 2009, 11:08:49 »
Hoi

Ik zou een Word-sjabloon willen aanmaken van 1 pagina dat zichzelf herhaalt binnen hetzelfde document na het invoeren van een harde return.

Kan dit in Word 2003?

Alvast dank voor suggesties.
Lukt niet wegens ongeldige klasse ???

Offline ceasar

  • Ervaren lid
  • ***
  • Berichten: 293
  • Geslacht: Man
  • de soep eten als ze heet is
Re: Herhalend sjabloon aanmaken
« Reactie #1 Gepost op: 04 augustus 2009, 07:44:30 »
diego,

dit kan in vba. met een beetje zoekwerk kan je hier veel documentatie vinden

https://msdn.microsoft.com/en-us/library/aa537163(office.11).aspx

uitwerking? liefst een voorbeeld wat je wil bekomen

groeten
JC
Windows 10 Pro   NLD 64bit
Intel(R) Core(TM) i7-3770K CPU @ 3.50GHz 3901
Z77X-UP5 TH-CF
AMD Radeon HD 7900 Series 4095MB 1024 x 768
Realtek High Definition Audio
Nr: 1 Model: WDC WD10 EARX-00N0YB0 SCSI Disk Device
Nr: 2 Model: INTEL SSDSC2CT120A3
C:\ NTFS 111,01GB 1,06GB 32 720MB
AV: Geen antivirus geïnstalleerd
FW: Windows Firewal Enabled: True

Offline Temmerman_Diego

  • Ervaren lid
  • ***
  • Berichten: 313
  • Geslacht: Man
  • Don Diego
Re: Herhalend sjabloon aanmaken
« Reactie #2 Gepost op: 04 augustus 2009, 13:46:45 »
In bijlage een voorbeeldje.

Lukt niet wegens ongeldige klasse ???

Offline ceasar

  • Ervaren lid
  • ***
  • Berichten: 293
  • Geslacht: Man
  • de soep eten als ze heet is
Re: Herhalend sjabloon aanmaken
« Reactie #3 Gepost op: 07 augustus 2009, 08:57:23 »
een voorbeeld van programma code, gemaakt met de macrorecorder in Word2003:

Sub test102()
'
' test102 Macro
' Macro opgenomen op 7-8-2009 door ceasar
'
cd:
    Selection.TypeText Text:="dslmjkleriklmdf"
    Selection.TypeParagraph
    Selection.TypeParagraph
    Selection.TypeParagraph
    Selection.TypeParagraph
    Selection.TypeText Text:="jlkjkljkjd"
    Selection.TypeParagraph
'geeft een pagina einde
    Selection.InsertBreak Type:=wdPageBreak
End Sub

u vult de plaats in van het brondocument.

als u het met de macro recorder aan doet en de macro opslaat en daarna alt f11 drukt ziet u de programmacode.

schrijf eerst op wat je allemaal doet en werk dit stuk voor stuk uit

zijn er problemen, stuur ze gerust door, ik zal helpen waar ik kan

groeten

JC
Windows 10 Pro   NLD 64bit
Intel(R) Core(TM) i7-3770K CPU @ 3.50GHz 3901
Z77X-UP5 TH-CF
AMD Radeon HD 7900 Series 4095MB 1024 x 768
Realtek High Definition Audio
Nr: 1 Model: WDC WD10 EARX-00N0YB0 SCSI Disk Device
Nr: 2 Model: INTEL SSDSC2CT120A3
C:\ NTFS 111,01GB 1,06GB 32 720MB
AV: Geen antivirus geïnstalleerd
FW: Windows Firewal Enabled: True

 


www.combell.com