Bonjour, j'ai besoin d'aide sur le fonctionnement d'une macro qui ne semble pas fonctionner:
J'ai un fichier avec deux onglets, dans le deuxième onglet j'ai un ensemble de colonne qui peuvent comporter dans différente lignes le texte "Text" je voudrais faire en sorte que la macro recherche dans chaque colonne les cellules qui comportent le mot "Text" et supprimer la colonne si c'est le cas. Je précise que je connaitrais pas dans le futur le nombre de colonnes. J'ai essayé d'adapter des macro trouvées sur le forum à mon problème en utilisant une boucle avec condition mais celle-ci ne semble avoir aucune action. Je pense que c'est évident maisje précise que je suis débutant
Ci joint le code:
Sub colonnes_2()
Dim i As Integer
Dim j As Integer
Application.ScreenUpdating = False
Windows("Fichier_synthèse1.xlsm").Activate
Sheets("Funds").Activate
For i = 1 To 60 ' 60 premières lignes
For j = 1 To 200 '200première colonnes
If Cells(i, j).Value = "Text" Then
Cells(i, j).EntireColumn.Delete
End If
Next
Next
Application.ScreenUpdating = True
End Sub
Je joins le fichier en question aussi.
Par avance merci beaucoup si vous avez des pistes.