HypPreserveFormatting

Data provider types: Oracle Essbase, Oracle Hyperion Planning, Oracle Planning and Budgeting Cloud, Oracle Hyperion Financial Management

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