Åbn Worddokument fra Excel

Åbn Worddokument fra Excel

I denne artikel vil jeg vise hvordan du ved hjælp af VBA kan åbne et worddokument fra Excel.
Anvend blot denne kode:

Dim objWord
Dim objDoc
Dim objSelection
Dim Fileopened As String
Set objWord = CreateObject("Word.Application")
objWord.Visible = True
Fileopened = "C:\Users\Bruger\Documents\Dokument.docx"
vFile = Dir
Set objDoc = objWord.Documents.Open(Filename:=Fileopened)

Du kan også vælge at åbne worddokumentet som Readonly. Så erstatter du bare sidste linje med:

Set objDoc = objWord.Documents.Open(Filename:=Fileopened, ReadOnly:=True)

Andreas Andersen

Forfatter og grundlægger af IT-blogger.dk, der har blogget om IT-emner siden 2012

Skriv et svar

%d bloggers like this: