title image


Smiley Es geht auch anders.
Ich bin zwar kein Freund von Verweisen zu andern Programmen, wenn man

nur eine Funktion braucht, aber so kannst du auch Excel-Funktionen in

Access verwenden (Eine Variante mit Verweis eine OHNE:)





Sub TEST1()

'Achtung Verweis auf "Micrusoft Excel 8.0 Object Library" setzen 'ggf. an Version anpassen

Dim ExcelApp As New Excel.Application

MsgBox ExcelApp.Proper("hallo sven")

Set ExcelApp = Nothing

' Oder: MsgBox Excel.Application.Proper("hallo sven")

End Sub



Sub TEST2()

'Kein Verweis nötig!

Dim ExcelApp As Object

Set ExcelApp = CreateObject("Excel.Application.8")'ggf. an Version anpassen

MsgBox ExcelApp.CLEAN(" hallo sven ")

Set ExcelApp = Nothing

End Sub


Schöne Grüße
Ralf

(Ich verwende: Windows XP / Office XP)


Meine Links:
Meine Homepage
DBWiki
The Access Web


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: