VBA to Applescript
VBA to Applescript
- Subject: VBA to Applescript
- From: Steve Digby <email@hidden>
- Date: Thu, 14 Feb 2008 12:05:29 +0000
- Thread-topic: VBA to Applescript
Hi,
Does anyone know the Applescript equivalent of the Vba code below.
Sub NoSubtotals()
'turns off subtotals in pivot table
'.PivotFields could be changed to
'.RowFields or .ColumnFields
Dim pt As PivotTable
Dim pf As PivotField
On Error Resume Next
For Each pt In ActiveSheet.PivotTables
For Each pf In pt.PivotFields
pf.Subtotals(1) = True
pf.Subtotals(1) = False
Next pf
Next pt
End Sub
Any help, greatly appreciated.
Steve Digby
This message and any attachments are intended solely for the addressees and are confidential. If you receive this message in error, please delete it and immediately notify the sender.
The Chrysalis Group cannot accept liability for any statements, views or opinions made which are clearly the sender's own and not expressly made on behalf of the Chrysalis Group.
The contents may contain information which is confidential and may also be privileged. It may not be copied, used or disclosed without authorisation.
Chrysalis Group plc
Registered Office: The Chrysalis Building, 13 Bramley Road, London, W10 6SP
Registration Number: 946978 England
_______________________________________________
Do not post admin requests to the list. They will be ignored.
AppleScript-Users mailing list (email@hidden)
Help/Unsubscribe/Update your Subscription:
Archives: http://lists.apple.com/archives/applescript-users
This email sent to email@hidden