sélectionner zone définie par variables

[Blafi]

Bonsoir à tous,

Je cherche à formuler en VBA la sélection d'une zone de cellules discontinue. Une partie de la zone sera donnée sous la forme A1:A13 par ex et 2 autres parties sous forme de variables définies plus tot dans mon programme.

Ainsi 2 variables sont définies en fonction du choix de l'utilisateur. Leur valeur sont par exemple Lazone1=D1😀13 et Lazone2=D16😀23.

J'ai écrit la ligne de VBA pour la sélection comme ceci :

Range("A1:A13, A1:A23, Lazone1, Lazone2 ").select

mais ça ne marche pas, VBA refusant de reconnaitre ma formulation...

Comment puis-je faire pour mettre dans un même Range ces zones définies soit par des cellules, soit par des variables..

Merci d'avance à ceux qui pourront m'aider..

 

[Catrice]

Re : sélectionner zone définie par variables

Bonsoir

essaie comme ceci :

Sub Test()
Lazone1 = "B1:C3"
Lazone2 = "F2:F5"
Range("A1:A13, A1:A23," & Lazone1 & "," & Lazone2).Select
End Sub

 

[Blafi]

Re : sélectionner zone définie par variables

Re..

En consultant mon message, je vois que les 2 points de mes zones ont été remplacés par des smileys...bizarre. Pourquoi lorsque je tappe D1😀13 il s'affiche dans le message A1 + smiley + 3?

 

[ledzepfred]

Re : sélectionner zone définie par variables

bonsoir blafi,

essayes donc ceci :

Sub TEST()
Dim lazone1, lazone2 As Range
Set lazone1 = Range("D1:D13")
Set lazone2 = Range("D16:D23")
Union(Range("A1:A13"), Range("A1:A23"), lazone1, lazone2).Select
End Sub

Pour l'apparition du smiley dans ton message, c'est normal puisqu'il est codé 😀
Edit : bonsoir Catrice
A+

 

[Excel-lent]

Re : sélectionner zone définie par variables

Bonsoir Blafi, Catrice,

J'ai vu que tu avais été plus rapide que moi!

Je vais donc me contenter de faire le SAV!

je vois que les 2 points de mes zones ont été remplacés par des smileys...bizarre

Le smiley 😀 s'écrit ainsi : D (sans espace)

Donc forcement, lorsque tu écris D1: D13 sans espace, il remplace : D par le smiley!

A+

Edition : Bonsoir Ledzepfred

 

[Blafi]

Re : sélectionner zone définie par variables

Merci Catrice de ta réponse rapide, mais en fait la définition de mes zones se fait après cancanétation du résultat d'autres variables :

exemple: ma variable Colo vaut suivant le cas B ,C, D...

je définis ensuite Lazone1 en faisant :
Lazone1= Colo & "1" & ":" & Colo & "13"
ce qui me donne Lazone1= B1:B13 par exemple et je n'arrive pas à obtenir "B1:B13" car si j'essaye de rajouter des " avant et après, VBA me les refuse..

Comment faire ??

 

[ledzepfred]

Re : sélectionner zone définie par variables

re

comme ceci alors

Set lazone1 = Range(cells(1,Colo),cells(13,colo))

A+

 

[Blafi]

Re : sélectionner zone définie par variables

Encore moi.. Merci aux courageux du soir ( Excel-lent, ledzepfred, Catrice..) pour leurs réponses que je n'avais pas vu avant de redonner mes explications...

Mais ma dernière demande est toujours d'actualité..

Excusez moi si je ne répond plus ce soir car il est tard et demain il faut se lever.. alors je regarderai demain matin vos réponses.

Décidemment plus rapide que l'éclair.... Merci ledzepfred.. j'essayerai cela demain...

Bonne nuit.

 

[Catrice]

Re : sélectionner zone définie par variables

Bonsoir à tous,

chez moi ceci fontionne :

Sub Test()
colo = "B"
Lazone1 = colo & "1" & ":" & colo & "13"
Lazone2 = "F2:F5"
Range("A1:A13, A1:A23," & Lazone1 & "," & Lazone2).Select
End Sub


Pas besoin des guillemets, c'est déjà du texte.

Bonne nuit

 

[Blafi]

Re : sélectionner zone définie par variables

Bonjour,

Merci Catrice pour ta dernière réponse que je consulte ce matin....
Il me manquait en effet des " dans le Range, le tout étant de bien les placer..
J'essaye et si j'ai un pb je reviens..

A ++