code vba pour savoir si une cellule contient une formule

[philppe27]

Bonsoir,

Je voudrais connaitre le code vba pour savoir si une cellule contient une formule.

Merci d'avance,

Cordialement

 

[Staple1600]

Re : code vba pour savoir si une cellule contient une formule

Bonsoir

HasFormula tout simplement

Pour les détails, comme toujours : ALT+F11 puis F1

 

[philppe27]

Re : code vba pour savoir si une cellule contient une formule

Merci Staple pour ta réponse mais je n'arrive pas à résoudre mon problème.

Je voudrais pour une cellule (B6) qui se trouve dans une feuille:
avoir la possibilité initialement de saisir une formule
avoir la possibilité ensuite de saisir une chaine de caractère avec un espace
et que cette chaine de caractère soit tronquée au niveau de l'espace au moment la validation de la saisie

J'ai donc créé le code suivant qui ne fonctionne pas bien.

Merci de votre aide

Cordialement

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect([B6,], Target) Is Nothing And Target.Count = 1 Then
Application.EnableEvents = False
If Target.HasFormula = False Then
MyPos = InStr(Target, " ")
If MyPos = 0 Then
Target = Target
Else
Target = Left(Target, WorksheetFunction.Search(" ", Target) - 1)
End If
Else
Target = Target
End If
Application.EnableEvents = True
End If



End Sub