Prb sélection plage tableau

[Windfly]

Bonjour le forum,

J'ai un soucis avec la sélection d'une plage variable, je m'explique : J'ai un tableau dont le nombre de ligne varie (issue d'un tcd), et je voudrais selectionner une plage depuis la cellule B6 jusqu'à l'avant dernière ligne du tableau.

J'ai donc écrit le code suivant :

With Sheets("accuracy")
derlig_tab = .Range("B65536").End(xlUp).Offset(-1, 0)
Set plage_pic = .Range("B6", derlig_tab)
End With

Mais visiblement, j'ai fait une erreur dans mon code...

Could you help me?

Merci d'avance

Windfly

 

[mth]

Re : Prb sélection plage tableau

Bonjour Windfly,

Peut-être ainsi ?:

derlig_tab = .Range("B65536").End(xlUp).Offset(-1, 0[COLOR=darkslateblue][COLOR=black]).[/COLOR][B]Address[/B][/COLOR]

Bonne journée,

Mth

 

[Minick]

Re : Prb sélection plage tableau

Salut,

C'etait presque ca.

[I]With Sheets("accuracy")         
derlig_tab = .Range("B65536").End(xlUp).Offset(-1, 0)[B][COLOR=Red].Row    [/COLOR][/B]        
Set plage_pic = .Range("B6[B][COLOR=Red]:B" &[/COLOR][/B] derlig_tab)          
End With[/I]

 

[Windfly]

Re : Prb sélection plage tableau

Même encore maintenant, j'arrive encore a être surpris par la rapidité de vos réponse et je vous en remercie.

Cependant, vos suggestions ne fonctionnent malheureusement pas. VB me met un message d'erreur 1004 (...) sur cette ligne.


Windfly

 

[Minick]

Re : Prb sélection plage tableau

Re,

Sur quelle ligne??

Par contre je viens de m'apercevoir que j'avais oublie de changer autre chose dans ton code.

With Sheets("accuracy")         
derlig_tab = .Range("B65536").End(xlUp).Offset(-1, 0)[B][COLOR=Red].Row[/COLOR][/B]           
Set plage_pic = .Range("B6[B][COLOR=Red]:B" &[/COLOR][/B] derlig_tab)          
End With

Desole, ca m'apprendra a pas me relire 🙄

 

[Windfly]

Re : Prb sélection plage tableau

Merci Minick,

Effectivement, en ajoutant "Row" ca marche bien.

Merci pour ton aide.

Windfly