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

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+

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...

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

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

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 ?
@+

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

Re

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

Cliquez pour agrandir...

Regarde ce fil.
A+