Hello,
I have attempted (rather unsuccessfully) to combine 2 separate codes and now I can't get the message box to appear. Anybody have an input to help me?
Sub sales1()Dim Msg, Style, Title
Rows("125:136").Hidden = Not Rows("125:136").Hidden
If Range("K170").Value < Range("Info!E34") Then...