Search a range for cells that have values and set value in another cell based on results

I am looking for a macro that will search specified ranges on two work sheets and set a value in the cell immediately to the right for any matches found. All the search needs to do is search the specified range for any values, I am only interested in whether there is a value entered or not. I have attached an example file. What the macro should do is search the ranges "Bin_Codes" and "Bin_Codes2" and if any cells have data in them, it will enter the letter "D" in the adjacent cell to the right.

Search via macro.xlsx

Originally Posted by Leith Ross

Hello catsup,

In cell D3 enter this formula =IF(C3<>"","D","")
Select cells D3 through D38 and press the keys CTRL D. This will automatically fill the cells with the formula.

In cell I3 enter the formula =IF(I3<>"","D","")
Select cells I3 through I38 and press the keys CTRL D. This will automatically fill the cells with the formula.

Sorry, I should have specified, the reason I want it to be a macro is I will need to export the sheet to another program and only once it is exported do I want to fill in the adjacent cells. That is why I was thinking to use a macro. I won't be the one using the file either, so I would like to make it as simple as hitting the shortcut for the macro and having it do the necessary actions as there will be varying levels of excel knowledge among the users. Thanks for the help.