Recherche de valeurs numériques

Signaler
Messages postés
2
Date d'inscription
lundi 2 février 2004
Statut
Membre
Dernière intervention
11 juillet 2005
-
Messages postés
2
Date d'inscription
lundi 2 février 2004
Statut
Membre
Dernière intervention
11 juillet 2005
-
Bonjour,

J'ai un petit problème tout con mais je me prends la tête avec donc si quelqu'un peut m'aider.
Je voudrai rechercher dans une feuille excel que les cellules ayant une valeur numérique pour leur appliquer une formule particulière via VBA.

jifolo

2 réponses

Messages postés
936
Date d'inscription
lundi 19 janvier 2004
Statut
Membre
Dernière intervention
17 mars 2017
4
lut,
voilà à étofer tout de même
Dim cell
For Each cell In ActiveCell.CurrentRegion


If IsNumeric(cell.Value) And Not IsEmpty(cell.Value) Then
' Ici tu peux faire une autre action
cell.Value = cell.Value + 10

End If
Next

Cordialement, Jean-Paul
______________________________________________________________________

Le Savoir n'a de valeur que s'il est partagé
Messages postés
2
Date d'inscription
lundi 2 février 2004
Statut
Membre
Dernière intervention
11 juillet 2005

merci

jifolo