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

macro qui rame énormément

  • Initiateur de la discussion Initiateur de la discussion meldja
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

meldja

XLDnaute Impliqué
Bonjour,
Je viens de lancer une macro censé effacer lignes si la cellule en colonne C est vide.
Voici le code :
Code:
Private Sub CommandButton1_Click()
Dim i As Integer
Dim der As Integer
der = Range("C65536").End(xlUp).Row

For i = der To 2 Step -1
If Range("C" & i) = 0 Then
Rows(i).Delete
End If
Next i
End Sub

Ca rame à un tel point que j'ai dû arrêter l'exécution de cette dernière.
Il faut dire que je l'ai exécuté sur un fichier contenant 2015 lignes et 2 cellules sur 6 sont vides en colonne C (donc 2 lignes sur 6 doivent être supprimées).

Est-ce que c'est uniquement dû à la taille du fichier ou la macro laisse à désirer ?
Pour info, j'ai testé ce code sur une centaine de lignes et ça ne prend que quelques secondes à peine.

Merci d'avance et bonne journée
 
Re : macro qui rame énormément

Re,
vbacrumble :
je suis trop décalé par rapport à vous (connexion analogique entre 10 et 20k/b sec). A peine je te réponds qu'il faut que j'attende entre 5 et 10 mn pour consulter le topik. Ca crée un gros décalage.
Tout ceci pour te remercier dans un premier temps de m'apporter des solutions, et dans un deuxième temps, pour te dire que je vais tester ta solution demain au boulot avec le fichier qui pose problème (parce qu'il n'y a aucun problème avec les fichiers tests que je fais chez moi).
Merci et bonne soirée.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
15
Affichages
823
Réponses
5
Affichages
929
Réponses
7
Affichages
186
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…