Bonjour,
je suis débutante en macro vba et je voudrais modifier une condition de la macro suivante :
Sub Test()
Set definedrange = Sheets(1).Range("A1:A65536")
For Each ligne In definedrange
If (ligne.Value = "Cours non satisfaisant") Then
i = i + 1
Debug.Print ligne.Row
Sheets("Feuil2").Cells(i, 1).Value = Sheets("Feuil1").Cells(ligne.Row, 2).Value
Sheets("Feuil2").Cells(i, 2).Value = Sheets("Feuil1").Cells(ligne.Row, 3).Value
End If
Next ligne
je voudrai remplacer la condition :
If (ligne.Value = "Cours non satisfaisant")
par :
If (ligne.value est différent de "cours satisfaisant")
Merci d'avance pour votre aide!
je suis débutante en macro vba et je voudrais modifier une condition de la macro suivante :
Sub Test()
Set definedrange = Sheets(1).Range("A1:A65536")
For Each ligne In definedrange
If (ligne.Value = "Cours non satisfaisant") Then
i = i + 1
Debug.Print ligne.Row
Sheets("Feuil2").Cells(i, 1).Value = Sheets("Feuil1").Cells(ligne.Row, 2).Value
Sheets("Feuil2").Cells(i, 2).Value = Sheets("Feuil1").Cells(ligne.Row, 3).Value
End If
Next ligne
je voudrai remplacer la condition :
If (ligne.Value = "Cours non satisfaisant")
par :
If (ligne.value est différent de "cours satisfaisant")
Merci d'avance pour votre aide!