PERFORM ACTION ON HITTING ENTER

B

BigT

Hi all. I have a spreadsheet with a database query, a pivot table
based on that query and a summary page summarizing that data. The
data is date driven. I'd like to automatically refresh the query and
pivot table when hitting "enter" after typing in a new date. anyway
to do this?
I'm 2003 right now and will be upgrading in a few months to 2010.
 
I

isabelle

hi,

don't forget to adapt the sheets name and range name


Private Sub Worksheet_Change(ByVal Target As Range)
Set isect = Application.Intersect(Target, Range("summary"))
If Not isect Is Nothing Then
Sheets("PT").PivotTables(1).PivotCache.Refresh
Sheets("QT").QueryTables(1).Refresh BackgroundQuery:=True
End If
End Sub
 

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

Similar Threads

Creating a Chart on form from selected data in query. 0
Working on birthday "book" for my wife and having layout/editing trouble 0
Excel 2003- Too Few Parameters- Import xternal data issue 0
VBA Pivot Table: Determining item from one field based on anotherfield item 0
date format in excel imported from an SQL DB. 2
How to base a pivot table on another pivot table? 3
reference is not valid message for pivot tables based on Access query 4
Selecting Date Range in a Pivot using VBA 0

Top