input box
 

is there a way i can put an input box on my spread sheet, where the user can
type in a job # and it will take them to that cell?

input box
 

If you have a date, you can get the day name with code like the
following:


Dim DayName As String
DayName = Format(Now, "dddd")
MsgBox DayName



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com

"steve" wrote in message
...
is there a way i can put an input box on my spread sheet, where
the user can
type in a job # and it will take them to that cell?

input box
 

Dim rng As Range

set rng = Application.Inputbox("Select a cell",Type:=8)
If rng Is Nothing Then
rng.select
End If

This techniwue allows you to select a range from within the inputbox, and
that range is returned.

--
HTH

Bob Phillips

"steve" wrote in message
...
is there a way i can put an input box on my spread sheet, where the user
can
type in a job # and it will take them to that cell?

input box
 

Dim rng As Range
set rng = Application.Inputbox("Select a cell",Type:=8)
If rng Is Nothing Then
'do nothing
else
rng.select
End If

I bet you dropped a Not somewhere. Please check the floor near the pc.

Bob Phillips wrote:

Dim rng As Range

set rng = Application.Inputbox("Select a cell",Type:=8)
If rng Is Nothing Then
rng.select
End If

This techniwue allows you to select a range from within the inputbox, and
that range is returned.

--
HTH

Bob Phillips

"steve" wrote in message
...
is there a way i can put an input box on my spread sheet, where the user
can
type in a job # and it will take them to that cell?

--

Dave Peterson

input box
 

You'll want an On Error Resume Next before the InputBox statement
in case the use clicks cancel.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Bob Phillips" wrote in message
...
Dim rng As Range

set rng = Application.Inputbox("Select a cell",Type:=8)
If rng Is Nothing Then
rng.select
End If

This techniwue allows you to select a range from within the
inputbox, and
that range is returned.

--
HTH

Bob Phillips

"steve" wrote in message
...
is there a way i can put an input box on my spread sheet,
where the user
can
type in a job # and it will take them to that cell?

input box
 

Found it, next to the On Error <vbg

Bob

"Dave Peterson" wrote in message
...
Dim rng As Range
set rng = Application.Inputbox("Select a cell",Type:=8)
If rng Is Nothing Then
'do nothing
else
rng.select
End If

I bet you dropped a Not somewhere. Please check the floor near the pc.

Bob Phillips wrote:

Dim rng As Range

set rng = Application.Inputbox("Select a cell",Type:=8)
If rng Is Nothing Then
rng.select
End If

This techniwue allows you to select a range from within the inputbox,
and
that range is returned.

--
HTH

Bob Phillips

"steve" wrote in message
...
is there a way i can put an input box on my spread sheet, where the
user
can
type in a job # and it will take them to that cell?

--

Dave Peterson