I need urgent Excel Help

A

Achuks

New Member
Joined
Apr 27, 2015
Messages
26
Hello All,
I appreciate your great contribution to this forum, and in recognition of your wealth of knowledge I write to seek your assistance on an issues I am having. I have pivot table with data from cube, I need to filter the table based on the value of two date field Begin and end date. I have tried some of the script you used to assist in some issue but no success. I have sample of the data and Macro recorded filter script below. Thank you


Sub FilterMacro()
'
' FilterMacro Macro
' Date FilterMacro
'


'
ActiveSheet.PivotTables("PivotTable2").PivotFields( _
"[Date Dimension].[Fiscal Month].[Fiscal Month]").VisibleItemsList = Array( _
"[Date Dimension].[Fiscal Month].&[2013\14]&[5]", _
"[Date Dimension].[Fiscal Month].&[2013\14]&[6]", _
"[Date Dimension].[Fiscal Month].&[2013\14]&[7]", _
"[Date Dimension].[Fiscal Month].&[2013\14]&[8]", _
"[Date Dimension].[Fiscal Month].&[2013\14]&[9]", _
"[Date Dimension].[Fiscal Month].&[2013\14]&[10]", _
"[Date Dimension].[Fiscal Month].&[2013\14]&[11]", _
"[Date Dimension].[Fiscal Month].&[2013\14]&[12]", _
"[Date Dimension].[Fiscal Month].&[2014\15]&[1]", _
"[Date Dimension].[Fiscal Month].&[2014\15]&[2]", _
"[Date Dimension].[Fiscal Month].&[2014\15]&[3]", _
"[Date Dimension].[Fiscal Month].&[2014\15]&[4]", _
"[Date Dimension].[Fiscal Month].&[2014\15]&[5]", _
"[Date Dimension].[Fiscal Month].&[2014\15]&[6]", _
"[Date Dimension].[Fiscal Month].&[2014\15]&[7]", _
"[Date Dimension].[Fiscal Month].&[2014\15]&[8]", _
"[Date Dimension].[Fiscal Month].&[2014\15]&[9]", _
"[Date Dimension].[Fiscal Month].&[2014\15]&[10]")
End Sub

[TABLE="class: cms_table, width: 1225"]
<tbody>[TR]
[/TR]
[TR]
[TD]Date[/TD]
[TD="align: right"]1/01/2010[/TD]
[TD][/TD]
[TD]This Data is from MS SQL Cube , I want to filter using Begin date and End Date[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]End Date[/TD]
[TD="align: right"]30/06/2011[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]Description[/TD]
[TD]Jan-2010[/TD]
[TD]Feb-2010[/TD]
[TD]Mar-2010[/TD]
[TD]Apr-2010[/TD]
[TD]May-2010[/TD]
[TD]Jun-2010[/TD]
[TD]Jul-2010[/TD]
[TD]Aug-2010[/TD]
[TD]Sep-2010[/TD]
[TD]Oct-2010[/TD]
[TD]Nov-2010[/TD]
[TD]Dec-2010[/TD]
[TD]Jan-2011[/TD]
[TD]Feb-2011[/TD]
[TD]Mar-2011[/TD]
[/TR]
[TR]
[TD]ABC[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]ABC (Central)[/TD]
[TD][/TD]
[TD="align: right"]7[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]ABC (North East)[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]ABC (South East)[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]ABC (South)[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD="align: right"]7[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD="align: right"]5[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD="align: right"]7[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]ABC (Sydney Metro)[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]ABC (West)[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]DEF[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]DEF (Central)[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]DEF (North East)[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD="align: right"]7[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]DEF (South East)[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]DEF (South)[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]DEF (Sydney Metro)[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD="align: right"]7[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD="align: right"]75[/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]
 
Sort by date Sort by votes
To run a standalone macro (from a button or the macro list)....

First delete all the previous code from the Sheet Code Module.

Paste this (untested) code into a Standard Code Module (like "Module1" - not a Sheet Code Module)

Edit the code again to match your cell addresses and sheet name(s).
Code: 
Public Sub FilterOLAP_PivotByDateRange()
'--filters a pivottable with and OLAP source to show the
'    pivotitems for each fiscal month between two dates

