為了將FileDialog返回的SelectedItem作為對象使用,首先你需要聲明一個對象變量,并且將FileDialog的SelectedItems屬性賦予這個變量。下面是一個示例代碼:
Sub SelectFile()
Dim fd As FileDialog
Dim selectedItem As Variant
'創建一個FileDialog對象
Set fd = Application.FileDialog(msoFileDialogFilePicker)
'顯示FileDialog并獲取用戶選中的文件路徑
With fd
If .Show = -1 Then
'將選中的文件路徑賦予selectedItem變量
selectedItem = .SelectedItems(1)
'可以在這里繼續對選中的文件進行其他操作
MsgBox "選中的文件路徑:" & selectedItem
End If
End With
'釋放對象
Set fd = Nothing
End Sub
在上面的示例中,我們首先創建一個FileDialog對象,并將其賦予fd變量。然后使用Show方法顯示FileDialog,并在用戶選中文件后將選中的文件路徑賦予selectedItem變量。你可以根據自己的需求對選中的文件進行其他操作。最后,使用Set語句將fd對象設為Nothing,釋放內存。