one more macro question
ok, so this macro is working great..
Sub CopyToSheetz() Dim rng As Range Dim oCell As Range Set rng = Range("B4:B" & Cells(Rows.Count, "B").End(xlUp).Row) For Each oCell In rng oCell.EntireRow.Copy _ Destination:=Sheets(oCell.Value).Range("A65536").E nd(xlUp).Offset(1, 0) Next oCell End Sub ----- except, i have this formula in my B column =IF(A4="","",IF(ISERROR(VLOOKUP(A4,'Names List'!$A$5:$E$5000,2,FALSE)),"NA",VLOOKUP(A4,'Name s List'!$A$5:$E$5000,2,FALSE))) so when the macro gets to the lines that have the "" in it, i get a syntax error. Can someone help me get around this? I dont need these lines copied, I just wanetd to get rid of the #N/A if A is blank. Any help would be great.. Thanks! |
All times are GMT +1. The time now is 08:13 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com