Fout 438 tijdens runtime, aleen op Mac.

Status
Niet open voor verdere reacties.

RobDenkt

Nieuwe gebruiker
Lid geworden
18 apr 2014
Berichten
3
Ik (beginner op het gebied van VBA) heb, met de nodige hulp van dit forum, een macro gemaakt voor Excel die prima functioneert.
Alleen... als ik dezelfde macro uitvoer op een Mac (op meerdere geprobeerd) krijg ik een foutmelding:

Fout 438 tijdens runtime:
Het object ondersteunt deze eigenschap of methode niet.

De regel waarop het vastloopt luidt:

Set fDialoog = Application.FileDialog(msoFileDialogOpen)

Hoe kan ik maken dat een Mac deze regel ook accepteert?
 
wellicht ?

Code:
Sub M_snb()
  With Application.FileDialog(1)
    .Show
    c00 = .SelectedItems(1)
  End With
End Sub
 
Of deze:
Code:
fDialoog = Application.GetOpenFilename("Excel Files (*.xls), *.xls", 0, "Titel", MultiSelect:=False)
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan