Data provider types: Oracle Essbase, Oracle Hyperion Planning, Oracle Planning and Budgeting Cloud, Oracle Hyperion Financial Management, Oracle Hyperion Enterprise®
Description
HypPreserveFormatting() applies grid formatting to cells created by zooming in.
Syntax
HypPreserveFormatting (vtSheetName, vtSelectionRange)
ByVal vtSheetName As Variant
ByVal vtSelectionRange As Variant
Parameters
vtSheetName:The name of worksheet on which to run the function. If vtSheetName is Null or Empty, the active worksheet is used.
vtSelectionRange: The range of cell(s) in which formatting is to be preserved. Multiple ranges are supported.
Return Value
Returns 0 if successful; otherwise, the appropriate error code.
Example
Public Declare Function HypPreserveFormatting Lib "HsAddin" (ByVal vtSheetName As Variant, ByVal vtSelectionRange As Variant) As Long
Sub Example_HypPreserveFormatting()
Dim oRet As Long
Dim oSheetName As String
Dim oSheetDisp As Worksheet
oSheetName = Empty
Set oSheetDisp = Sheet1
oRet = HypPreserveFormatting ("", oSheetDisp.Range("B2"))
MsgBox (oRet)
End Sub