Discussion :

[nicoroth]

Salut a tous,

J espere que vous avez paser un bon WE.

Ma question est la suivante:

Code :

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

1
2
3
4
5
6
 
Private Sub Button1_click()
If Worksheets("Sheet1").Range(A1).Value <> Worksheets("Sheet2").Range("B2").Value Then
Msgbox(...)
End If
End Sub

Qui devrai permettre que lorsque je clic, de verifier que la valeur dela cellule A1 dans la feuille 1 soit egale a la valeur de la cellule B2 dans la feuille 2 .

Je pense que la maniere dont je fait reference aux cellules est mauvaise.
Donc si qqn sait je l en remercie d avance

[jfontaine]

A part la référence a A1 ou il manque les quotes (mais ce doit être un oubli de frappe).
Sinon, j'utilise la même syntaxe.

Jérôme

[nicoroth]

Je pensais aussi que c etait correct, seuleument, il me met une run time error 13.
Si qqn a une explication

[jfontaine]

souvent l'erreur 13 provient du symbole décimal qui est en virgule au lie de point.
il suffit de le modifier dans les paramètres régionaux

Jérôme

[wilfried_42]

Bonjour à tous


L'erreur 13 ---> incompatibilité de type
exemple une date dans un string, un double dans une entier, une date dans un entier et ce sans utiliser les convertisseurs prevus à cette effet

Finalement, Range(A1) n'est peut etre pas une faute de frappe : Range("A1")
Vérifie s'il te plait

Bonne journée

[nicoroth]

c bon ca marche nikel

Le truc en fait c est que au lieu d avoir un 0 dans la case de reference j avais un #Value^^