Hi,

I have a Pivot table with some numbers in it. Is there a way to
replace the numbers with a text?

For example: replace all numbers 1 with "yes" . Is this possible? If
not whats the best way to achieve this?


Regards,

Vinstream

Only by changing your data source. Eg.

Sub Test()
Dim rCell As Range

For Each rCell In Range("DataSource").Columns _
(2).SpecialCells(xlCellTypeConstants, xlNumbers).Cells
If rCell 1 Then rCell = "yes"
Next rCell
End Sub


"vinstream" wrote in message
...
Hi,

I have a Pivot table with some numbers in it. Is there a way to
replace the numbers with a text?

For example: replace all numbers 1 with "yes" . Is this possible? If
not whats the best way to achieve this?


Regards,

Vinstream