OVH Cloud OVH Cloud

VBA et formule

8 réponses
Avatar
Christian.L
Bonjour à tous

Comment peut t'on en VBA tester le contenu d'une formule pour vérifier
quelle contient une formule.

Merci d'avance

C.L.

8 réponses

Avatar
Rai
Bonjour,

Par exemple en testant le 1er caractère ?
si c'est le signe = , c'est très probablement une formule.

if left$(activecell.formula,1)="=" then msgbox "Formule !!!"

Bonne après-midi

Rai

"Christian.L" a écrit dans le message de news: enIRzAk%
Bonjour à tous

Comment peut t'on en VBA tester le contenu d'une formule pour vérifier
quelle contient une formule.

Merci d'avance

C.L.



Avatar
Pounet95
Bonjour,
Ai-je bien lu ? Tester formule pour savoir si contient une formule ??
Sinon si c'est pour tester si une cellule contient une formule ce doit être
:
If Cells(x,y).HasFormula=True then
msgbox" La cellule " &cells(x,y) &" contient une formule"
else
....
end if

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/

"Christian.L" a écrit dans le message de
news: enIRzAk%
Bonjour à tous

Comment peut t'on en VBA tester le contenu d'une formule pour vérifier
quelle contient une formule.

Merci d'avance

C.L.



Avatar
AV
MsgBox ActiveCell.HasFormula

AV
Avatar
Christian.L
Merci Rai ça marche, c'est la propriété "formula" qu'il fallait que j'ajoute
pour que cela fonctionne

Par contre, comme je voulais tester une formule "=SOMME......", il faut
savoir qu'il ne faut pas tester :
left$(activecell.formula,6)="=SOMME"

mais
left$(activecell.formula,)="=SUM"

en anglais

Bonsoir

C.L.


"Rai" a écrit dans le message de
news:uGSixFk%
Bonjour,

Par exemple en testant le 1er caractère ?
si c'est le signe = , c'est très probablement une formule.

if left$(activecell.formula,1)="=" then msgbox "Formule !!!"

Bonne après-midi

Rai

"Christian.L" a écrit dans le message de
news: enIRzAk%
Bonjour à tous

Comment peut t'on en VBA tester le contenu d'une formule pour vérifier
quelle contient une formule.

Merci d'avance

C.L.



Avatar
Modeste
Bonsour® Rai
;o)))
plus précisément ...
if ActiveCell.HasFormula = True Then MsgBox "Formule !!!"

@+
-----Message d'origine-----
Bonjour,

Par exemple en testant le 1er caractère ?
si c'est le signe = , c'est très probablement une
formule.


if left$(activecell.formula,1)="=" then
msgbox "Formule !!!"


Bonne après-midi

Rai

"Christian.L" a écrit
dans le message de news: enIRzAk%


Bonjour à tous

Comment peut t'on en VBA tester le contenu d'une
formule pour vérifier


quelle contient une formule.

Merci d'avance

C.L.

.





Avatar
Christian.L
Bonjour Pounet

Il fallait lire bien sur une cellule pour savoir si c'est une formule.

Mes excuses, mais c'est vendredi soir et je suis fatigué.
Par contre le "HasFormula" est bon a savoir

A bientôt

C.L.

"Pounet95" a écrit dans le message de
news:e4VGRIk%
Bonjour,
Ai-je bien lu ? Tester formule pour savoir si contient une formule ??
Sinon si c'est pour tester si une cellule contient une formule ce doit
être

:
If Cells(x,y).HasFormula=True then
msgbox" La cellule " &cells(x,y) &" contient une formule"
else
....
end if

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/

"Christian.L" a écrit dans le message de
news: enIRzAk%
Bonjour à tous

Comment peut t'on en VBA tester le contenu d'une formule pour vérifier
quelle contient une formule.

Merci d'avance

C.L.






Avatar
AV
Avis perso :
Il n'est pas très prudent de tester le = pour savoir si la cellule contient une
formule (un calcul donc)
Exemple à tester avec une cellule contenant
'*10

HasFormula permet de "trier le bon grain de l'ivraie"..
AV
Avatar
Patrick Fredin
Bonjour,

Range("A1").HasFormula

--
Patrick

"Christian.L" wrote in message
news:enIRzAk%
Bonjour à tous

Comment peut t'on en VBA tester le contenu d'une formule pour vérifier
quelle contient une formule.

Merci d'avance

C.L.