Code to Resize cells with formula in the first cell

[RAJESH1960]

Hello experts

I have this data in my sheet where column E is derived from a code. There is a formula in cell F7 which is dragged down to 3000 rows.

The formula is =VLOOKUP(E6,$A$2:$A$3000,1,0). If the cell in column E19 is blank, then I want the cell F19 to be blank. I tried this formula =IFERROR(VLOOKUP(E6,$A$2:$A$3000,1,0),"")

The problem is when the next line of code selects the cells with an error, it selects all the cells with error, even the cells which are blank in column E. Is it possible to write a code to insert the formula in cell F6 and resize the cells with the cells with value in the column E.?

Book1
	A	B	C	D	E	F	G
1
2	January
3	February
4	March
5	April
6	May				Mercury	#N/A
7	June				February	February
8	July				March	March
9	August				April	April
10	September				May	May
11	October				June	June
12	November				July	July
13	December				August	August
14	Sunday				September	September
15	Monday				October	October
16	Tuesday				November	November
17	Wednesday				December	December
18					Sunday	Sunday
19						#N/A
20						#N/A
21						#N/A
22						#N/A
23						#N/A
24						#N/A
25						#N/A
List of Ledgers

Cell Formulas
Range	Formula
F6:F25	F6	=VLOOKUP(E6,$A$2:$A$4922,1,0)

 

[johnnyL]

You are welcome @RAJESH1960.