Bonjour,

Voilà je débute encore en VBA et je souhaite appliquer une formule sur une sélection de cellules - sauf sur les cellules vides.

Pour le moment le programme (merci Pierre) est celui-ci :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub ENFANTS_20()
 
Dim Cellule As Range
Dim Coef As Variant
 
Coef = 1.06567713
For Each Cellule In Selection
Cellule.Value = Cellule.Value * Coef
Next Cellule
 
End Sub
Pouvez-vous me mettre sur la voie ?

Merci beaucoup

Thomas