NickMaertens
Nieuwe gebruiker
- Lid geworden
- 6 apr 2011
- Berichten
- 1
Dag iedereen
Ik zit al een hele dag te zoeken, maar geraak er niet wijs uit.
Ik heb een sjabloon, daarin zou de tekst van verschillende bestanden moeten komen
De bestanden kun je selecteren met comboboxen.
Het is me al gelukt deze bestanden te openen, en om heel de tekst te selecteren en te kopiëren naar het huidige bestand. Het plakken in dit bestand wil ook nog niet lukken...
Ik zou de tekst vanaf de 3de pagina moeten hebben vanuit het ene bestand...
Dit is mijn huidige code voor het openen, kopiëren en plakken:
ChangeFileOpenDirectory _
"C:\Users\Nick\Desktop\Stage\Rest\Eigen Handleiding MACRO\"
Documents.Open FileName:=Bestand1, ConfirmConversions:= _
False, ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _
PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _
WritePasswordTemplate:="", Format:=wdOpenFormatAuto, XMLTransform:=""
Selection.WholeStory
Selection.Copy
ThisDocument.Activate
Selection.PasteAndFormat (wdUseDestinationStylesRecovery)
Kan er mij iemand helpen?
In ieder geval al bedankt om het eens te lezen!
Groeten
Nick
Ik zit al een hele dag te zoeken, maar geraak er niet wijs uit.
Ik heb een sjabloon, daarin zou de tekst van verschillende bestanden moeten komen
De bestanden kun je selecteren met comboboxen.
Het is me al gelukt deze bestanden te openen, en om heel de tekst te selecteren en te kopiëren naar het huidige bestand. Het plakken in dit bestand wil ook nog niet lukken...
Ik zou de tekst vanaf de 3de pagina moeten hebben vanuit het ene bestand...
Dit is mijn huidige code voor het openen, kopiëren en plakken:
ChangeFileOpenDirectory _
"C:\Users\Nick\Desktop\Stage\Rest\Eigen Handleiding MACRO\"
Documents.Open FileName:=Bestand1, ConfirmConversions:= _
False, ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _
PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _
WritePasswordTemplate:="", Format:=wdOpenFormatAuto, XMLTransform:=""
Selection.WholeStory
Selection.Copy
ThisDocument.Activate
Selection.PasteAndFormat (wdUseDestinationStylesRecovery)
Kan er mij iemand helpen?
In ieder geval al bedankt om het eens te lezen!
Groeten
Nick
