Problème de fonction prédéfini dans excel
Résolu
Tyoli
-
Tyoli -
Tyoli -
Bonjour,
j'ai un petit problème dont je n'ai pas trouvé la solution ni dans l'aide de excel ni sur internet (je ne tape peut être pas les bons mots clés).
En faite, j'ai écrit une procédure dans VBA utilisant la fonction de excel ESTVRAI mais lorsque je veux la faire tourner VBA me dit "sub ou fonction non défini" et me souligne ESTVRAI. Je n'ai pas trouvé comment faire pour qu'il sache ce qu'est cette fonction puisqu'elle est normalement directement dans excel.
Quelqu'un saurait-il comment faire ?
Merci d'avance
j'ai un petit problème dont je n'ai pas trouvé la solution ni dans l'aide de excel ni sur internet (je ne tape peut être pas les bons mots clés).
En faite, j'ai écrit une procédure dans VBA utilisant la fonction de excel ESTVRAI mais lorsque je veux la faire tourner VBA me dit "sub ou fonction non défini" et me souligne ESTVRAI. Je n'ai pas trouvé comment faire pour qu'il sache ce qu'est cette fonction puisqu'elle est normalement directement dans excel.
Quelqu'un saurait-il comment faire ?
Merci d'avance
A voir également:
- Problème de fonction prédéfini dans excel
- Fonction si et excel - Guide
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Fonction moyenne excel - Guide
- Déplacer colonne excel - Guide
5 réponses
bonjour
- avec excel 2003 je ne dispose (apparemment pas) de ESTVRAI donc ceci fonctionne
Range("B1").FormulaLocal = "=SI(A1=VRAI;1;0)"
- avec excel 2007 je ne sais pas mais tu peux tenter
Range("B1").FormulaLocal = "=SI(ESTVRAI(A1);1;0)"
bonne suite
- avec excel 2003 je ne dispose (apparemment pas) de ESTVRAI donc ceci fonctionne
Range("B1").FormulaLocal = "=SI(A1=VRAI;1;0)"
- avec excel 2007 je ne sais pas mais tu peux tenter
Range("B1").FormulaLocal = "=SI(ESTVRAI(A1);1;0)"
bonne suite
désolée je voulais dire la fonction ESTVIDE :s
voici mon code si cela peut vous éclairer
Sub rajout_temp()
For i = 34 To 91
Cells(1, 10).FormulaLocal = "=ESTVIDE("cells(i,3)")"
If Cells(1, 10).Value = "VRAI" Then
If Cells(i - 1, 3).Value <> Empty And Cells(i + 1, 3).Value <> Empty Then
Cells(i, 3).Value = (Cells(i - 1, 3).Value + Cells(i + 1, 3).Value) / 2
Else
Cells(i, 3).Value = Cells(i - 16, 3).Value
End If
End If
Next
End Sub
cependant cela bloque à la première ligne
voici mon code si cela peut vous éclairer
Sub rajout_temp()
For i = 34 To 91
Cells(1, 10).FormulaLocal = "=ESTVIDE("cells(i,3)")"
If Cells(1, 10).Value = "VRAI" Then
If Cells(i - 1, 3).Value <> Empty And Cells(i + 1, 3).Value <> Empty Then
Cells(i, 3).Value = (Cells(i - 1, 3).Value + Cells(i + 1, 3).Value) / 2
Else
Cells(i, 3).Value = Cells(i - 16, 3).Value
End If
End If
Next
End Sub
cependant cela bloque à la première ligne
re
bon tu peux donc tenter quelque chose comme ça
Range("B1").FormulaLocal = "=SI(ESTVIDE(A1);1;0)"
bonne suite
bon tu peux donc tenter quelque chose comme ça
Range("B1").FormulaLocal = "=SI(ESTVIDE(A1);1;0)"
bonne suite
oui mais le problème c'est que je suis dans une boucle où mon numéro de ligne varie donc je ne peut pas utiliser cette formule il faut que dans mon ESTVIDE apparaisse la ligne i
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
si xyz est la valeur logique testée
if xyz then msgbox "vrai"
if not xyz then msgbox "faux"