InputBox object required error

let me know what message is popup each time

Sub InputBoxTest()
Dim MySelection As Range
Set MySelection = Application.InputBox(prompt:="Select a range of cells", Type:=8)
msgbox MySelection.address
MySelection.Select
End Sub

The message box shows the selected address but only when the macro runs correctly.
If the inputbox goes to error the message box does not execute.

did you try reproducing problem on your machine?

Strange thing I am not getting that error . I am using windows 98/NT/2000


try using this macro

Sub InputBoxTest()

MySelection = Application.InputBox(prompt:="Select a range of cells")
range(MySelection).select
End Sub

tried this but macro fails on "Range(MySelection).Select" as "myselection" is not set by inputbox.

When you say it works fine for you have you added conditional formatting to worksheet cell B1 as per description of problem? Also the conditional formatiing must contain a function e.g. "cell value is less than =today()-6"

Yes I did use the conditional format as defined by you.

What operating system are you using

2000 pro but I have tried same file on (Me 2000 and XPhome)
any chance of emailing a copy of your file for me to try?
peter.wetzler@hydro.com