Bonjour le forum !
Je cherche actuellement à créer un code VBA très simple qui permet d'entrer une valeur dans une cellule B2 si cette cellule est vide. Si l'utilisateur entre une valeur alors la macro ne s'active pas.
Exemple que je cherche à faire :
2 calculs à effectuer, calcul1 et calcul2.
Si calcul1 est vide alors calcul1 vaut 1000.
Si calcul2 est vide alors calcul2 vaut 2000.
Voici le code que j'ai fait et qui ne fonctionne pas :
Je vous joint le fichier Excel exemple
J'attends de vos nouvelles bienveillantes ...
Bonne journée !
Je cherche actuellement à créer un code VBA très simple qui permet d'entrer une valeur dans une cellule B2 si cette cellule est vide. Si l'utilisateur entre une valeur alors la macro ne s'active pas.
Exemple que je cherche à faire :
2 calculs à effectuer, calcul1 et calcul2.
Si calcul1 est vide alors calcul1 vaut 1000.
Si calcul2 est vide alors calcul2 vaut 2000.
Voici le code que j'ai fait et qui ne fonctionne pas :
Code:
Sub Worksheet_change(ByVal Target As Range)
Dim calcul1 As Single
Dim Calcul2 As Single
calcul1 = Range("B2")
Calcul2 = Range("B4")
If calcul1 = "" Then
calcul1 = 1000
End If
If Calcul2 = "" Then
Calcul2 = 2000
End If
End Sub
Je vous joint le fichier Excel exemple
J'attends de vos nouvelles bienveillantes ...
Bonne journée !