Hvis du har Word installeret så burde du under Components (ctl + t) -> insertable Objects have et object der hedder Microsoft Word Document. Den klikker du af og så kan du vise et word dokument i din form.
Du bruger Word API’en (kræver at du har Word installeret). Når du opretter et Word objekt så har adgang til alle dets properties og metoder. Dette sker usynligt (dvs. uden at du behøver at åbne Word eller bruge Words menuer og bjælker). Eksempel: Opretter et Word dokument og skriver en lille tekst. Sub WriteWordText() Dim WordApp As Object \' MS Word basic application object Dim WordDoc As Object \' MS Word basic document object
\'Opret reference til Word object Set WordApp = CreateObject(\"Word.Application.8\") If (WordApp Is Nothing) Then MsgBox \"Kunne ikke find MSWord97 !!!\" Exit Sub End If \'Tilføj et dokument baseret på \"Normal\" skabelonen Set WordDoc = WordApp.Documents.Add(Template:=\"Normal\", NewTemplate:=False)
\'Tilføj tekst WordApp.Selection.TypeText Text:=\"Dette er en test!!\" & Chr(13) & \"Farvel!\"
john_fodeh >> Ja sådan har jeg også fået det til at virke, men jeg ønsker at åbne word i en form, så man kan se documentet og ikke andet. Så vidt jeg kan se gør din kode ikke det...
Det forrige eksempel vil kun oprette dokumentet. Hvis du vil vise indholdet i en form, skal du oprette et ”Embedded OLE object” (i Toolbox’en ikon med teksten ”OLE”), således kan du vælge et standard MS Word objekt (eller en bestemt fil) og indsætte det i din form. En bruger vil kunne editere dokumentet ved at dobbeltklikke på det. Såfremt du ønsker at låse denne mulighed skal du vælge objektet på formen, hvorefter du kan sætte property’en ”AutoActive” til ”0-Manual” (I stedet for default ”2-DoubleClick”).
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.