lebarbo
XLDnaute Occasionnel
Bonjour le forum, bonjour à tous,
J'ai un petit souci avec cette fonction Range(Cells(,),Cells(,)). Je suis obligé de rédiger ce code en fonction de n° de ligne et de colonne donc j'utilise les cells pour ma plage sauf que cette fonction nécessite pour ne pas buguer d'activer les feuilles au préalable et je ne veux pas que le code se voit. Est ce que vous avez une solution ?
For x = 2 To Sheets.Count - 2
NDerniereColonne = Sheets(x).Range("IV11").End(xlToLeft).Column
NDerniereLigne = Sheets(x).Range("IV11").End(xlToLeft).End(xlDown).Row
Sheets(x).Activate 'je veux pouvoir passer outre ce champs activate !!
Set MaPlage = Sheets(x).Range(Cells(12, 1), Cells(NDerniereLigne, NDerniereColonne))
Merci
J'ai un petit souci avec cette fonction Range(Cells(,),Cells(,)). Je suis obligé de rédiger ce code en fonction de n° de ligne et de colonne donc j'utilise les cells pour ma plage sauf que cette fonction nécessite pour ne pas buguer d'activer les feuilles au préalable et je ne veux pas que le code se voit. Est ce que vous avez une solution ?
For x = 2 To Sheets.Count - 2
NDerniereColonne = Sheets(x).Range("IV11").End(xlToLeft).Column
NDerniereLigne = Sheets(x).Range("IV11").End(xlToLeft).End(xlDown).Row
Sheets(x).Activate 'je veux pouvoir passer outre ce champs activate !!
Set MaPlage = Sheets(x).Range(Cells(12, 1), Cells(NDerniereLigne, NDerniereColonne))
Merci