alain.dutoit
XLDnaute Nouveau
Salut le forum,
Après une petite pause je reviens à la charge avec mon fichier de tir.
Je souhaiterais faire une maccro qui me copie une cellule active (le numéro de mon tireur) et qui me fait un collage uniquement de la valeur dans une autre feuille afin de pouvoir imprimer la feuille de stand. Je souhaiterais modifier ma maccros de façon à ce qu'il me copie la cellule active. Ne connaissant pas bcp le langage VBA je me suis dit que cela devait ressembler à qqch du style "ActiveRange.Select" mais quand je lance ma maccro il y a une erreur. Est-ce que qqun pourrais m'aider?
Voici le code de ma maccro. Merci beaucoup d'avance.
ActiveRange.Select
Selection.Copy
Sheets("Feuille de stand").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("Individuel").Select
Alain Dutoit
Après une petite pause je reviens à la charge avec mon fichier de tir.
Je souhaiterais faire une maccro qui me copie une cellule active (le numéro de mon tireur) et qui me fait un collage uniquement de la valeur dans une autre feuille afin de pouvoir imprimer la feuille de stand. Je souhaiterais modifier ma maccros de façon à ce qu'il me copie la cellule active. Ne connaissant pas bcp le langage VBA je me suis dit que cela devait ressembler à qqch du style "ActiveRange.Select" mais quand je lance ma maccro il y a une erreur. Est-ce que qqun pourrais m'aider?
Voici le code de ma maccro. Merci beaucoup d'avance.
ActiveRange.Select
Selection.Copy
Sheets("Feuille de stand").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("Individuel").Select
Alain Dutoit