Funktion W32_NEMGetFile

Zu zweitens:

Du erzeugst ein Excel-File erst durch das Speichern. Mit CreateObject wird lediglich ein Excel-Object erzeugt. Und das brauchst Du auch beim Oeffnen eines bestehenden Sheets.
Hier ein Beispiel dafuer:

file=ws.openfiledialog(False,"","Excel|*.xls","c:\")
If Not (Isarray(file)) Then Exit Sub
Set xlApp = CreateObject( "Excel.Application" )
xlApp.Workbooks.Open file(0)

W32_NEMGetFile gibt es nicht, die Function heisst NEMGetFile und ist Bestandteil der nnotesws.dll - und ist seitens IBM nicht dokumentiert (kann also jederzeit auch geändert oder entfernt werden!).

Hier ein Beispiel:

Declare Function NEMGetFile Lib "nnotesws" ( wHandle As Integer, Byval szFileName As String, _
Byval szFilter As String, Byval szTitle As String ) As Integer


Sub Click(Source As Button)


'Declare variables...
Dim szFileName As String*256
Dim szTitle As String
Dim szFilter As String


Dim szSelectedFile as String


'Set values...


szFilename = Chr(0)
szTitle = "Open File"
szFilter = "All Files |*.*|Word Document |*.doc|Text Files|*.txt|"
If NEMGetFile( 0, szFileName, szFilter, szTitle) <> 0 Then


szSelectedFile = szFileName


End If


End Sub

HTH,
Bernhard

Das wird irgendeine Win32 API Funktion sein, also musst du dazu in die API Dokumentation von Windows schauen (z.b. MSDN)

Nein - Notes API.

Wenn du ein Tool wie QuickViewPlus hast, dann kannst du dir von einer DLL die ExportTable anschauen.
Diese definiert die aufrufbaren Funktionen.

Allerdings bekommst du darüber keine Parameter heraus.
Dafür brauchst du die Dokumentation des Herstellers

Zitat

Als es gibt in den Windowsverzeichnissen eine DLL, die so heißt!!

Komisch - mein Windows (XP) funktioniert auch ohne diese DLL

Unter 2000 existiert die auch nicht

Ich könnte ja mal mein Uralt-Notebook 'rauskramen und bei Windows98 nachschauen

Google gibt exakt drei Treffer:
- SearchDomino
- Das Notes-Board von Experts-Exchange und
- AtNotes.

Das spricht nicht gerade für eine Windows-DLL

Bernhard