当我查看其他应用程序甚至Google的原生leanback启动器(这是专门用于Android TV)时,我注意到它们创建了一个标题,但是它们不是向Option Explicit
Sub Add_Hyperlinks()
Dim olNameSpace As Outlook.NameSpace
Dim wDoc As Word.Document
Dim rngSel As Word.Selection
If Application.ActiveInspector.EditorType = olEditorWord Then
Set wDoc = Application.ActiveInspector.WordEditor ' use WordEditor
Set olNameSpace = Application.Session
Set rngSel = wDoc.Windows(1).Selection ' Current selection
wDoc.Hyperlinks.Add rngSel.Range, _
Address:="U:\plot.log", TextToDisplay:="Here is the link"
End If
Set wDoc = Nothing
Set olNameSpace = Nothing
End Sub
对象添加内容,而是获得了ProgressSpinner,然后在(通常是网络)线程完成后填充内容。有没有办法设置不确定的进度类型的东西?我一直在寻找可能包含它的示例和其他项目,但已经达到了死胡同。