Création d'une macro
Résolu
Jiben59
Messages postés
120
Date d'inscription
Statut
Membre
Dernière intervention
-
Millaï Messages postés 171 Date d'inscription Statut Membre Dernière intervention -
Millaï Messages postés 171 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
j'aimerai créer une macro pour que ma base de données m'avertir lorsqu'un champs n'a pas été remplit.
Par exemple, lorsque je rentre une date, je ne peux pas finir ma ligne si je n'ai pas renseigné le libellé du mouvement.
M'aider à comprendre à créer une ligne, et j'essaierai de faire la suite ensuite par mes soins.
Voici la capture d'&écran : http://www.hostingpics.net/viewer.php?id=632307Macro.png
Je remercie tous les gens qui m'aideront.
Bonne fin de journée,
cordialement.
j'aimerai créer une macro pour que ma base de données m'avertir lorsqu'un champs n'a pas été remplit.
Par exemple, lorsque je rentre une date, je ne peux pas finir ma ligne si je n'ai pas renseigné le libellé du mouvement.
M'aider à comprendre à créer une ligne, et j'essaierai de faire la suite ensuite par mes soins.
Voici la capture d'&écran : http://www.hostingpics.net/viewer.php?id=632307Macro.png
Je remercie tous les gens qui m'aideront.
Bonne fin de journée,
cordialement.
A voir également:
- Création d'une macro
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Creation compte gmail - Guide
- Création site web - Guide
- Media creation tool - Télécharger - Systèmes d'exploitation
- Création compte google - Guide
1 réponse
Bonjour,
A mettre dans le Worksheet de votre page.
J'ai laisser le code le plus simple possible mais ont peut le réduire et prévoir les autres lignes le modifiant un peu
'Si A1 n'es pas vide alors ont force la selection sur A2
If Not Cells([1], [1]) = "" And Cells([1], [2]) = "" Then
Cells([1], [2]).Select
End If
'Si A2 n'es pas vide alors ont force la selection sur A3
If Not Cells([1], [2]) = "" And Cells([1], [3]) = "" Then
Cells([1], [3]).Select
End If
'Si A3 n'es pas vide alors ont force la selection sur A4
If Not Cells([1], [3]) = "" And Cells([1], [4]) = "" Then
Cells([1], [4]).Select
End If
'Si A4 n'es pas vide alors ont force la selection sur A5
If Not Cells([1], [4]) = "" And Cells([1], [5]) = "" Then
Cells([1], [5]).Select
End If
'Si A5 n'es pas vide alors ont force la selection sur A6
If Not Cells([1], [5]) = "" And Cells([1], [6]) = "" Then
Cells([1], [6]).Select
End If
A mettre dans le Worksheet de votre page.
J'ai laisser le code le plus simple possible mais ont peut le réduire et prévoir les autres lignes le modifiant un peu