How to reference a cell into a Dialog Box ?
in [Programming]
|
From: Rob on 7 Mar 2010 22:11 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.
From: Jacob Skaria on 7 Mar 2010 23:46 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 -- Jacob "Rob" wrote: > 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. >
From: Rob on 8 Mar 2010 02:03 Thanks Jacob. "Jacob Skaria" wrote: > 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 > > -- > Jacob > > > "Rob" wrote: > > > 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. > >
|
Pages: 1 Prev: Copy rows with values in sheet 1 to next empty row in sheet2 Next: How to Loop? |