Question : Le macro excellent dedans ne faisant pas ce que je pense que le code demande ?

J'ai enregistré un macro dedans l'excelle et ai adapté pour en inclure si la pièce du furmulas

one du code supossed pour rechercher A1 et si puis la colonne entière choisie vide et les delete.

I ont essayé la formule suivante des manières suivantes. Tous produisent des résultats aléatoires : colonnes du

(« B : B »). Select
s'IsEmpty (B1) Then
décalage d'Application.CutCopyMode = de False
Selection.Delete : Extrémité If

Or


du =xlToLeft
si colonnes d'IsEmpty (B1) Then
(« B : B »). Select
décalage d'Application.CutCopyMode = de False
Selection.Delete : Colonnes d'If

Or de fin du =xlToLeft
(« B : B »). Select
si (B1) = "" Then
décalage d'Application.CutCopyMode = de False
Selection.Delete : Fin If



All du =xlToLeft
de ces derniers vous voyez le macro choisir la colonne et puis sur quelques colums qu'elle supprime si A1 etc. a quelque chose dans lui et sur d'autres il fait l'opposite
class= de

Réponse : Le macro excellent dedans ne faisant pas ce que je pense que le code demande ?

Et pour supprimer la colonne entière pour la première cellule de blanc (dans l'usedrange) dans la rangée 1 vous pourriez essayer ceci - si la cellule est vraiment blanche

À la votre

Dave

1 : 2 : 3 : 4 : 5 : 6 :

KillA secondaire () Faible rng1 comme gamme Sur le résumé d'erreur après Placer rng1 = rangées (1).SpecialCells (les xlBlanks) Sinon rng1 n'est rien puis rng1.Cells (1).EntireColumn.Delete Sous-marin d'extrémité