Add subtotal to multiple columns

[Essex_Boy]

As I've not posted before today I cannot post links but I've searched and found a solved thread that provides code (by user karedog) that is very close to meeting my needs:

Its thread ID is 1111203 and it is called: add subtotal to multiple or dynamic columns

My question is, where the use case for that code has summarisation applied from column E, my use case requires summarisation from column D. How do I amend the code?

[Marc L]

You may ever not need a code just using the SubTotal Excel feature (as it can be called in VBA) …

[Essex_Boy]

Thanks Marc L but I have code which is building a pivot and copying that to a new sheet in order to add in further data etc and it's this final output sheet which I want to present with subtotals. Because I don't know how many columns will be present in the pivot table, I don't know how many columns I will have in my output sheet either.
The other post I mention manages the changing number of columns to apply the subtotal perfectly - it just starts in the wrong place for me!

Any guidance on how I can change that solution to meet my needs would be gratefully received.

[Essex_Boy]

Hopefully I've managed to add 2 file attachments - the only difference between the two is that one is not macro enabled in case I shouldn't be posting .xlsm files.

Each workbook has 3 sheets.
Source is my demo data. Columns A:C will always hold the data that the outlining for sub-totals
Columns D:E represent the unknown part - they and column F are sourced from a pivot table I do not know how many columns there may be between the columns headed "Hierarchy Detail" and "Total Count".

Output shows what the macro code is currently producing - may or may not be helpful

Desired Outcomeproduced by manually sub-totalling in 2 passes, it shows a sub-total at each change in "Hierarchy Level 1" and further at each change in "Hierarchy 2"