'--the dates are entered by the user in this worksheet
'    and the pivottable is filtered when this macro is run

 Dim dtStart As Date, dtEnd As Date, dtCurr As Date
 Dim lFilterItemCount As Long, lNdx As Long
 Dim sErrMsg As String, sMemberKey As String
 Dim vFilterArray As Variant
 Dim pvf As PivotField
 Dim wksPivot As Worksheet, wksInputs As Worksheet
 
 
 '--modify to match cell addresses in your sheet
 Const sSTART_ADDR As String = "$B$3"
 Const sEND_ADDR As String = "$E$4"
 
 '--modify to match names of sheets holding pivot and inputs (often same sheet)
 Set wksPivot = ThisWorkbook.Sheets("NameOfMySheetWithPivot")
 Set wksInputs = ThisWorkbook.Sheets("NameOfMySheetWithInputCells")
 
 
 On Error GoTo ErrProc
 '--modify to match the OLAP pivotfield name
 Set pvf = wksPivot.PivotTables("PivotTable2").PivotFields( _
   "[Date Dimension].[Fiscal Month].[Fiscal Month]")
 
'--validate inputs
 dtStart = wksInputs.Range(sSTART_ADDR).Value2
 dtEnd = wksInputs.Range(sEND_ADDR).Value2
 If Not (dtStart > 0 And dtEnd > 0) Then GoTo ExitProc
 
 If dtEnd < dtStart Then
   MsgBox "End date cannot be before Start date"
   GoTo ExitProc
 End If
 
 '--adjust start and end dates to first of month
 dtStart = DateSerial(Year(dtStart), Month(dtStart), 1)
 dtEnd = DateSerial(Year(dtEnd), Month(dtEnd), 1)
 
  '-calculate number of fiscal months in date span
 lFilterItemCount = Year(dtEnd) * 12 + Month(dtEnd) - _
   (Year(dtStart) * 12 + Month(dtStart)) + 1
 
 ReDim vFilterArray(1 To lFilterItemCount)
 
 dtCurr = dtStart
 '--step through each month to build visibleitemslist array
 Do While dtCurr <= dtEnd
   sMemberKey = sGetMemberKey(dt:=dtCurr)
   lNdx = lNdx + 1
   vFilterArray(lNdx) = sMemberKey
   '--increment dtCurr to first of next month
   dtCurr = Application.EDate(dtCurr, 1)
 Loop
 
 '--apply filter
 Application.EnableEvents = False
 pvf.VisibleItemsList = vFilterArray
 
 '--for debugging only
 Debug.Print vbCr & "Span: " & dtStart & " --> " & dtEnd
 For lNdx = LBound(vFilterArray) To UBound(vFilterArray)
   Debug.Print vFilterArray(lNdx)
 Next lNdx
 
ExitProc:
 On Error Resume Next
 Application.EnableEvents = True
 If Len(sErrMsg) Then MsgBox sErrMsg
 Exit Sub

ErrProc:
 sErrMsg = Err.Number & ": " & Err.Description
 Resume ExitProc
End Sub

Function sGetMemberKey(ByVal dt As Date) As String
'--returns a string representing the OLAP member key
'    corresponding to the input date

 Dim lFiscalMth As Long, lFiscalYear As Long
 Dim sReturn As String
 
 '--last month of fiscal year is June
 Const lFY_END As Long = 6
 Const sITEM_FORMAT As String = _
   "[Date Dimension].[Fiscal Month].&[YYYY\FY]&[FM]"
 
 lFiscalYear = IIf(Month(dt) <= lFY_END, Year(dt), Year(dt) + 1)
 lFiscalMth = (lFY_END + Month(dt) - 1) Mod 12 + 1
 
 '--substitute each value in format string
 sReturn = Replace(sITEM_FORMAT, "FY", Right(CStr(lFiscalYear), 2))
 sReturn = Replace(sReturn, "YYYY", CStr(lFiscalYear - 1))
 sReturn = Replace(sReturn, "FM", CStr(lFiscalMth))
 
 sGetMemberKey = sReturn
End Function
 
Upvote 0

Excel Facts

