Bonsoir,

Je voudrai limiter l'utilisation d'une plage dont le nombre de lignes et de colonnes varie, mais je ne parviens pas à définir cette plage. Je sollicite votre aide, en vous remerciant par avance.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Sub LimiteDefilementPlage()
Dim DerLig As Long, DerCol As Long
DerLig = Cells.Find("*", , , , xlByRows, xlPrevious).Row
DerCol = Cells.Find("*", , , , xlByColumns, xlPrevious).Column
 ActiveSheet.ScrollArea = "A1:" & "h" & DerLig  '***
'***c'est sur cette ligne que je bute, ainsi le scrollarea est opérationnel, je voudrai remplacer "h" par dercol 
 End Sub
Cordialement,