Hallo allemaal,
Het is mijn bedoeling om met de volgende code het dialoogvenster te openen.
Dim oComDlg As Object
Dim strFile as String
Set oComDlg = CreateObject ("MSComDlg.CommonDialog")
oComDlg.DialogTitle = "Open"
oComDlg.Filter = "Microsoft Excel Files (*.xls)|*.xls"
oComDlg.InitDir = "C:\"
oComDlg.ShowOpen
If oComDlg.CancelError Or oComDlg.FileName = "" Then Exit Sub
strFile = oComDlg.FileName
set oComDlg = Nothing
Nu is het zo dat als ik dit thuis op mijn computer doe het prima werkt maar op mijn werk krijg ik de volgende foutmelding: "ActiveX onderdeel kan geen object maken"
Thuis werk ik met windows XP home en op mijn werk mer windows 98.
Weet iemand hier een oplossing voor?
mvrgr,
Theo
Het is mijn bedoeling om met de volgende code het dialoogvenster te openen.
Dim oComDlg As Object
Dim strFile as String
Set oComDlg = CreateObject ("MSComDlg.CommonDialog")
oComDlg.DialogTitle = "Open"
oComDlg.Filter = "Microsoft Excel Files (*.xls)|*.xls"
oComDlg.InitDir = "C:\"
oComDlg.ShowOpen
If oComDlg.CancelError Or oComDlg.FileName = "" Then Exit Sub
strFile = oComDlg.FileName
set oComDlg = Nothing
Nu is het zo dat als ik dit thuis op mijn computer doe het prima werkt maar op mijn werk krijg ik de volgende foutmelding: "ActiveX onderdeel kan geen object maken"
Thuis werk ik met windows XP home en op mijn werk mer windows 98.
Weet iemand hier een oplossing voor?
mvrgr,
Theo
