F
fb40
Guest
Bonjour,
j'ai un doc excel dans lequel je rentre sur une ligne un agent et les elements qui permettent de calculer sa paye.
A coter de cette ligne, j'ai un bouton qui execute une macro qui me copie les éléments de cette ligne sur une ligne utilisée que pour cela. Puis la macro me recopie ces données dans une autre feuille sous forme de facture et qui me l'imprime.
Cela marche bien mais mon probleme c'est que je suis obligé de faire un bouton pour chaque ligne et donc de faire une macro pour chaque bouton.
A cause de cela je ne peux pas faire une vrai base de donnée avec ma liste.
sachant que la première ligne de ma liste commence à la ligne 6 et que automatiquement cela me marque 1 dans une cellule pour compter le nombre de cellule, est-il possible d'avoir un bouton qui me demanderait le n° de début et de fin de ligne à imprimer.
voici ma macro pour chaque bouton d'impression de ligne :
Sub Decont6()
'Macro enregistrée le 07/09/2000 par Fb40
Range("B6:aa6").Select
Selection.Copy
ActiveWindow.ScrollColumn = 1
Range("B1").Select
ActiveSheet.Paste
Sheets("Decomptes").Select
Application.CutCopyMode = False
ActiveWindow.SelectedSheets.PrintOut copies:=1
Sheets("Base").Select
Range("A4").Select
End Sub
J'èspère que je ne suis pas trop obscure dans ma demande; par avance merci.
fb40
j'ai un doc excel dans lequel je rentre sur une ligne un agent et les elements qui permettent de calculer sa paye.
A coter de cette ligne, j'ai un bouton qui execute une macro qui me copie les éléments de cette ligne sur une ligne utilisée que pour cela. Puis la macro me recopie ces données dans une autre feuille sous forme de facture et qui me l'imprime.
Cela marche bien mais mon probleme c'est que je suis obligé de faire un bouton pour chaque ligne et donc de faire une macro pour chaque bouton.
A cause de cela je ne peux pas faire une vrai base de donnée avec ma liste.
sachant que la première ligne de ma liste commence à la ligne 6 et que automatiquement cela me marque 1 dans une cellule pour compter le nombre de cellule, est-il possible d'avoir un bouton qui me demanderait le n° de début et de fin de ligne à imprimer.
voici ma macro pour chaque bouton d'impression de ligne :
Sub Decont6()
'Macro enregistrée le 07/09/2000 par Fb40
Range("B6:aa6").Select
Selection.Copy
ActiveWindow.ScrollColumn = 1
Range("B1").Select
ActiveSheet.Paste
Sheets("Decomptes").Select
Application.CutCopyMode = False
ActiveWindow.SelectedSheets.PrintOut copies:=1
Sheets("Base").Select
Range("A4").Select
End Sub
J'èspère que je ne suis pas trop obscure dans ma demande; par avance merci.
fb40
