Restreidre Macro Sur une Colonne

Par contre une question pourrait faire mieux, comment pourrais je tester si un cellule n'est pas vide pour affecter la date du jour et la fixer définitivement.

Exemple si la la cellule H1 est renseignée la cellule I1 reçoit la date du jour.

Merci encore à vous

Cordialement

Le 15/05/2018 à 17:03

Hosni,

Ci-joint le fichier avec la modification souhaitée.

A+ Bougla

11hosni.xlsm (13.13 Ko)

Le 15/05/2018 à 22:35

Bonsoir Bougla

Merci pour votre réponse; je pense que je me suis mal exprimé, ce que je voulais, quand je mets une valeur dans la cellule H1 la cellule I1 affiche la date du jour automatiquement.

Sur le classeur que vous avez joins c'est pas le cas sauf si j'ai mal compris.

Merci à vous.

Le 16/05/2018 à 06:53

Bonjour,

Une piste :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

    If Target.Column <> 9 Then Exit Sub

    Target.Value = Date
    Cancel = True

End Sub

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Column <> 8 Then Exit Sub
    If Target.Count > 1 Then Exit Sub

    Application.EnableEvents = False

    If Target.Value <> "" Then Target.Offset(, 1).Value = Date

    Application.EnableEvents = True

End Sub

Le 16/05/2018 à 08:01

Bonjour Theze!

Merci pour ta réponse, donne moi juste le temps de la mettre en exécution sur mon classeur, je reviens un plus tard.

Merci encore.

Le 16/05/2018 à 10:21

Bonjour Theze!

Merci pour la macro, elle fonctionne bien.

A bientôt

Le 16/05/2018 à 11:00

Bonjour Hosni,

Une modification apportée, pour vérification cellule H1 sélectionnée

si Vide on fait rien