Discussion :

[Titened]

Bonjour tout le monde !
J'ai un petit soucis avec mon code et je ne comprend pas vraiment pourquoi...

Voilà mon code :

Code :

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

1
2
3
4
5
rho_carre = Sheets("hi-H0").Range("E15").Value
H0 = Worksheets("contantes").Range("A2").Value
mu = Sheets("contantes").Range("D2").Value

Sheets("houle").Cells(2, 2).Value = [H0^2 + 1/rho_carre*math.log(12*mu)] ^ (1 / 2)

Quand je le lance, ça me met qu'il y a une incompatibilité de type. Voyez vous pourquoi ?

Merci d'avance pour votre aide !

[Invité]

Bonjour

Sur quelle ligne y a-t-il incompatibilité de type ?

Comment sont déclarées tes variables ?

Philippe

[Titened]

Désolée, j'ai oubliée de dire que c'était sur la ligne

Code :

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

Sheets("houle").Cells(2, 2).Value = [H0^2 + 1/rho_carre*math.log(12*mu)] ^ (1 / 2)

qu'il y avait une erreur d'incompatibilité et toutes mes variables sont déclarées en tant que variant

[AlainTech]

Pour éviter de jouer longtemps aux devinettes, que contiennent les cellules E15, A2 et D2?

[Theze]

Bonsoir,

Dans ta formule, évite la fonction Evaluate (crochets), elle n'est, à mon sens, pas nécessaire :

Code :

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

1
2
3
4
5
6
 
ho_carre = Sheets("hi-H0").Range("E15").Value
H0 = Worksheets("contantes").Range("A2").Value
mu = Sheets("contantes").Range("D2").Value
 
Sheets("houle").Cells(2, 2).Value = (H0 ^ 2 + 1 / rho_carre * Math.Log(12 * mu)) ^ (1 / 2)

Hervé.

[Titened]

Bonjour et désolée de répondre aussi tard,

pour répondre à AlainTech, ce ne sont pas les valeurs des cellules E15, A2 et D2 qui sont en causes, ce sont des constantes que j'utilise dans le programme qui vient juste avant celui là et il n'y a pas d'erreur.

j'ai essayé ce que tu m'as dit Theze et ca a marché !

Merci beaucoup à tous pour votre aide !