variable

[rems]

re bonjour a tous

encore une fois je fais appele a vous.

j'ai un message d'erreur a l'execution de ce petit code et je n'arrive pas a savoir ou je fais une erreur.

message : Variable objet ou variable bloc With non définie (erreur 91)

je vous joint un fichier zippé dans lequel il y a mes deux fichiers concernés

merci a tous [file name=stkvo.zip size=8482]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/stkvo.zip[/file]

 

[Zon]

Salut,

Tu ne peux pas utiliser du find avec du true il faut passer par une variable range

dim C as range

Workbooks('stock vo compt.xls').Activate

Range('b:b').Select

Set c = Selection.Find((what:=nvo, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:=True)

If c Is Nothing Then
Range('c' & i + 2) = nvo

Else
Workbooks('stkvo.dbf').Activate
End If
Next

End Sub

A+++

 

[rems]

bonjour zon, le forum

merci pour ton aide je vais essayaer ca

a bientot

rems