Keep spacing between pivots

[gman23]

Hello,
I am beginning to make a dashboard with multiple pivot tables. A few pivot tables will show details by date so as the month goes on the pivot will grow with each date. I need to keep the pivot tables one below the other to keep formatting can't put it next to the other. I need to keep the spacing the same between the pivots as they grow. there are 3 empty rows between the end of one pivot and the beginning of the other. I need to keep 3 blank rows as new dates are added, as of right now if I add a date the spacing narrows to 2.

Thank you for your help.
Excel 2016 (Windows) 64 bit

	A​	B​	C​	D​	E​	F​	G​	H​	I​	J​	K​	L​	M​	N​	O​	P​
3​	Row Labels	Sum of Total		Cannot put the pivot from below here, I need to keep format as is.​
4​	04/01/2017	60​
5​	04/02/2017	65​
6​	04/03/2017	70​
7​	04/04/2017	75​
8​	04/05/2017	80​
9​	04/06/2017	85​
10​	04/07/2017	90​
11​	04/08/2017	95​
12​	04/09/2017	100​
13​	04/10/2017	5​
14​	Grand Total	725​
15​	THIS SPACING NEEDS TO STAY THE SAME. There needs to be 3 blank rows between the 2 pivots even as more days are added.
16​
17​
18​	Row Labels	Sum of Expense
19​	01-Apr	29​
20​	02-Apr	30​
21​	03-Apr	31​
22​	04-Apr	32​
23​	05-Apr	33​
24​	06-Apr	34​
25​	07-Apr	35​
26​	08-Apr	36​
27​	09-Apr	37​
28​	10-Apr	38​
29​	Grand Total	335​

<tbody>
</tbody>

Sheet: Sheet122

<tbody>
</tbody>

 

[Smitty]

Welcome to the Board!

Unfortunately, there's no setting in Excel to maintain distance between PT's. You'll need to do it manually, or use VBA Code.

You could use something like this:

Sub foo()
    Range("A1").End(xlDown).Offset(1).EntireRow.Insert
End Sub

 

[gman23]

Welcome to the Board!

Unfortunately, there's no setting in Excel to maintain distance between PT's. You'll need to do it manually, or use VBA Code.

You could use something like this:

Sub foo()
    Range("A1").End(xlDown).Offset(1).EntireRow.Insert
End Sub

Thank you for taking a look. I attempted to use your Macro but it gave be a 'Run-time error '1004': We can't make this change for the selected cells because it will affect a PivotTable. Use the field list to change the report. If you are trying to insert or delete cells, move the PivotTable and try again.'

Any other suggestions? Instead of Range would I use some kind of Pivottable reference?