Excel VBA教程:Execute方法

激活与单元格中智能标记类型相关的智能标记操作。

expression.Execute

expression   必需。该表达式返回“应用于”列表中的对象之一。

Excel VBA教程:Execute方法·示例

本示例为股票行情自动收录器符号“MSFT”插入一个可刷新的股票报盘,假定主机系统已连至 Internet。


Sub ExecuteASmartTag()
    Dim strAction As String
    strAction = "Insert refreshable stock price"
    ' Enable smart tags to be embedded and recognized.
    ActiveWorkbook.SmartTagOptions.EmbedSmartTags = True
    Application.SmartTagRecognizers.Recognize = True
    ' Invoke a smart tag for the Microsoft ticker symbol.
    With Range("A1")
        .Formula = "MSFT"
        .SmartTags( _
            "urn:schemas-microsoft-com:office:smarttags#stockticker") _
            .SmartTagActions(strAction).Execute
    End With
End Sub

上页:Excel VBA教程:ExclusiveAccess方法 下页:Excel VBA教程:ExecuteExcel4Macro方法

Excel VBA教程:Execute方法

Excel VBA教程:ExecuteExcel4Macro方法 Excel VBA教程:Export方法
Excel VBA教程:Extend方法 Excel VBA教程:FillAcrossSheets方法
Excel VBA教程:FillDown方法 Excel VBA教程:FillLeft方法
Excel VBA教程:FillRight方法 Excel VBA教程:FillUp方法
Excel VBA教程:Find方法 Excel VBA教程:FindFile方法
Excel VBA教程:FindNext方法 Excel VBA教程:FindPrevious方法
Excel VBA教程:Flip方法 Excel VBA教程:Follow方法
Excel VBA教程:FollowHyperlink方法 Excel VBA教程:Format方法
Excel VBA教程:获取有关 Macintosh 关键字的帮助 Excel VBA教程:FunctionWizard方法
Excel VBA教程:GetChartElement方法 Excel VBA教程:GetCustomListContents方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号