Save Often
If you start asking yourself if now is a good time to save your Excel workbook, the answer is Yes
Hi Jerry
My mentor, Thank you once again for your help I have started to write some basic VBA code to enhance my work.
I tried applying the script you gave on different worksheet as below

Dim sheet As Worksheet


For Each sheet In ActiveWorkbook.Worksheets
If sheet.Name = "name1" Then

elseif sheet.Name = "name2" Then

else
exit sub

end if

sheet next


This has not been successfully executed.
 
Upvote 0
Achuks.
I am not interfering but could you be so kind and put code tags around your code.
Just for my information. what are you wanting to accomplish with your code?
 
Upvote 0
Hi Achuks, It's best to start a new thread for your new question.

As jolivanes noted, when posting code, please use the "code tags" feature which will keep your code indented inside a box (like my code in post #11) and make it easier for others to read. The easiest way to add code tags is to paste your code into your post, select the code, then click the "#" icon in the Reply toolbar.

Best of luck to you in your efforts to learn VBA. :)
 
Upvote 0
hello Jerry,
the below code is a code I am trying to use a button in a sheet to filter the fiscal month in all the 3 pivot table in different sheet. I think I am not getting the loop condition. The code is the previous code you sent to me which is working very well in a single sheet filtering. please help me out.
Thank you


Code: 
Public Sub FilterOLAP_PivotByDateRange4()
'--filters a pivottable with and OLAP source to show the
'    pivotitems for each fiscal month between two dates
'--the dates are entered by the user in this worksheet
'    and the pivottable is filtered when this macro is run
 Dim dtStart As Date, dtEnd As Date, dtCurr As Date
 Dim lFilterItemCount As Long, lNdx As Long
 Dim sErrMsg As String, sMemberKey As String
 Dim vFilterArray As Variant
 Dim pvf As PivotField
 Dim wksPivot As Worksheet, wksInputs As Worksheet
 Dim sheet As Worksheet
 


For Each sheet In ActiveWorkbook.Worksheets
    If sheet.Name = "12 Month Acq" Then
         
 
 '--modify to match names of sheets holding pivot and inputs (often same sheet)
 Set wksPivot = ThisWorkbook.Sheets("12 Month Acq")
 Set wksInputs = ThisWorkbook.Sheets("12 Month Acq")
 
 
 On Error GoTo ErrProc
 '--modify to match the OLAP pivotfield name
 Set pvf = wksPivot.PivotTables("PivotTable3").PivotFields( _
   "[Date Dimension].[Fiscal Month].[Fiscal Month]")
 
'--validate inputs
 dtStart = wksInputs.Range(sSTART_ADDR).Value2
 dtEnd = wksInputs.Range(sEND_ADDR).Value2
 If Not (dtStart > 0 And dtEnd > 0) Then GoTo ExitProc
 
 If dtEnd < dtStart Then
   MsgBox "End date cannot be before Start date"
   GoTo ExitProc
 End If
 
 '--adjust start and end dates to first of month
 dtStart = DateSerial(Year(dtStart), Month(dtStart), 1)
 dtEnd = DateSerial(Year(dtEnd), Month(dtEnd), 1)
 
  '-calculate number of fiscal months in date span
 lFilterItemCount = Year(dtEnd) * 12 + Month(dtEnd) - _
   (Year(dtStart) * 12 + Month(dtStart)) + 1
 
 ReDim vFilterArray(1 To lFilterItemCount)
 
 dtCurr = dtStart
 


 '--step through each month to build visibleitemslist array
 Do While dtCurr <= dtEnd
   sMemberKey = sGetMemberKey(dt:=dtCurr)
   lNdx = lNdx + 1
   vFilterArray(lNdx) = sMemberKey
   '--increment dtCurr to first of next month
   dtCurr = Application.EDate(dtCurr, 1)
 Loop
  
 '--apply filter
 Application.EnableEvents = False
 pvf.VisibleItemsList = vFilterArray
 
 '--for debugging only
 Debug.Print vbCr & "Span: " & dtStart & " --> " & dtEnd
 For lNdx = LBound(vFilterArray) To UBound(vFilterArray)
   Debug.Print vFilterArray(lNdx)
 Next lNdx


