Selection d'une plage variable

Hervé

XLDnaute Barbatruc

• 26 Février 2006

• #2

Bonsoir sonskriverez

2 méthodes :

Sub Bouton1_QuandClic()
Range(Range('a5'), Cells(Cells(5, 1).End(xlDown).Row, Cells(5, 256).End(xlToLeft).Column)).Select
End Sub
'___________________________________________
Sub Bouton2_QuandClic()
Dim plage As Range

Set plage = Range('a5').CurrentRegion
Set plage = plage.Offset(2, 0).Resize(plage.Rows.Count - 2, plage.Columns.Count)
plage.Select
End Sub

Cliquez pour agrandir...

je préfère la deuxième méthode plus dynamique.

salut

 

Vote positif 0 Vote négatif

S

Sonskriverez

Guest

• 26 Février 2006

• #3

Slt Hervé,

j'ai un pbl car en ligne E1:H1 j'ai un titre (désolé de ne pas l'avoir mis dans mon fichier).

1°) macro il ne prend pas la dernière colonne

2° macro il prend aussi les trois dernières colonnes alors quelles sont vides

 

Vote positif 0 Vote négatif

Hervé

XLDnaute Barbatruc

• 26 Février 2006

• #4

re

et le titre en e1 h1, il faut le sélectionner ?

si la deuxième macro te sélectionne 3 colonnes supplémentaires, c'est qu'elles ne sont pas vides.

salut

 

Vote positif 0 Vote négatif

S

sonskriverez

Guest

• 27 Février 2006

• #5

Non je veux selectionner que le tableau.

Dans la continuité du tableau les colonnes sont vides, mais juste audessus il y a le titre, je m'en sort en mettant -3 au bout du code mais ce n'est pas Top

 

Vote positif 0 Vote négatif

S

sonskriverez

Guest

• 27 Février 2006

• #6

Hervé autre question :

pour générer mon graphe, j'utilise 3 colonnes (date, s-total et total), bref j'ai utilisé ton premier code comme suit.
Set plage1 = Range(('A4'), Cells(Cells(4, 1).End(xlDown).Row, Cells(4, 256).End(xlToLeft).Column - 8))
Set plage2 = Range(('E4'), Cells(Cells(4, 1).End(xlDown).Row, Cells(4, 256).End(xlToLeft).Column - 4))
Set plage3 = Range(('H4'), Cells(Cells(4, 1).End(xlDown).Row, Cells(4, 256).End(xlToLeft).Column - 1))
Set plage = Union(plage1, plage2, plage3)

Ca marche, mais j'ai l'impression de bricoler
:whistle:

 

Vote positif 0 Vote négatif

S

sonskriverez

XLDnaute Occasionnel

• 27 Février 2006

• #7

Hervé,

Concernant ton dernier poste tu as raison (j'aime pas quand tu as raison 🙂 )le tire ne joue pas car sur d'autre sheet c'est tout good.

Par contre j'ai beau regarder mais il n'y a rien dans mes colonnes !!!

 

Vote positif 0 Vote négatif