Hello,

I created a sheet for our sales department to track their quotations for a
year. I froze the top few rows with instructions and column headings, but
now that we are 5 months in there is a LOT of data accumulating for some
people.

What I am looking to do is have a feature similar to jumping to a file
location via a hyperlink in a Word document, but I would like a button that
could be pressed to take you to the last entry.

What is the easiest way I can do this?

Griff, try Ctrl+the down arrow or Ctrl+end
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"Griff" wrote in message
...
Hello,

I created a sheet for our sales department to track their quotations for a
year. I froze the top few rows with instructions and column headings, but
now that we are 5 months in there is a LOT of data accumulating for some
people.

What I am looking to do is have a feature similar to jumping to a file
location via a hyperlink in a Word document, but I would like a button
that
could be pressed to take you to the last entry.

What is the easiest way I can do this?

Actually since I am asking the professionals here...
I have a date column in this database, would I need to get VB script written
if I wanted to have the months located in the top frozen rows of this sheet
and make them move the sheet to the first entry in down that matched that
month?

"Griff" wrote:

Hello,

I created a sheet for our sales department to track their quotations for a
year. I froze the top few rows with instructions and column headings, but
now that we are 5 months in there is a LOT of data accumulating for some
people.

What I am looking to do is have a feature similar to jumping to a file
location via a hyperlink in a Word document, but I would like a button that
could be pressed to take you to the last entry.

What is the easiest way I can do this?

Are your month headers plain text or Excel dates formatted "mmm" ?

--
AP

Plain Text, but could be easily converted

"Ardus Petus" wrote:

Are your month headers plain text or Excel dates formatted "mmm" ?

--
AP

you can insert a module in VBA and then put a button (from the forms
toolbar) on the excel sheet....you just need to attach the macro that
you write in VBA to the button. For the code you can use something
like this:


Sub LastCell()
Range("A3").Select
ActiveCell.End(xlToRight).Select
ActiveCell.End(xlDown).Select
End Sub


---Substitute A3 for the top left cell in your spreadsheet. If you
copy this exact code into a module in VBA your macro will be called
"LastCell." Attach this to the button and you are set. If you want to
go to the first column of the last entry simply leave out the
ActiveCell.End(xlRight).Select portion of the code.

As far as your second post goes, I have no clue what you are talking
about.

Hi, give this a try, it is modified from "KL".

'Newsgroups: microsoft.public.Excel.programming
'From: "KL"
'Date: Fri, 7 Jan 2005 16:36:46 +0100
'Local: Fri, Jan 7 2005 7:36 am
'Subject: SpecialCells (xlLastCell)

Sub LastCell()
Dim ws As Worksheet
Dim myRow&, myCol&, Rng As Range
Set ws = ActiveSheet
Set Rng = ws.Cells
myRow = Intersect( _
Rng.Find("*", Rng(1), xlValues, xlWhole, xlByRows, _
xlPrevious).EntireRow, _
Rng.Find("*", Rng(1), xlValues, xlWhole, xlByColumns, _
xlPrevious).EntireColumn).Row

myCol = Rng(1).Cells(myRow, Columns.Count) _
.End(xlToLeft).Column

On Error Resume Next

'Takes you to the first cell in the last row used
Intersect(Rows(myRow), Columns(1)).Select

'Takes you to the last column entry in last row used
'Intersect(Rows(myRow), Columns(myCol)).Select

On Error GoTo 0
Err.Clear
End Sub

HTH--Lonnie Miller


wrote:
you can insert a module in VBA and then put a button (from the forms
toolbar) on the excel sheet....you just need to attach the macro that
you write in VBA to the button. For the code you can use something
like this:


Sub LastCell()
Range("A3").Select
ActiveCell.End(xlToRight).Select
ActiveCell.End(xlDown).Select
End Sub


---Substitute A3 for the top left cell in your spreadsheet. If you
copy this exact code into a module in VBA your macro will be called
"LastCell." Attach this to the button and you are set. If you want to
go to the first column of the last entry simply leave out the
ActiveCell.End(xlRight).Select portion of the code.

As far as your second post goes, I have no clue what you are talking
about.

Thank you I will give this a try.

For the second part of my post...
I have a cell with each month on the top of the sheet, with an adjacent cell
which adds up all the information entered with a date corresponding with that
month.

I was wondering how hard it would be to make a function where I could click
on one of the month cells as a hyperlink and it would make the active cell
the first cell in a specific column that matched that month.

" wrote:

you can insert a module in VBA and then put a button (from the forms
toolbar) on the excel sheet....you just need to attach the macro that
you write in VBA to the button. For the code you can use something
like this:


Sub LastCell()
Range("A3").Select
ActiveCell.End(xlToRight).Select
ActiveCell.End(xlDown).Select
End Sub


---Substitute A3 for the top left cell in your spreadsheet. If you
copy this exact code into a module in VBA your macro will be called
"LastCell." Attach this to the button and you are set. If you want to
go to the first column of the last entry simply leave out the
ActiveCell.End(xlRight).Select portion of the code.

As far as your second post goes, I have no clue what you are talking
about.