ElseIf sheet.Name = "12 Month Payment Received" Then
          
        
'--modify to match cell addresses in your sheet
 'Const sSTART_ADDR As String = "$F$3"
 'Const sEND_ADDR As String = "$F$4"
 
 '--modify to match names of sheets holding pivot and inputs (often same sheet)
 Set wksPivot = ThisWorkbook.Sheets("12 Month Payment Received")
 Set wksInputs = ThisWorkbook.Sheets("12 Month Payment Received")
 
 
 On Error GoTo ErrProc
 '--modify to match the OLAP pivotfield name
 Set pvf = wksPivot.PivotTables("PivotTable3").PivotFields( _
   "[Date Dimension].[Fiscal Month].[Fiscal Month]")
 
'--validate inputs
 dtStart = wksInputs.Range(sSTART_ADDR).Value2
 dtEnd = wksInputs.Range(sEND_ADDR).Value2
 If Not (dtStart > 0 And dtEnd > 0) Then GoTo ExitProc
 
 If dtEnd < dtStart Then
   MsgBox "End date cannot be before Start date"
   GoTo ExitProc
 End If
 
 '--adjust start and end dates to first of month
 dtStart = DateSerial(Year(dtStart), Month(dtStart), 1)
 dtEnd = DateSerial(Year(dtEnd), Month(dtEnd), 1)
 
  '-calculate number of fiscal months in date span
 lFilterItemCount = Year(dtEnd) * 12 + Month(dtEnd) - _
   (Year(dtStart) * 12 + Month(dtStart)) + 1
 
 ReDim vFilterArray(1 To lFilterItemCount)
 
 dtCurr = dtStart
 '--step through each month to build visibleitemslist array
 Do While dtCurr <= dtEnd
   sMemberKey = sGetMemberKey(dt:=dtCurr)
   lNdx = lNdx + 1
   vFilterArray(lNdx) = sMemberKey
   '--increment dtCurr to first of next month
   dtCurr = Application.EDate(dtCurr, 1)
 Loop
 
 '--apply filter
 Application.EnableEvents = False
 pvf.VisibleItemsList = vFilterArray
 
 '--for debugging only
 Debug.Print vbCr & "Span: " & dtStart & " --> " & dtEnd
 For lNdx = LBound(vFilterArray) To UBound(vFilterArray)
   Debug.Print vFilterArray(lNdx)
 Next lNdx


ElseIf sheet.Name = "12 Month Payment Received" Then
          
        
 '--modify to match cell addresses in your sheet
 'Const sSTART_ADDR As String = "$F$3"
 'Const sEND_ADDR As String = "$F$4"
 
 '--modify to match names of sheets holding pivot and inputs (often same sheet)
 Set wksPivot = ThisWorkbook.Sheets("12 Month Cancel")
 Set wksInputs = ThisWorkbook.Sheets("12 Month Cancel")
 
 MsgBox ("I got here")
 On Error GoTo ErrProc
 '--modify to match the OLAP pivotfield name
 Set pvf = wksPivot.PivotTables("PivotTable4").PivotFields( _
   "[Date Dimension].[Fiscal Month].[Fiscal Month]")
 
'--validate inputs
 dtStart = wksInputs.Range(sSTART_ADDR).Value2
 dtEnd = wksInputs.Range(sEND_ADDR).Value2
 If Not (dtStart > 0 And dtEnd > 0) Then GoTo ExitProc
 
 If dtEnd < dtStart Then
   MsgBox "End date cannot be before Start date"
   GoTo ExitProc
 End If
 
 '--adjust start and end dates to first of month
 dtStart = DateSerial(Year(dtStart), Month(dtStart), 1)
 dtEnd = DateSerial(Year(dtEnd), Month(dtEnd), 1)
 
  '-calculate number of fiscal months in date span
 lFilterItemCount = Year(dtEnd) * 12 + Month(dtEnd) - _
   (Year(dtStart) * 12 + Month(dtStart)) + 1
 
 ReDim vFilterArray(1 To lFilterItemCount)
 
 dtCurr = dtStart
 '--step through each month to build visibleitemslist array
 Do While dtCurr <= dtEnd
   sMemberKey = sGetMemberKey(dt:=dtCurr)
   lNdx = lNdx + 1
   vFilterArray(lNdx) = sMemberKey
   '--increment dtCurr to first of next month
   dtCurr = Application.EDate(dtCurr, 1)
 Loop
 
 '--apply filter
 Application.EnableEvents = False
 pvf.VisibleItemsList = vFilterArray
 
 '--for debugging only
 Debug.Print vbCr & "Span: " & dtStart & " --> " & dtEnd
 For lNdx = LBound(vFilterArray) To UBound(vFilterArray)
   Debug.Print vFilterArray(lNdx)
 Next lNdx
