データ・プロバイダ・タイプ: Essbase、Planning、Financial Management、Hyperion Enterprise
HypPreserveFormatting()はズーム・インによって作成されたセルにグリッドのフォーマットを適用します。
HypPreserveFormatting (vtSheetName, vtSelectionRange)
ByVal vtSheetName As Variant
ByVal vtSelectionRange As Variant
vtSheetName: 関数を実行するワークシートの名前。vtSheetNameがNullまたはEmptyの場合、アクティブ・ワークシートが使用されます。
vtSelectionRange: フォーマットを保持するセル(複数可)の範囲。複数の範囲がサポートされます。
正常に終了した場合は0を戻し、それ以外の場合は該当するエラー・コードを戻します。
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