add variable declaration

This commit is contained in:
Paul Trowbridge 2022-04-29 08:22:33 -04:00
parent 44555a7f13
commit 1020edb0e3
2 changed files with 2 additions and 0 deletions

View File

@ -40,6 +40,8 @@ End Sub
Private Sub bPICK_Click() Private Sub bPICK_Click()
Dim fd As Object
'--------Open file------------- '--------Open file-------------
Set fd = Application.FileDialog(msoFileDialogFolderPicker) Set fd = Application.FileDialog(msoFileDialogFolderPicker)
fd.Show fd.Show

Binary file not shown.