Inscrition dans cellule si vide

[KyFranRD]

Bonjour de bon matin ....

Je viens vers vous pour une ptite question, qui je pense ne nécessite pas de fichier joint.

Voilà c'est simple à expliquer mais je ne trouve pas la suite de mon code. Je cherche à inscrire le message "OP. à effectuer" dès lors qu"une cellule est vide dans la plage (M21😛102").

Que cela se fasse automatiquement dès celle ci vide ou blanche.

En effet dans un premier temps les cellules de cette plage sont de couleur noir et deviennent blanche ou vide (c'est pareil), dès lors qu'une OP est à réaliser.

Je ne sais pas trop quoi mettre:

Private Sub Worksheet_Change(ByVal Target As Range)


1er choix.....If Range("M21😛102").Value = "" Then
2ème choix ...... For each cell in range("M21😛102") = "" Then
........

Faut il mettre Private ........... change ou selection change



merci à l'avance

 

[Dull]

Re : Inscrition dans cellule si vide

Salut KyFranRD, le Forum

Peut-être un truc du style

Private Sub Worksheet_Change(ByVal Target As Range)
Dim C As Range
For Each C In Range("M21:P102")
If C = "" Then C.Value = "OP à réaliser"
Next C
End Sub

Bonne Journée

 

[frangy]

Re : Inscrition dans cellule si vide

Bonjour KyFranRD, Dull, le forum,

Si tu places le message dans la cellule, tu risques d’avoir une incompatibilité.
La cellule n’est pas vide, elle a un fond noir. La cellule se vide, le fond devient blanc, le message "OP. à effectuer" s’inscrit, la cellule n’est plus vide et fond devient noir.
Ca ne se mord pas un peu la queue 😛 ?

Cordialement.

 

[KyFranRD]

Re : Inscrition dans cellule si vide

merci dull et frangy

Oui c'est vrai en y réfléchissant. Qu'elles soient noir ou blanche, elles sont vides.

Je vais voir en reprenant le code de dull et en y incorporant une condition si couleur blanche et non vide

Merci