test sur cellules

[Amo]

Bonjour à tous, voici mon souci :
dans la colonne A, j'ai mis soit :
- des formules
- des valeurs
- rien

je voudrais qu'en colonne C, ça écrive respectivement FORMULE, VALEUR ou RIEN

Merci pour vos solutions...

Amo [file name=exemple_20051205091237.zip size=2624]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/exemple_20051205091237.zip[/file]

 

[MichelXld]

bonjour

je te propose une solution par macro

Sub typeCellule()
Dim Cell As Range

For Each Cell In Range('A1:A10')
If Cell.HasFormula Then
Cell.Offset(0, 2) = 'Formule'
Else
If Cell = '' Then
Cell.Offset(0, 2) = 'Vide'
Else
Cell.Offset(0, 2) = 'Valeur'
End If
End If

Next Cell
End Sub


bonne journée
MichelXld

 

[Amo]

merci beaucoup michelxld,

bonne journée !