Else
MsgBox ("I got here")
Exit Sub
End If


Next sheet


ExitProc:
 On Error Resume Next
 Application.EnableEvents = True
 If Len(sErrMsg) Then MsgBox sErrMsg
 Exit Sub


ErrProc:
 sErrMsg = Err.Number & ": " & Err.Description
 Resume ExitProc
 
End Sub
Function sGetMemberKey(ByVal dt As Date) As String
'--returns a string representing the OLAP member key
'    corresponding to the input date
 Dim lFiscalMth As Long, lFiscalYear As Long
 Dim sReturn As String
 
 '--last month of fiscal year is June
 Const lFY_END As Long = 6
 Const sITEM_FORMAT As String = _
   "[Date Dimension].[Fiscal Month].&[YYYY\FY]&[FM]"
 
 lFiscalYear = IIf(Month(dt) <= lFY_END, Year(dt), Year(dt) + 1)
 lFiscalMth = (lFY_END + Month(dt) - 1) Mod 12 + 1
 
 '--substitute each value in format string
 sReturn = Replace(sITEM_FORMAT, "FY", Right(CStr(lFiscalYear), 2))
 sReturn = Replace(sReturn, "YYYY", CStr(lFiscalYear - 1))
 sReturn = Replace(sReturn, "FM", CStr(lFiscalMth))
 
 sGetMemberKey = sReturn
End Function
 
Upvote 0
If the PivotTables share the same source, have you considered using Slicers?

That would be simpler and it would allow you to add or remove Pivots without modifying your code.
 
Upvote 0
Hi Jerry,
I appreciate your assistance but the PivotTables are in individual PivotTables on different sheet. I just need a way of using the date field in the first sheet to do the filtering across the sheet, i.e using a single script module for the filtering. Putting in the other way, can you help to adapt my script to work on different sheet?.
Thank you
 
Upvote 0
Slicers can be used regardless of whether the PivotTables are on different sheets. I can see you're anxious to solve this using VBA, but I'd encourage you to reconsider that since Slicers are a better solution. If you don't know how to use Slicers, then I can provide you with some instructions.

If can't use Slicers or choose not to use them, then I would need you to clarify the parameters needed for the VBA code.
From your VBA code example in Post #16, I've extracted these names for the Sheets and three PivotTables.
Please confirm those are all correct.

Sheet with Inputs: "12 Month Acq"
Cell with Start Date: "$F$3"
Cell with End Date: "$F$4"

'--PIVOT #1
Sheet Name: "12 Month Acq"
PivotTable Name: "PivotTable3"

'--PIVOT #2
Sheet Name: "12 Month Payment Received"
PivotTable Name: "PivotTable3"

'--PIVOT #3
Sheet Name: "12 Month Cancel"
PivotTable Name: "PivotTable4"
 
Upvote 0
You must log in or register to reply here.

Similar threads

S
  • Question Question
Pivot Slicer Help
Replies
2
Views
204
Trevor G
Trevor G
E
  • Solved
Add together figures for Year-To-Date (with criteria)
Replies
3
Views
163
Tetra201
Tetra201
S
  • Question Question
Need Help in Dates
2 3
Replies
27
Views
1K
Dave Patton
D
F
  • Solved
Loaded question with filter function multiple criteria and return value.
Replies
2
Views
231
floW_5
F
F
  • Question Question
Filtered by checkboxes
Replies
4
Views
204
floW_5
F

Forum statistics

Threads
1,223,243
Messages
6,170,967
Members
452,371
Latest member
Frana

Share this page

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top