L'instruction If/Then ne s'exécute pas correctement

Question

J'ai créé différentes macros avec If/Then mais cette fois j'ai un problème avec le processus If/Then. Il ne s'exécute pas correctement pour la deuxième partie de l'If/Then après And. Il ne fait que tourner les valeurs 0 pour le décalage qui est avant Et. Le format des cellules n'a pas de problème, car, quand je les change de position ça marche bien pour celui qui est avant et encore. Je fournis le code ci-dessous.

For Each cell2 In Range("E7:E" & lastrow12) 
    If cell2.Value = 0 Then 
    cell2.Offset(0, -2).Value = 0 And cell2.Offset(0, -1).Value = 0 
    End If 
    Next cell2 

Answer 1

vous allez ici:

For Each cell2 In Range("E7:E" & lastrow12) 
    If cell2.value = 0 Then 
     cell2.Offset(0, -2).value = 0 
     cell2.Offset(0, -1).value = 0 
    End If 
Next cell2 

Andis a boolean operator, it is used in conditions.

Answer 2

La fonction And est une fonction intégrée qui est catégorisée comme une fonction logique, par exemple True And True.

Vous ne pouvez pas utiliser pour fusionner deux instructions. Ceci étant dit:

For Each cell2 In Range("E7:E" & lastrow12) 
    With cell2 
     If .Value = 0 Then 
      .Offset(0, -1).Value = 0 
      .Offset(0, -2).Value = 0 
     End If 
    End With 
Next cell2