date review equation

[gregtgonzalez]

Hello all!
I am once again posting for some support.
I have developed a spread sheet that reports back information to the "master sheet" from other sheets in the workbook.

In my scenario I am trying to improve a function where three contacts need to be made before the file can be escalated. As you can tell from the equation there are 15 sheets where the information i am looking for can be found. I have found that when this workbook is being shared among my colleagues, the sheet seems to lag and take forever to update. I am wondering if the use of VBA Vs using an individual equation for each cell would make this easier?

So on my sheet for Column "A2:U2" I have the equation. Essentially is needs to go through all of the listed ranges (which are the names of the individual sheets) to find what is in the

Column U

=IF(A2<"",IFERROR(IF(LEN(VLOOKUP(A2,GREY,22,FALSE))=0,"",VLOOKUP(A2,GREY,22,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,LIME,22,FALSE))=0,"",VLOOKUP(A2,LIME,22,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,BROWN,22,FALSE))=0,"",VLOOKUP(A2,BROWN,22,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,BLACK,22,FALSE))=0,"",VLOOKUP(A2,BLACK,22,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,WHITE,22,FALSE))=0,"",VLOOKUP(A2,WHITE,22,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,PURPLE,22,FALSE))=0,"",VLOOKUP(A2,PURPLE,22,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,MAGENTA,22,FALSE))=0,"",VLOOKUP(A2,MAGENTA,22,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,YELLOW,22,FALSE))=0,"",VLOOKUP(A2,YELLOW,22,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,BLUE,22,FALSE))=0,"",VLOOKUP(A2,BLUE,22,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,RED,22,FALSE))=0,"",VLOOKUP(A2,RED,22,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,SIERRA,22,FALSE))=0,"",VLOOKUP(A2,SIERRA,22,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,KINGGOLD,22,FALSE))=0,"",VLOOKUP(A2,KINGGOLD,22,FALSE)), IFERROR(IF(LEN(VLOOKUP(A2,SAGE,22,FALSE))=0,"",VLOOKUP(A2,SAGE,22,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,GARNET,22,FALSE))=0,"",VLOOKUP(A2,GARNET,22,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,GREEN,22,FALSE))=0,"",VLOOKUP(A2,GREEN,22,FALSE)),"NO CALL FOUND"))))))))))))))),"")

Column V

=IF(A6<"",IFERROR(IF(LEN(VLOOKUP(A6,GREY,24,FALSE))=0,"",VLOOKUP(A6,GREY,24,FALSE)),IFERROR(IF(LEN(VLOOKUP(A6,LIME,24,FALSE))=0,"",VLOOKUP(A6,LIME,24,FALSE)),IFERROR(IF(LEN(VLOOKUP(A6,BROWN,24,FALSE))=0,"",VLOOKUP(A6,BROWN,24,FALSE)),IFERROR(IF(LEN(VLOOKUP(A6,BLACK,24,FALSE))=0,"",VLOOKUP(A6,BLACK,24,FALSE)),IFERROR(IF(LEN(VLOOKUP(A6,WHITE,24,FALSE))=0,"",VLOOKUP(A6,WHITE,24,FALSE)),IFERROR(IF(LEN(VLOOKUP(A6,PURPLE,24,FALSE))=0,"",VLOOKUP(A6,PURPLE,24,FALSE)),IFERROR(IF(LEN(VLOOKUP(A6,MAGENTA,24,FALSE))=0,"",VLOOKUP(A6,MAGENTA,24,FALSE)),IFERROR(IF(LEN(VLOOKUP(A6,YELLOW,24,FALSE))=0,"",VLOOKUP(A6,YELLOW,24,FALSE)),IFERROR(IF(LEN(VLOOKUP(A6,BLUE,24,FALSE))=0,"",VLOOKUP(A6,BLUE,24,FALSE)),IFERROR(IF(LEN(VLOOKUP(A6,RED,24,FALSE))=0,"",VLOOKUP(A6,RED,24,FALSE)),IFERROR(IF(LEN(VLOOKUP(A6,SIERRA,24,FALSE))=0,"",VLOOKUP(A6,SIERRA,24,FALSE)),IFERROR(IF(LEN(VLOOKUP(A6,KINGGOLD,24,FALSE))=0,"",VLOOKUP(A6,KINGGOLD,24,FALSE)), IFERROR(IF(LEN(VLOOKUP(A6,SAGE,24,FALSE))=0,"",VLOOKUP(A6,SAGE,24,FALSE)),IFERROR(IF(LEN(VLOOKUP(A6,GARNET,24,FALSE))=0,"",VLOOKUP(A6,GARNET,24,FALSE)),IFERROR(IF(LEN(VLOOKUP(A6,GREEN,24,FALSE))=0,"",VLOOKUP(A6,GREEN,24,FALSE)),"NO CALL FOUND"))))))))))))))),"")

Column W

=IF(A2<"",IFERROR(IF(LEN(VLOOKUP(A2,GREY,26,FALSE))=0,"",VLOOKUP(A2,GREY,26,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,LIME,26,FALSE))=0,"",VLOOKUP(A2,LIME,26,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,BROWN,26,FALSE))=0,"",VLOOKUP(A2,BROWN,26,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,BLACK,26,FALSE))=0,"",VLOOKUP(A2,BLACK,26,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,WHITE,26,FALSE))=0,"",VLOOKUP(A2,WHITE,26,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,PURPLE,26,FALSE))=0,"",VLOOKUP(A2,PURPLE,26,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,MAGENTA,26,FALSE))=0,"",VLOOKUP(A2,MAGENTA,26,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,YELLOW,26,FALSE))=0,"",VLOOKUP(A2,YELLOW,26,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,BLUE,26,FALSE))=0,"",VLOOKUP(A2,BLUE,26,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,RED,26,FALSE))=0,"",VLOOKUP(A2,RED,26,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,SIERRA,26,FALSE))=0,"",VLOOKUP(A2,SIERRA,26,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,KINGGOLD,26,FALSE))=0,"",VLOOKUP(A2,KINGGOLD,26,FALSE)), IFERROR(IF(LEN(VLOOKUP(A2,SAGE,26,FALSE))=0,"",VLOOKUP(A2,SAGE,26,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,GARNET,26,FALSE))=0,"",VLOOKUP(A2,GARNET,26,FALSE)),IFERROR(IF(LEN(VLOOKUP(A2,GREEN,26,FALSE))=0,"",VLOOKUP(A2,GREEN,26,FALSE)),"NO CALL FOUND"))))))))))))))),"")

(hopefully i posted this in the correct format)

is there a way to use a macro that would be able to perform the required search and report the necessary information?

Am i correct in assuming by having this particular formula running in each of the three necessary cells for each of the 15K+ entries there are, this substantially slows down the entire workbook?