Bonjour le forum,
Je fais appel à vous parceque je bloque sur ce code que j'ai commencé à faire. Ci-dessous le code :
La boucle marche bien lorsque il y a des chiffres sur toutes mes feuilles, mais lorsque ma feuille est vide la macro bloque. Comment puis-je forcer la macro à ne pas bloquer et continuer la boucle même si il y a des feuille vides.
Merci de votre aide.
Soleil11😕
Je fais appel à vous parceque je bloque sur ce code que j'ai commencé à faire. Ci-dessous le code :
La boucle marche bien lorsque il y a des chiffres sur toutes mes feuilles, mais lorsque ma feuille est vide la macro bloque. Comment puis-je forcer la macro à ne pas bloquer et continuer la boucle même si il y a des feuille vides.
Code:
Sub Testclean3()
For x = 2 To Sheets.Count
Sheets(x).Activate
Range("B8").Select
Selection.End(xlDown).Select
Selection.End(xlToLeft).Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Cut
Range("M1").Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Activate
ActiveSheet.Paste
Next x
End SubMerci de votre aide.
Soleil11😕