This table indicates Replace() is not yet supported:
http://msdn.microsoft.com/library/de.../en-us/dnexcl2
k2/html/odc_xlsql.asp
Quote:
|
Visual Basic for Applications Functions
|
...
Functions not supported in this release are marked by an asterisk in
this table.
...
*Replace
Here is a rather convoluted solution, borrowing both from sample VBA
code, and from earlier posts to this NG which used Calculated Cells for
MDX iteration:
Quote:
|
With Member [Measures].[ReplaceURL] as
|
'"http://localhost/mypage.aspx?arg= [store].&[1].&[2].&[3].&[4]"'
Member [Measures].[LeftReplace] as
'Left([Measures].[ReplaceURL],
InStr([Measures].[ReplaceURL], "&[") - 1)
+ "&"+ Right([Measures].[ReplaceURL],
Len([Measures].[ReplaceURL])
- InStr([Measures].[ReplaceURL], "&["))'
Cell Calculation [ReplaceAnd]
For '({[Measures].[ReplaceURL]})'
As 'iif(Instr(CalculationPassValue([Measures].[ReplaceURL], -1,
RELATIVE), "&[") = 0,
CalculationPassValue([Measures].[ReplaceURL], -1, RELATIVE),
CalculationPassValue([Measures].[LeftReplace], -1, RELATIVE))',
CALCULATION_PASS_DEPTH = 4,
CALCULATION_PASS_NUMBER = 5
select {[Measures].[ReplaceURL]} on columns
from Sales
- Deepak
Deepak Puri
Microsoft MVP - SQL Server
*** Sent via Developersdex http://www.developersdex.com ***