salut.
 
 On Error GoTo ecriture
        With ActiveSheet.Range("b1:b100" )
        Cells.Find(What:=TextBox6.Text, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
        :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
        False).Activate
        alerte = MsgBox("ce numero de disque existe deja !!!", vbExclamation + vbOKOnly + vbExclamation, "ATTENTION" )
        End With
        Exit Sub
 
voila comme vous pouvez le voir je veux faire une recherche uniquement sur la colonne B . or ca ne marche pas et la recherche ce fait sur toute la page excel active.
 
ququn aurrai une idee de se qui cloche svp merci.

t'as oublié le point avant Cells.Find

mais bon, tu peux aussi virer le With, qui ne sert à rien ici et le remplacer par

ok avec le point devant ca marche!!!.
quel couillon.
merci bien

j'essaierais demain, je vais au pieu là

le con, il a édité son message

oui desolé j'avais editer en meme temps que toi.
encore merci.
 
par contre comme je debute un peut et j'ai un autre pb moins grave.
au lancement du projet je voudrai le userform1 apparent et la fenetre excel cacher.
or quand j'arrive a cacher excel je cache aussi le userform ou alors j'ai les 2 apparents
merci.

J'ai fait ça au boulot.
J'y regarde mardi et te l'envoie si tu n'as rien trouvé d'ici là.

up!!!

Dans ThisWorkbook, mettre le code suivant:

A toi, bien sûr, de remplacer UserForm par le nom du tien.
 
Petit truc aussi: Il arrive (dépendant du nombre d'autres applications ouvertes) que le form ne soit pas visible car il est sous une autre fenêtre.
Il suffit de cliquer sur Excel dans la barre des tâches pour le ramener en avant-plan.

oui tout a fait c ce qu'il se passait quand j'avais essayer ceci. mais je n'avais pas d'autre appli ouverte!!!.
et c pour ca que je demandai si il n'y avait pas d'autre code plus efficace.
mais bon merci quand meme de ton aide.