HypIsSmartViewContentPresent

データ・プロバイダ・タイプ: 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