How to reference a cell into a Dialog Box ?

R

Rob

Hi,
In the code below I have included a Dialog Box named CriteriaReached to show
if cell g6 < h6 < k6.

My question being. Is it possible to reference a cell with text in it into
the Box?

Sub CheckVolumeRise1()
If Range("g6") < Range("h6") < Range("k6") Then
CriteriaReached.Show
End If
End Sub

Thank you.
 
J

Jacob Skaria

Try

Dim varRange As Variant
varRange = Application.InputBox("Select cell", Type:=8)
 
R

Rob

Thanks Jacob.

Jacob Skaria said:
Try

Dim varRange As Variant
varRange = Application.InputBox("Select cell", Type:=8)

-----------------
The code should be
If Range("g6") < Range("h6") And Range("h6") < Range("k6") Then

End If
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top