Impression: lignes à répéter

[J-Charles]

Bonjour à tous,
Dans une macro qui me sert à imprimer, je veux définir les lignes à répéter en haut

.PrintTitleRows="$10:$14"

. Dans cet exemple, il s'agit de répéter les lignes 10 à 14 sur chaque feuille imprimée.
Je souhaiterais remplacer 10 et 14 dans la ligne de code par des variables, car ces lignes peuvent changer suivant le document. J'ai essayé en vain.
Je vous remercie de votre aide et vous souhaite une bonne journée.

 

[Efgé]

Re : Impression: lignes à répéter

Bonjour J-Charles,
Sans exemple et sans savoir sous quelles conditions trouver les lignes à prendre en compte, je propose cet exemple:

[COLOR=blue]Sub[/COLOR] test()
[COLOR=blue]Set[/COLOR] c = Sheets("Feuil1").UsedRange.Find("Toto", LookIn:=xlValues)
Var = c.Row
[COLOR=blue]With[/COLOR] ActiveSheet.PageSetup
    .PrintTitleRows = "$" & Var & ":$" & Var + 1
[COLOR=blue]End With[/COLOR]
[COLOR=blue]End Sub[/COLOR]

Cordialement

 

[J-Charles]

Re : Impression: lignes à répéter

Salut Efgé,
Un grand merci pour ta réponse qui me convient parfaitement. Je n'avais pas penser à utiliser le & pour introduire les variables dans la commande.
Heureusement que des gens dévoués comme toi sont là pour aider des pauvres novices comme moi.
Encore merci et bonne journée.