Wordファイルをフォルダから選択して開く方法がわからないので教えてください
Documents.open filename:=.selectedItems(1) でエラーになってしまいます

Dim myFD As FileDialog
 Dim myFolderPath As String
My folderPath ="C:\Users\ユーザ名\Desktop\test"
 Set myFD = Application.FileDialog(msoFileDialogFilePicker)
 With myFD
 .Title = "Wordファイルを選択してください"
AllowMultiSelect = False
 With .Filters
.Clear
.Add "すべてのWordファイル", "*.doc; *.docx"
End With
.initialFileName = myFolderPath
If .Show = -1 Then
Documents.Open FileName:=.SelectedItems(1)
End If
.Filters.Clear
 End With
 Set myFD = Nothing
End Sub