Trim(Chr(colonne) + CStr(rangee)) c'est bizarre....
colonne va retourner 3 (par exemle) ???
rangee 2 ?
trim pas servir a rien....
chr(3) = caractère incorrect
et ton "+" en est vraiment, pas un "&"
donc forcément......
donne plus de détails éventuellement
Pour trouvé la dernière cellule et en faire un plage de cellule dynamique selon la feuille utilisé ceci
Sub Last_cell()
Dim Fes As Workbook
Dim Fe As Worksheet
Dim Lcel As String
Set Fes = ActiveWorkbook
For Each Fe In Fes.Sheets
Fe.Activate
Range("A1").Select
Selection.SpecialCells(xlCellTypeLastCell).Select 'ici la fonction de recherche de la dernière cellule
Lcel = Selection.Address
ActiveSheet.PageSetup.PrintArea = "A1:" & Lcel 'exemple pour une zone d'impression peut être copié
Next
End Sub