Selection d'une plage avec vba

Question

Bonjour,

Voilà j'essaye de mettre dans maplage toutes les cellules actives de ma feuille en enlevant la première ligne qui sert de titre pour mon tableau. J'utilise le code suivant (j'aimerais comprendre pourquoi ça ne marche pas):


Dim j As Integer, l As Integer
Dim maplage As Range

l = Worksheets("Donnees").UsedRange.Columns.Count
j = Worksheets("Donnees").UsedRange.Rows.Count

With ThisWorkbook.Worksheets("Donnees")
Set maplage = .Range(.Cells(1, 1), .Cells(j, l).End(xlUp))
End With

Set zonetri = zonetri.Offset(1).Resize(zonetri.Rows.Count - 1)  


Merci beaucoup pour votre aide.

cs_Jack · Answer

Salut

"Ca ne marche pas" ne veut rien dire.
Si tu as une erreur, dis-nous laquelle.
Si tu n'obtiens pas le résultat escompté, dis-nous ce que tu vois ET ce que tu voudrais voir.

"zonetri" n'est pas dimensionné : On ne sait pas de quoi il s'agit.
Set zonetri = zonetri.Offset...
Un objet qui fait référence à lui même : est-ce bien normal ?

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

ahmediie · Answer

Salut,

Désolé pour la faute de frappe (zonetri = maplage) et pour le .End(xlUp) qui n'a pas lieu d'être.

Pour ce que ca me sélectionne comme plage ... ben rien
Quand j'ajoute à la fin du code maplage.interior.color = vbRed ca ne fait absolument rien.
 
Vala, je n'arrive pas à comprendre pourquoi ça ne marche, pourtant tout à l'air d'être correct ...

Merci

cs_Jack · Answer

Si ta syntaxe ne renvoie pas d'erreur, c'est qu'elle est correcte.
C'est à toi de déboguer pour trouver le problème :
Que valent l et j après tes deux premières instructions ?
Chez moi, quelque soit la sélection, ils renvoient tous les deux le chiffre 1 puisqu'il n'y a aucun Range actuellement défini.

Selection.Columns.Count et Selection.Rows.Count renvoient les données correspondant à la sélection actuelle.
Est-ce que c'est ce que tu recherches ?

Selection d'une plage avec vba

3 réponses

Votre réponse

Discussions similaires