Searches all sheets in wb for exact string in column, copy/paste certain data from row

I have a macro (much thanks and kudos to arlu) that will search through a workbook and pull data from a certain column in each sheet. What I need now is to be able to pull other parts of the row that data is in onto that same sheet.
Macro is:

Please Login or Register  to view this content.

I need to pull the person responsible, the Risk ranking L&S which are the highest for Personnel, and the highest for Environmental, and then the Item no. which corresponds to those rankings.

I have attached a testbook which gives an example.

Thank you very much to anyone who can assist me!

bcas77,

Something like this?

Please Login or Register  to view this content.

Yeah, just change it from ws.Name to the same ws.Cells(rngfound.row, "column letter").text format of the others for the desired column letter.

couodln't you just set up the same conditional formats on your 'Recommendations' sheet? There doesn't really need to be VBA for that...

Can you post the code you're using? It's likely that you've adapted the code a bit, so I'd like to see exactly what the code is before I conjecture.

The code looks good to me. It might be a problem with merged cells. Are there any merged cells in column L of the other worksheets?

Hmm... I tested it with some merged cells but that isn't causing the error for me. Can you post a sample workbook that is experiencing the problem?

Ok, I figured it might be, but I couldn't reproduce the error on my machine. Glad to hear you've got it sorted. As far as merged cells go, anybody who's worked with Excel a lot will always tell you to never use merged cells at all costs.