Domino 9 und frühere Versionen > Entwicklung

Bitte Erklärung: Excel in Notes nutzen.

<< < (2/4) > >>

Axel:
Hi,

hast du die Variable doc (Typ NotesDocument) initialisiert und einen gültigen Feldnamen benutzt ?


Axel

Darkface:
Jetz sagt er bei mir:
Object variable not set

Gruß
Darkface

Axel:
Hi,

hab ihr auch die Script-Bibliothek, in der die Klasse enthalten ist, eingebunden ?

Angenommen die Bibliothek heisst libExcel, dann muß die Bibliothek mit

  uses "libExcel"  (im Options - Teil)

eingebunden werden.

Axel

Darkface:
Ich habe alles so wie es seien sollte.

--- Code: ---
     Dim objExcel As CExcel      
     Dim doc As NotesDocument
     
     ' Erstellen eines OLE-Objects
     Set objExcel = New CExcel
     ' Erstellt neue Arbeitsmappe
     Call objExcel.NewWorkbook
     ' Ziel, Feldinhalt
     Call objExcel.SetCellValue("A1", doc.Feldname(0))
     ' Excel in den Vordergrund      
     Call objExcel.ActivateExcel
     Delete objExcel

--- Ende Code ---


Das habe ich und deine Scriptbibliothek.

Gruß
 Darkface

Axel:
Hi,

hier mal ein komplettes Beispiel für einen Aktionsbutton im Dokument:

(Options)
Use "libExcel"

Click
Sub Click(Source As Button)

 Dim ws As New NotesUIWorkspace
 Dim uidoc As NotesUIDocument
 Dim doc As NotesDocument
 Dim oExcel As cExcel      

 Set uidoc = ws.CurrentDocument
 Set doc = uidoc.Document

 Set oExcel = New cExcel  'Erstellen eines OLE-Objects
 Call oExcel.NewWorkbook 'Erstellt neue Arbeitsmappe
 Call oExcel.SetCellValue("A1", doc.Feldname(0)) 'Feldinhalt in Zelle A1
 Call oExcel.ActivateExcel  'Excel in den Vordergrund
 Delete oExcel

End Sub

Anmerkungen:
Die Script-Bibliothek mit der Klasse heißt libExcel.
Feldname muss durch den Namen, eines in der Maske vorhandenen Feldes, ersetzt werden.

Noch eine Anmerkung zur Script-Bibliothek: man muss darauf achten, dass im Options-Teil Option Public eingetragen ist. Sonst ist die Klasse ausserhalb der Bibliothek nicht sichtbar.

Axel

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete