Test de 2 valeurs décalées de 4 colonnes

[Urdi]

Bonjour, j'aurai besoin d'un coup de pouce pour traduire:
le terme 4 colonnes plus loin, dans ce code:
j'ai un gros doute sur le code Target.value.column(4)...

  For Each Target In Range("saisie_matin") 'saisie_matin sont des colonnes style C6:C23; M6:M23 ; H6:H23 
  
    If Target.Value = "" And Target.Value.Column(4) = "" Then 'En fait avec Target.Value.column(4) j'aimerai qu'il recupère la valeur de la cellulesitué sur la même ligne mais 4 cellule plus loin (Si Target.value est C6 qu'il regarde la valeur de H6 
    Target.Value.Column(4) = Target.Value.Column(4) + 0.5
    End If
      
  Next

Après reflexion:

Ce code correspondrait-il?

For Each Target In Range("saisie_matin")
  
    If Target.Value = "" And Target.Value.Offset(0, 5) = "" Then
    Target.Value.Offset(0, 5) = Target.Value.Offset(0, 5) + 0.5
    End If
      
 Next

Avec comme traduction,

Pour chaque cellule de la plage,
si la valeur de la cellule est vide ET la valeur la cellule voisine de 4 colonne plus loin est également vide ALORS
j'ajoute 0,5 dans la cellule voisine.

 

[Catrice]

Re : Test de 2 valeurs décalées de 4 colonnes

Bonjour,

For Each Target In Range("saisie_matin")
If Target.Value = "" And Target.Offset(0, 5).Value = "" Then
Target.Offset(0, 5).Value = Target.Offset(0, 5).Value + 0.5
End If
Next

 

[Urdi]

Re : Test de 2 valeurs décalées de 4 colonnes

Merci Catrice 😉

J'y étais persque...