[Résolu] Appliquer une variable à l'argument d'une fonction

[JOZZ]

Bonjour le Forum,

Je suis entrain d'essayer de mettre au point une macro d'impression, et je sèche.
c'est pour cela que je viens vers vous, dans l'espoir que vous pourrez me venir en aide.
Dans l'attente de votre ou vos réponses, je vous dis déjà Merci rien que pour le fait de prendre sur votre temps
pour résoudre si possible mon problème.
Ci-joint le fichier avec la macro dans le module1 et des explications.

Encore merci.

 

[david84]

Re : Appliquer une variable à l'argument d'une fonction

Bonsoir,
as-tu simplement essayé de remplacer la valeur de l'argument from utilisé dans la macro XL4 par la variable DernPg ?
A+

 

[JOZZ]

Re : Appliquer une variable à l'argument d'une fonction

Bonsoir,
Oui bien sur, c'est pour cela que je pose la question, car je ne vois pas comment faire.
Sub Impression()
Dim NbPg, DernPg As Integer
NbPg = ActiveSheet.HPageBreaks.Count ' = nombre total - 1
DernPg = ActiveSheet.HPageBreaks.Count + 1 ' = nombre Total
With ActiveSheet.PageSetup
.PrintTitleRows = "$1:$2"
End With
ExecuteExcel4Macro "PRINT(2,1,2,1,,,,,,,,2,,,TRUE,,FALSE)"
With ActiveSheet.PageSetup
.PrintTitleRows = ""
End With
' je souhaite si possible passer ma variable DernPg à l'argument from,
' si aprés comptage le nombre de page est différent
ExecuteExcel4Macro "PRINT(2,3,,1,,,,,,,,2,,,TRUE,,FALSE)"
End Sub

J'ai essayé
ExecuteExcel4Macro "PRINT(2,DernPg,,1,,,,,,,,2,,,TRUE,,FALSE)"
puis
ExecuteExcel4Macro "PRINT(2,DernPg.value,,1,,,,,,,,2,,,TRUE,,FALSE)"
Mais ça ne fonctionne pas...

 

[david84]

Re : Appliquer une variable à l'argument d'une fonction

Re
teste comme cela : ExecuteExcel4Macro "PRINT(2," & DernPg & ",2,1,,,,,,,,2,,,TRUE,,FALSE)"
A+

 

[JOZZ]

Re : Appliquer une variable à l'argument d'une fonction

Re
quel idiot je fais, j'avais mis " & " DernPg " & " au lieu de " & DernPg & ".
C'est bon cela fonctionne à la perfection grâce à toi, merci pour ton implication.
deux guillemets de trop et tout bascule. LOL
Comment fait-on pour passer le sujet à résolu ?
@+

 

[david84]

Re : Appliquer une variable à l'argument d'une fonction

Re

Comment fait-on pour passer le sujet à résolu ?

Regarde ce fil.
A+