Discussion :

[dunbar001]

Bonjour,

J'ai créer un formulaire via VB sous Excel, le formulaire comprend un ComBoBox qui est alimenter depuis une feuille dans le classeur.
Cette feuille comprend deux colonnes Le ComBo reprend la valeur de la Colonne B et je voudrait alimenter un champ caché avec la valeur de la colonnes A.
Et llà je bloque.

Code :

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

1
2
3
4
With Sheets("Job")
     ComboBox1.List = .Range("A1:A" & .Range("A65536").End(xlUp).Row).Value      
 
 End With

Sinon j'ai une autre piste mais qui est de faire une recherche dans ma feuille comme ceci

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 numéro As Integer
Dim celluletrouvee As Range
Dim ligne As Integer
Dim col As Integer
 
    RechercheValeur = UserForm1.ComboBox1
 
    Set celluletrouvee = Sheets("Job").Range("A1:A200").Find(RechercheValeur, lookat:=xlWhole)
 
 
    If celluletrouvee Is Nothing Then
            MsgBox ("pas trouvé : correspondance à " & numero)
        Else
            ligne = celluletrouvee.Row
            col = celluletrouvee.Column
            MsgBox ("trouvé : ligne = " & ligne & " , colonne = " & col)
    End If

Se qui fonctionne mais je ne sais pas comment affiche la valeur de la celulle en B1:B200 correspondante.

En suite il me suffirait de créer une variable avec la valeur
D'avance merci

[dunbar001]

Ok merci j'ai trouver