COMMONDIALOG1 CANCELAR OU OK
Como que eu sei se foi clicado numa CommonDialog1 o botao CANCELAR
ou o botao SALVAR ou ABRIR ???
ou o botao SALVAR ou ABRIR ???
Tente isso
Private Sub Command1_Click()
On Error GoTo Erro
CommonDialog1.DialogTitle = "Teste"
CommonDialog1.Filter = "Microsoft Access Database (*.MDB) | *.MDB"
CommonDialog1.ShowOpen
CommonDialog1.CancelError = True
CommonDialog1.DefaultExt = "*.MDB"
If CommonDialog1.FileName <> "" Then
MsgBox CommonDialog1.FileName
Else
MsgBox "Voce tem que selecionar um arquivo"
End If
Exit Sub
Erro:
MsgBox "Voce cancelou"
End Sub
Tópico encerrado , respostas não são mais permitidas