CompterCelluleContenantUneFormule

  • Initiateur de la discussion Initiateur de la discussion Moa
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

M

Moa

Guest
Salut à Toutes et tous !

Est-il possible, avec une formule ( pas en Vba), de compter les cellules contenant UNE FORMULE ?


Merci beaucoup d'avance

@ +

Moa
 
Bon, Moa,

j'ai grignotté u, biscuit au chocolat, (pas bon por ma ligne, ça!), et ça va mieux...


OK, tu as un résultat dans toto, donc après :

if toto > 0 then
range("DS14").value = 0
else
range("DS14").value = 1
end if

Cathy
 
Range("ds16:ds17").Select
Selection.SpecialCells(xlCellTypeFormulas, 23).Select
For Each cell In Selection
toto = toto + 1
Next
' MsgBox toto

If toto > 0 Then
Range("DS14").Value = 1
Else
Range("DS14").Value = 0
End If


Cathy
 
Eh bien ma p'tit Cat, ça marche plus de bug, mais en l'occurence, si il n'y a plus de bug en cas de cellule vide, le résultat est devenu faux...héhé..

Décidément, c'est vraiment prise de tête.

Merci encore à toi...j'y retourne

@ +

Moa
 
Ah oui, Moa, t'as raison!

Sub Macro1()
' Macro1 Macro
' Macro enregistrée le 19/02/2003 par Cathy

Range("ds16:ds17").Select
On Error GoTo Fin
Selection.SpecialCells(xlCellTypeFormulas, 23).Select
For Each cell In Selection
toto = toto + 1
Next
MsgBox toto
If toto > 0 Then
Range("DS14").Value = 1
Else
Range("DS14").Value = 0
End If
Fin:
End Sub

Cathy
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
10
Affichages
58
Réponses
3
Affichages
371
Retour