Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Message d'erreur

poussy67

XLDnaute Occasionnel
Bonjour le forum,

J'ai un classeur qui contient une vba qui me supprime les lignes si dans la colonne F se trouve le chiffre "2". Cela fonctionne très bien sur mon pc, mais des que je travaille sur un autre pc (l'occurrence sur le pc du boulot), il me donne un message d'erreur qui est: Erreur de compilation, projet ou bibliothèque introuvable et me mes Left en erreur.
Ci joint la vba et une image du message d'erreur:

Sub SupLigne2()
Dim i As Long
For i = Range("f65536").End(xlUp).Row To 1 Step -1
If Left(Cells(i, 6), 1) = "2" Then Rows(i).Delete
Next
End Sub

Merci d'avance pour votre aide

Cdt poussy
 

Pièces jointes

  • erreur.jpg
    19.7 KB · Affichages: 47
  • erreur.jpg
    19.7 KB · Affichages: 51
  • erreur.jpg
    19.7 KB · Affichages: 47

Discussions similaires

Réponses
1
Affichages
135
Réponses
6
Affichages
165
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…