Variable objet ou variable de bloc with non définie
Marie
-
ozone_ Messages postés 1823 Statut Membre -
ozone_ Messages postés 1823 Statut Membre -
Bonjour tout le monde, j'ai trouvé un problème lors de l'exécution de ce programme vba , aidez moi à trouver la solution et merci.
C'est mon code :
Sub Creteria()
Dim Feuil1 As Worksheet
Dim lastcol As Long
Dim x As Long
Dim countCr As Long
lastcol = Feuil1.Cells(1, Columns.Count).End(xlToLeft).Column
For x = 1 To lastcol
If Range("4" & x).Value <= 0.5 Then
countCr = countCr + 1
End If
Next x
End Sub
