执行前验证

Question

我创建了一个带有一个按钮的useform，该按钮允许您选择要使用的文件夹（提取文件夹）以及其他按钮来执行其他任务，我想知道如何在每次单击按钮以执行任务，它首先检查是否选择了“提取文件夹”按钮，否则在执行任务之前先进行检查。 这是提取文件夹的代码。 谢谢您的帮助

Private Sub Repertoire_Click()
Dim folder As Office.filedialog
Set folder = Application.filedialog(msoFileDialogFolderPicker) 'Fênetre contextuelle pour le choix du dossier
With folder
.Title = "Selectionner le dossier contenant les extractions"
.AllowMultiSelect = False  '
 If .Show = -1 Then 
 ExtractionFolder = .SelectedItems(1)

End If
End With


End Sub