View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Jakob[_2_] Jakob[_2_] is offline
external usenet poster
 
Posts: 5
Default Automatic update

Hello

I want to update a pivot table when a cell is changed.

Sub Oppdater()
' Oppdate Makro
' Oppdate pivot
'
Private Sub date_Change()
' Oppdate if change

Range("B8").Select
ActiveSheet.PivotTables("Pivottabell1").PivotCache .Refresh
End Sub


--


Jakob
http://www.pointshop.no/austgulen