Search and fill blank cells based on various conditions

Hi guys,
I require a macro which can fill in blank cells based on a few conditions.
Please refer the table below as example:

Email ID	Code	Type	Visits	Views
[email protected]	IN	Service	2	4
		Forecast	1	0
	AR	Report	4	10
[email protected]		Forecast	2	5
[email protected]	IN	Service	2	4

Condition 01: If both Email ID and Code are blank, then it should be filled with the text "Unknown"
Condition 02: If code is present but Email ID is blank, then also the blank cell should be filled with text "Unknown"
Condition 03: if Email ID is present but code is blank, the a message box should prompt to fill the cell manually

Regards,
Johnny

Hi patel45,

Thanks a lot for solving the issue!!!