Bonjour le forum,

Avant de découvrir CurrentRegion, j'ai essayé de coder moi même quelques lignes permettant de faire exactement la même code. Cepedant, cela ne fonctionne pas.
J'ai vraiment l'impression que c'est une erreur de débutant qui m'a bloqué, mais je sollicite néanmoins votre aide. Ainsi dans un autre contexte, je ne me planterai pas

Mon code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Dim Plage As Range
Dim Cell As Range, Borne1 As Range, Borne2 As Range
 
 
    Set Cell = ThisWorkbook.Sheets(2).Range("H50") 
 
    Set Borne1 = ThisWorkbook.Sheets(2).Cells(Cell.End(xlUp).Row, Cell.End(xlLeft).Column)
    Set Borne2 = ThisWorkbook.Sheets(2).Cells(Cell.End(xlDown).Row, Cell.End(xlToRight).Column)
 
    Set Plage = Range(Borne1, Borne2)
Merci d'avance !