Bonjour,
Voici quelques sites qui pourront t'aider à programmer en VBA (dans l'ordre d'apprentissage on va dire) :
À noter que VBA et VB ont beaucoup de choses en commun : les explications données à VB sont globalement valabes pour VBA (si jamais tu trouves un site proposant une meilleure pédagogie pour VB).
Concernant le programme que tu veux faire, il ressemblerait à ceci :
Routine exécutée lors d'un clic sur le bouton CommandButton1 :
Private Sub CommandButton1_Click()
Dim Ligne As Integer
Dim Colonne As Integer
Ligne = 9
Colonne = 4
If IsDate(Cells(Ligne, Colonne).Value) = True Then
MaSousRoutine1
Else
MaSousRoutine2
End If
End Sub |
On vient de déclarer deux variables (Ligne et Colonne) et on leur donne une valeur.
Puis on se sert de la fonction IsDate() qui renverra la valeur True si son argument est une date.
Dans notre cas, son argument est la valeur contenue dans la cellule D9.
Si la fonction IsDate renvoie True, alors on lance la procédure MaSousRoutine1. Si non, alors on lance la procédure MaSousRoutine2.
Voici le contenu des deux procédures :
Sub MaSousRoutine1()
MsgBox "C'est une date !"
End Sub |
Sub MaSousRoutine2()
MsgBox "Ce n'est pas une date !"
End Sub |
Leur but est d'afficher une boîte de dialogue personnalisée. Bien sûr, toi, tu remplaceras cette fonction par ce que tu veux.
N'hésite pas à passer par ici si tu bloques sur un point après quelques recherches 
Message édité par juju2k le 16-09-2006 à 20:08:13
