データ・プロバイダ・タイプ: Essbase、Planning、Financial Management、Hyperion Enterprise
HypIsSmartViewContentPresent()はシートにSmart Viewコンテンツが含まれているかどうかを判別します。
HypIsSmartViewContentPresent(vtSheetName, vtTypeOfContentsInSheet])
ByVal vtSheetName As Variant
ByRef vtTypeOfContentsInSheet
vtSheetName: 関数を実行するワークシートの名前。vtSheetNameがNullまたはEmptyの場合、アクティブ・ワークシートが使用されます。
vtTypeOfContentsInSheet: 出力パラメータ; ワークシート上のコンテンツのタイプを戻します。使用可能な値は次のような列挙型です。
Enum TYPE_OF_CONTENTS_IN_SHEET EMPTY_SHEET ADHOC_SHEET FORM_SHEET INTERACTIVE_REPORT_SHEET End Enum
ワークシートにSmart Viewコンテンツが含まれている場合はTrueを戻し、それ以外の場合はFalseを戻します。
Public Declare Function HypIsSmartViewContentPresent Lib "HsAddin" (ByVal vtSheetName As Variant, ByRef vtTypeOfContentsInSheet As TYPE_OF_CONTENTS_IN_SHEET) As Boolean Sub Example_HypIsSmartViewContentPresent() Dim Ret As Boolean Dim vtTypeOfContentsInSheet As TYPE_OF_CONTENTS_IN_SHEET Dim SheetName As String Dim SheetDisp As Worksheet SheetName = Empty Set SheetDisp = Worksheets("Sheet1") Ret = HypIsSmartViewContentPresent (Empty, ContentType) End Sub