Eliminate Blank Columns

[ionelz]

I need a Formula at AE to eliminate blank columns
At AE should B W, at AF should be Z and at AG should be AC
It is more complicated that shown, I can have 2 empty columns, or 5 empty columns ....

 

[awoohaw]

Do you want them deleted or do you want them not showing up in another section of your workbook a result of an array formula or function?
To delete them. Assuming there are no blank cells in a column you want to keep.
Select the rage in this case W1:AC8,
Press F5
Click Special
Click Checkbox for blank cells
Click OK
Then from ribbon click cells, delete columns.

For formula or filter, use the choosecolsI() columns function
in your example =Choosecols(W1:AC8,1,4,7)

 

[ionelz]

Thank you !
I would be nice if formula will wind the Column number

 

[awoohaw]

You're welcome.
I'm guessing you were interested in the 2nd suggestion.
Try this (this is only looking for blank column headers).

And it makes extra rows that are blank in the array output:

Book2
	W	X	Y	Z	AA	AB	AC
1	4			2			3
2	2			2			2
3	2			2			2
4	3			2			2
5	4			4			4
6	3			4			2
7
8
9	4	2	3
10	2	2	2
11	2	2	2
12	3	2	2
13	4	4	4
14	3	4	2
15
16
Sheet5

Cell Formulas
Range	Formula
W9:Y16	W9	=LET(clmns,(W1:AC1<>"")*(SEQUENCE(1,COLUMNS(W1:AC1))),select,CHOOSECOLS(W1:AC8,FILTER(clmns,clmns>0,"")),IF(select="","",select))
Dynamic array formulas.