Läste en kurs/tips om koppling till WORD på denna site. Där beskrevs hur man kan koppla ett word dokument och manipulera texten i det. Detta gällde bara WORD2000 ej tidigare. Hur gör jag om jag inte vet kundens office-version, eller åtminstonde om jag måste kunna koppla mig till 2000 och tidigare från samma VB-program? Testa detta !!! Hej Max!Koppla till Office2000 OCH tidigare.
Sv: Koppla till Office2000 OCH tidigare.
Option Explicit
Dim ObjApp As Object
Private Sub Form_Load()
'
MakeWord
'
ObjApp.Documents.Add
ObjApp.ActiveDocument.Content.InsertAfter "Hej hopp Max !!!"
ObjApp.Visible = True
'
End Sub
Private Sub MakeWord()
On Error GoTo create:
Set ObjApp = GetObject(, "word.application")
Exit Sub
create:
Set ObjApp = CreateObject("word.application")
Err.Clear
End SubSv: Koppla till Office2000 OCH tidigare.
Min erfarenhet är att man måste veta vilken version av Word användaren har installerad.
Jag gjorde ett program med utskrifter i Word 2000 på min burk för ett tag sedan och skapade således en referens till MsWord9.olb.
När jag installerade programmet på en dator med Word 97 fungerade inte mina utskrifter för att denna referens inte var kompatibel (skall vara MsWord8.olb för Word97.).
Det funkar ej heller att skapa referenser till båda biblioteken.
Detta är min erfarenhet. Kanske någon annan har en annan dito.
Mvh
/Staffan (hälsa Cidde)