Probléme identifiant

Bonjour à tous,

Je bute sur un probléme simple entre une textbox et une cellule.

Je voudrais faire la requête : Si le matricule de la textbox est égal au champ de la colonne A de l'onglet profs, alors on modifie.

Mais avec ce test sur le 1er de la liste "BRULEBOIS":

 If i = 2 Then MsgBox ws2.Range("A" & i).Value & " " & matP.Value

Cà m'affiche bien le matricule coté cellule et textbox

1
Private Sub btnEnregP_Click()
Dim i%, drn%, x%, ws2 As Worksheet
Set ws2 = Sheets("profs")
'&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
'       ENREGISTRER
'&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
'recherche enregistrement existant
'matricule
    drn = ws2.Range("A" & Rows.Count).End(xlUp).Row
    For i = 2 To drn
        'si aucun matricule choisit
        If i = 2 Then MsgBox ws2.Range("A" & i).Value & " " & matP.Value
       ' If matP.Value = "" Then
        '    ws2.Range("A" & i).Value = drn ' a voir si on prend tjrs le nbre de ligne en cas de suppression des profs
        If ws2.Range("A" & i).Value = matP.Value Then
        'ElseIf ws2.Range("B" & i).Value = nomP.Value And ws2.Range("C" & i).Value = prenP.Value Then
            ws2.Cells(i, 2).Value = nomP.Text               'nom
            ws2.Cells(i, 3).Value = prenP.Text 'prenom
            ws2.Cells(i, 4).Value = cmbSexP.Text 'sexe
            ws2.Cells(i, 5).Value = datNP.Text 'date naissance
                With Selection
...

Mais impossible de reconnaitre l'égalité, il faut que je mette <> pour que la modif se fasse

Et lorsque j'essaie avec les critéres nom et prenom çà modifie. (UF ecole, code en partie 'notes')

Pour essayer un exemple, cliquez droit pour ouvrir le formulaire, et allez sur l'onglet profs.

5ecole.xlsm (194.50 Ko)

Merci pour votre aide

Bonjour fronc,

Devine la coquille ... .... ...

3 essais, trop tard ... matP ... un "TextBox" = texte ...

Donc If ws2.Range("A" & i).Value = CInt(matP.Value) Then

ric

P.S. Change tes profs ... ils sont trop vieux ... Amazon, peut-être...

Bonjour ric,

Ok et c'est donc que pour un code chiffre, sans lettre. avec A1 y'en a plus besoin.

Merci pour ton aide et le gain de temps.

P.S. Change tes profs ... ils sont trop vieux ... Amazon, peut-être...

Ce sont des noms de maires du parrainage des présidentielles. beaucoup de vieux c... en effet.

Rechercher des sujets similaires à "probleme identifiant"