Bonjour,
J'ai un souci de code VBA pour tout simplement afficher une valeur par défaut dans certaines cellules tant que l'utilisateur ne clique pas sur la cellule.
Voici mon code :
Sub FillValues()
Dim InternalMarge As Range
Dim ExternalMarge As Range
Dim SFC As Range
InternalMarge = "D20"
If InternalMarge = "" Then
InternalMarge = "30"
End If
ExternalMarge = "D21"
If ExternalMarge = "" Then
ExternalMarge = "10"
End If
SFC = "D24"
If SFC = "" Then
SFC = "15"
End If
End Sub
Merci
PS : comment faire pour avoir la partie "Excel" du message que l'on poste que je vois chez certains posteurs ?
J'ai un souci de code VBA pour tout simplement afficher une valeur par défaut dans certaines cellules tant que l'utilisateur ne clique pas sur la cellule.
Voici mon code :
Sub FillValues()
Dim InternalMarge As Range
Dim ExternalMarge As Range
Dim SFC As Range
InternalMarge = "D20"
If InternalMarge = "" Then
InternalMarge = "30"
End If
ExternalMarge = "D21"
If ExternalMarge = "" Then
ExternalMarge = "10"
End If
SFC = "D24"
If SFC = "" Then
SFC = "15"
End If
End Sub
Merci
PS : comment faire pour avoir la partie "Excel" du message que l'on poste que je vois chez certains posteurs ?