VBA extract values from pivot table

[MissingLink]

Hi everyone,

I'm trying to work with a macro for extracting values from a pivot table to another sheet ("Sheet2").
The sheet with pivot table is as followed (blue is Data Source list and red is Pivot Table):
[TABLE="width: 500"]
<tbody>[TR]
[TD]A[/TD]
[TD]B[/TD]
[TD]C[/TD]
[TD]D[/TD]
[TD]E[/TD]
[/TR]
[TR]
[TD][/TD]
[TD]Liste des ingrédients[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD]X[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD]Y[/TD]
[TD][/TD]
[TD]Row Labels[/TD]
[TD]Count of Liste des ingrédients[/TD]
[/TR]
[TR]
[TD][/TD]
[TD]Z[/TD]
[TD][/TD]
[TD]X[/TD]
[TD]2[/TD]
[/TR]
[TR]
[TD][/TD]
[TD]X[/TD]
[TD][/TD]
[TD]Y[/TD]
[TD]1[/TD]
[/TR]
[TR]
[TD][/TD]
[TD]YY[/TD]
[TD][/TD]
[TD]Z[/TD]
[TD]1[/TD]
[/TR]
[TR]
[TD][/TD]
[TD]etc[/TD]
[TD][/TD]
[TD]etc[/TD]
[TD]1[/TD]
[/TR]
</tbody>[/TABLE]

I would like to extract the data from "Count of Liste des ingrédients" in column A of Sheet2 and the data from "Row Labels" in column B of Sheet2, without the Grand Total and its related value.

Let me know if you are missing some information, I tried to be as precise as possible.