Cuestión : ¿La macro adentro sobresale no haciendo lo que pienso que el código pide?

He registrado una macro adentro la sobresalgo y adapté para incluir alguno si la pieza del furmulas

one del código supossed para mirar para arriba A1 y si entonces la columna entera selecta vacía y delete.

I han intentado la fórmula siguiente de las maneras siguientes. Todos producen resultados al azar: columnas del

(“B: B”). Select
si IsEmpty (B1) Then
cambio de Application.CutCopyMode = de False
Selection.Delete: Extremo If

Or


del =xlToLeft
si columnas de IsEmpty (B1) Then
(“B: B”). Select
cambio de Application.CutCopyMode = de False
Selection.Delete: Columnas de If

Or del final del =xlToLeft
(“B: B”). Select
si (B1) = "" Then
cambio de Application.CutCopyMode = de False
Selection.Delete: Final If



All del =xlToLeft
de éstos usted ve la macro el seleccionar de la columna y entonces en algunos colums que suprime si A1 etc tiene algo en él y en otros hace el opposite
class= del

Respuesta : ¿La macro adentro sobresale no haciendo lo que pienso que el código pide?

Y para suprimir la columna entera para la primera célula del espacio en blanco (dentro del usedrange) en la fila 1 usted podría intentar esto - si la célula es verdad en blanco

Aclamaciones

Dave

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

KillA secundario () Rng1 dévil como gama En curriculum vitae del error después Fijar rng1 = las filas (1).SpecialCells (los xlBlanks) Si no rng1 no es nada entonces rng1.Cells (1).EntireColumn.Delete Submarino del extremo