Beste kenners,
Wie weet of het mogelijk is de volgende marco aan te vullen met een code die er voor zorgt dat het word documentje automatisch opslaat met de waarde die in cel a1 staat .
Alvast bedankt
Dim WordObj As Word.Application
Set WordObj = CreateObject("word.application")
WordObj.Visible = True
WordObj.Documents.Add "d:\\Mijn documenten\offerte\prijslijst.dot"
WordObj.Selection.Goto wdGoToBookmark, Name:="plakken"
WordObj.Selection.Paste
Application.CutCopyMode = False
ThisWorkbook.Close savechanges:=False
End Sub
Wie weet of het mogelijk is de volgende marco aan te vullen met een code die er voor zorgt dat het word documentje automatisch opslaat met de waarde die in cel a1 staat .
Alvast bedankt
Dim WordObj As Word.Application
Set WordObj = CreateObject("word.application")
WordObj.Visible = True
WordObj.Documents.Add "d:\\Mijn documenten\offerte\prijslijst.dot"
WordObj.Selection.Goto wdGoToBookmark, Name:="plakken"
WordObj.Selection.Paste
Application.CutCopyMode = False
ThisWorkbook.Close savechanges:=False
End Sub
Laatst bewerkt: