Discussion :

[philoflore]

Bonjour à tous

Question : peut-on -avec le langage VBA- autoriser la sélection d'une plage de cellule pendant l'éxécution du code ?

Exemple : dans le déroulement du programme, l'utilisateur ne pourra sélectionner qu'une ou plusieurs cellules dans la plage A1 à A10. Il ne pourra sélectionner la cellule B1 par exemple.

Merci pour votre réponse précieuse

[cafeine]

Hello,

tu peux intercepter les sélections utilisateurs :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Const r As String = "A1:A10"
Dim SelectOk As String
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 
Application.EnableEvents = False
 
If Intersect(Target, Range(r)) Is Nothing Then
    Range(SelectOk).Select
    SelectOk = Selection.Address
Else
    If Intersect(Target, Range(r)).Address <> Target.Address Then
        Range(SelectOk).Select
        SelectOk = Selection.Address
    Else
        SelectOk = Target.Address
    End If
End If
 
Application.EnableEvents = True
 
End Sub

[philoflore]

Merci pour cette réponse :

Comment utiliser le code ?
Je déclare les variables (Const r As String = "A1:A10"
Dim SelectOk As String) dans le programme principal et je fais appel au programme Worksheet_SelectionChange dans le code ? Cela ne fonctionne pas. (Je débute)

Précision sur la question :

Je souhaite par exemple obliger l'utilisateur à sélectionner une ou plusieurs cellules dans la plage A1:A10 dans le petit programme qui suit.
Autrement dit, on peut imaginer ne rendre actif -que pour la procédure associée à un bouton- une certaine plage A1:A10. Exemple de code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub CmdValider_Click()
 
'ajouter code pour vérifier que l'utilisateur soit bien dans la plage A1:A10
Selection.FormulaR1C1 = "2"
 
End sub

Un grand merci

[cafeine]

il faut mettre ce code dans le module de la feuille sur laquelle tu veux faire ces limitations.
un copier / coller suffira.

[lvr]

Je ne suis pas sur que ta macro puisse s'interrompre pour permettre à l'utilisateur de sélectionner une cellule.

Il faudra impérativement qu'il en sélectionne une *avant* qu'il lance la macro.

Cafeine: comment (et quand) est-ce que tu initialise ta variable SelectOk ?

[philoflore]

Merci à tous,

J'ai finalement opté pour une autre solution.