Macro
benou
-
gbinforme Messages postés 15481 Date d'inscription Statut Contributeur Dernière intervention -
gbinforme Messages postés 15481 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Je dois gerer plusieurs piece pour plusieurs moteurs differents sur une meme feuille excel
J'ai un tableau, avec plusieurs colonnes a renseigner
J'aimerai que losqu'un opérateur renseigne toute une ligne, cela crée automatiquement une nouvelle ligne juste en dessous de la précédente pour pouvoir saisir une nouvelle pièce pou le même moteur.
Moteur type numero piece manquant
456 7 32221 ecrou 1
234 4 456 joint 1
Voici le tableau
Pour etre plus clair quand l'opérateur à renseigné le moteur, son numéro, son type, et son manquant et qu'il valide sa saisie ( entrer ou changer de case )
La macro insére une nouvelle ligne avec le même moteur, le même numéro, le même type, mais que les cases piece et manquants restent a saisir.
J'espere que j'ai été assez clair
Merci d'avance
Je dois gerer plusieurs piece pour plusieurs moteurs differents sur une meme feuille excel
J'ai un tableau, avec plusieurs colonnes a renseigner
J'aimerai que losqu'un opérateur renseigne toute une ligne, cela crée automatiquement une nouvelle ligne juste en dessous de la précédente pour pouvoir saisir une nouvelle pièce pou le même moteur.
Moteur type numero piece manquant
456 7 32221 ecrou 1
234 4 456 joint 1
Voici le tableau
Pour etre plus clair quand l'opérateur à renseigné le moteur, son numéro, son type, et son manquant et qu'il valide sa saisie ( entrer ou changer de case )
La macro insére une nouvelle ligne avec le même moteur, le même numéro, le même type, mais que les cases piece et manquants restent a saisir.
J'espere que j'ai été assez clair
Merci d'avance
A voir également:
- Macro
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Jitbit macro recorder - Télécharger - Confidentialité
- Macro maker - Télécharger - Divers Utilitaires
- Actiona macro - Télécharger - Divers Utilitaires
1 réponse
bonjour
Avec une macro événementielle cela devrait fonctionner :
Pour changer de moteur faudra effacer ?
Avec une macro événementielle cela devrait fonctionner :
Private Sub Worksheet_Change(ByVal sel As Range)
If sel.Column = 5 And sel.Count = 1 Then
Cells(sel.Row, 1).Resize(1, 3).Copy Destination:=Cells(sel.Row + 1, 1)
Cells(sel.Row + 1, 4).Select
End If
End Sub
Pour changer de moteur faudra effacer ?