criscris11
XLDnaute Accro
Bonjour à tous,
Dans un classeur, j'ai cette macro :
Sub nouveaupax()
'
' nouveaupax Macro
' Macro enregistrée le 29/11/2004 par compta3
'
'
Sheets(Array('ETAT MILIT', 'ETAT CIVIL', 'DIP ET STG', 'PERMIS', _
'CONTRAT PASSEPORT', 'TRESO', 'SANTE', 'CHANC', 'PERMS', 'NOT. ORIENTATIONS')). _
Select
Sheets('ETAT MILIT').Activate
End Sub
qui me permet d'ajouter une ligne dans tous les onglets en même temps. Serait'il possible de rajouter une ligne de commande afin que cette macro, lors de l'ajout d'un nouveau personnel, recopie les formules sans les valeurs de la ligne supérieure. Toutes les formules sont différentes suivant les onglets et ne sont pas toutes placées au même endroit dans les onglets. En clair si j'ajoute un nouveau personnel via cette macro et que dans l'onglet 'ETAT MILIT' en K3='CONTRAT PASSEPORT'!G3, je voudrai que le nouveau personnel inséré en ligne 4 soit K4='CONTRAT PASSEPORT'!G4. Merci et bon week-end à tous.
Dans un classeur, j'ai cette macro :
Sub nouveaupax()
'
' nouveaupax Macro
' Macro enregistrée le 29/11/2004 par compta3
'
'
Sheets(Array('ETAT MILIT', 'ETAT CIVIL', 'DIP ET STG', 'PERMIS', _
'CONTRAT PASSEPORT', 'TRESO', 'SANTE', 'CHANC', 'PERMS', 'NOT. ORIENTATIONS')). _
Select
Sheets('ETAT MILIT').Activate
End Sub
qui me permet d'ajouter une ligne dans tous les onglets en même temps. Serait'il possible de rajouter une ligne de commande afin que cette macro, lors de l'ajout d'un nouveau personnel, recopie les formules sans les valeurs de la ligne supérieure. Toutes les formules sont différentes suivant les onglets et ne sont pas toutes placées au même endroit dans les onglets. En clair si j'ajoute un nouveau personnel via cette macro et que dans l'onglet 'ETAT MILIT' en K3='CONTRAT PASSEPORT'!G3, je voudrai que le nouveau personnel inséré en ligne 4 soit K4='CONTRAT PASSEPORT'!G4. Merci et bon week-end à tous.
