Avatar billede stigc Nybegynder
30. juli 2001 - 17:40 Der er 6 kommentarer og
1 løsning

WORD objekt

Jeg opretter et word objekt:

Private wrdApp As Word.Application \'MS Word object
Private wrdDoc As Word.Document \'MS Word Document

Hvordan sørger jeg for at åbne word i min FORM, så man ikke kan se nogen menuer eller bjælker fra WORD ?

Avatar billede stigc Nybegynder
30. juli 2001 - 19:17 #1
Eller ønsker jeg en gratis komponent, der kan vise og printe simpel tekst med tabeller...
Avatar billede oswald Nybegynder
31. juli 2001 - 09:12 #2
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.
Avatar billede stigc Nybegynder
31. juli 2001 - 11:47 #3
hvordan skirver jeg til den?
Avatar billede oswald Nybegynder
01. august 2001 - 14:25 #4
Der må jeg faktisk blive dig svar skyldig, jeg har lige prøvet selv og kunne faktisk heller ikke.
Avatar billede john_fodeh Nybegynder
02. august 2001 - 17:24 #5
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!\"
   
    \'Gem dokumentet (overskriver eksisterenede)
    WordDoc.SaveAs FileName:=\"C:\\TestDok\"
     
    WordDoc.Close
    WordApp.Quit

  Set WordDoc = Nothing
  Set WordApp = Nothing
End Sub
Håber du finder det anvendeligt.
Avatar billede stigc Nybegynder
02. august 2001 - 19:31 #6
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...
Avatar billede john_fodeh Nybegynder
03. august 2001 - 10:22 #7
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”).
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester