bonjour et bonne année,
j'ai 2 pb avec mon inpuBox :
- J'ai un tableau nomé TablAgent et je voudrais obliger l'utilisateur à choisir sa (ses) saisie(s) uniquement dans la colonne du champ [Nom Actuel]
- Comment récupérer les valeurs des cellules sélectionnées par l'utilisateur et non les adresses
voici mon codesi je remplace .Adress par .Value, je ne récupère que la valeur de la 1ère sélection, puis il sort de la boucle sans traiter next i
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 Dim MonTab() As String Dim Plage As Range Dim i As Integer On Error Resume Next Application.DisplayAlerts = False Set Plage = Application.InputBox("Sélectionnez une plage", "Sélection de cellules", Type:=8) MonTab = Split(Plage.Address, ",") On Error GoTo 0 Application.DisplayAlerts = True If Plage Is Nothing Then Exit Sub Else For i = 0 To UBound(MonTab) MsgBox MonTab(i) Range("N" & i + 1) = MonTab(i) Next i End If
est-ce que quelqu'un peut m'aider svp ? d'avance merci
Partager