Abid,
Dim myC As Range
For Each myC In Cells.SpecialCells(xlCellTypeFormulas)
If Left(myC.Formula, 6) = "=HSGET" Then myC.Value = myC.Value
Next myC
HTH,
Bernie
MS Excel MVP
"Abid" <(E-Mail Removed)> wrote in message
news:153F7803-7C3A-4AF4-9EE7-(E-Mail Removed)...
> Hi,
>
> I am extensive user of Hyperion Smart view. Usuualy I sent out report after
> converting them into value as most of the recipeint do not have access to
> Hyperion server. This make reports un-editable as all formula e.g. sum,
> average etc are also convereted to values. Any idea as to how to write a code
> which converts only cells with HSGETformula to value and leave others alone?
>
> Thanks
|