incrémenter d'une cellule dés qu'elle est remplie

  • Initiateur de la discussion Initiateur de la discussion controlo
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

controlo

XLDnaute Occasionnel
Bonjour à tous ,


Je souhaiterais faire une macro qui incrémente d'une cellule vers la droite dés que la précédente est remplie.Par exemple ,je partirais de la cellule A1 et attendrais que des caractères soient saisis à l'intérieur et une fois cela fait on passerais à la cellule B1 qui à son tours attendrais de recevoir des caractères pour passer a la cellule C1 et ceci jusqu'à la cellule D1.Un fois D1 remplie ,il faudrait passer en A2 et recommencer le cycle.Cela jusqu'à la ligne 24.


Merci de me donné un coup de main!!!!!
 
Re : incrémenter d'une cellule dés qu'elle est remplie

Bonjour
qu'appelles tu incrémenter d'une cellule ? Déplacer le curseur ?
Ton truc n'est pas évident à manipuler : la notion de "des caractères" est des plus floues.
Comment Excel sait-il que tu as fini de faire ta saisie ?
La touche tabulation te permet de valider la saisie et de passer à la cellule à droite.
La touche entrée à la cellule du dessous
 
Re : incrémenter d'une cellule dés qu'elle est remplie

Bonjour Misange,
Bonjour Controlo, si tu tiens à la macro là voici, à mettre dans le code de l'onglet
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
col = Target.Column + 1: lig = Target.Row
If col > 5 Or lig > 24 Then Exit Sub
If col = 5 Then col = 1: lig = lig + 1
Cells(lig, col).Select
End Sub

Bruno
 
Re : incrémenter d'une cellule dés qu'elle est remplie

Bonjour à tous,

Sans code en protégeant toutes les cellules en déprotégeant les cellules A1 à D24 et en utilisant la Tabulation comme déjà précisé par Misange.

A + à tous
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

W
Réponses
8
Affichages
2 K
Willmaz
W
F
Réponses
7
Affichages
3 K
fredzertya
F
B
Réponses
2
Affichages
2 K
B
Réponses
15
Affichages
7 K
Retour