A voir également:
- Traiter le bouton Annuler des CommonDialog
- Bouton rechercher ✓ - Forum Visual Basic
- Bouton Rechercher - Forum Visual Basic
- Bouton de commande basse - Forum Visual Basic 6
- VB2010 et Access Bouton Rechercher - Forum VB.NET
- Bouton grisé ✓ - Forum Javascript / DHTML
1 réponse
With CommonDialog1
.CancelError = True
.DialogTitle = "Enregistrer sous..."
.InitDir = CurDir
.Filter = "Tous les fichiers (*.*)|*.*|"
.FilterIndex = 1
Err.Clear
.ShowSave
If Err.Number <> 0 Then
' On n'à pas appuyer sur Enregistrer, surment sur Annuler ou sur la croix noir en haut à droite !!!
End If
End With
.CancelError = True
.DialogTitle = "Enregistrer sous..."
.InitDir = CurDir
.Filter = "Tous les fichiers (*.*)|*.*|"
.FilterIndex = 1
Err.Clear
.ShowSave
If Err.Number <> 0 Then
' On n'à pas appuyer sur Enregistrer, surment sur Annuler ou sur la croix noir en haut à droite !!!
End If
End With
