Share via

WorkbookBase.LinkInfo(String, XlLinkInfo, Object, Object) Метод

  • Ссылка

Определение

Пространство имен:
Microsoft.Office.Tools.Excel
Сборка:
Microsoft.Office.Tools.Excel.v4.0.Utilities.dll

Получает дату ссылки и статус обновления.

public object LinkInfo (string name, Microsoft.Office.Interop.Excel.XlLinkInfo linkInfoArgument, object type, object editionRef);
member this.LinkInfo : string * Microsoft.Office.Interop.Excel.XlLinkInfo * obj * obj -> obj
Public Function LinkInfo (name As String, linkInfoArgument As XlLinkInfo, Optional type As Object, Optional editionRef As Object) As Object

Параметры

name
String

Имя ссылки.

linkInfoArgument
XlLinkInfo

Одно из значений XlLinkInfo, указывающее тип возвращаемых сведений.

type
Object

Одно из значений XlLinkInfoType, указывающее тип ссылки, для которой возвращаются сведения.

editionRef
Object

Если ссылка является выпуском, данный параметр задает ссылку на выпуск в виде строки в стиле R1C1. EditionRef является обязательным, если в книге есть несколько издателей или подписчиков с одинаковыми именами.

Возвращаемое значение

Object

Значение, указывающие сведения о ссылке. Если параметр LinkInfoArgument имеет значение xlUpdateState, этот метод возвращает «1», если обновление ссылки выполняется автоматически или «2», если ссылку требуется обновлять вручную.

Примеры

В следующем примере кода используется получение коллекции ссылок DDE/OLE в текущей книге, а затем используется LinkInfo метод , чтобы определить, обновляется ли каждая ссылка DDE/OLE автоматически или вручную.

Этот пример предназначен для настройки на уровне документа.

private void WorkbookLinkInfo()
{
    // Get the collection of DDE/OLE links in the workbook.
    Array links = (Array)this.LinkSources(Excel.XlLink.xlOLELinks);

    // If there are DDE/OLE links, then display how each link
    // updates.
    if (links != null)
    {
        for (int i = 1; i <= links.Length; i++)
        {
            string linkName = (string)links.GetValue(i);
            int updateValue = (int)this.LinkInfo(linkName,
                Excel.XlLinkInfo.xlUpdateState,
                Excel.XlLinkInfoType.xlLinkInfoOLELinks);

            if (updateValue == 1)
            {
                MessageBox.Show(linkName + " link updates automatically.");
            }
            else if (updateValue == 2)
            {
                MessageBox.Show(linkName + " link updates manually.");
            }
        }
    }
    else
    {
        MessageBox.Show("The workbook contains no DDE/OLE links.");
    }
}

Private Sub WorkbookLinkInfo()
    ' Get the collection of DDE/OLE links in the workbook.
    Dim Links As Array = _
        CType(Me.LinkSources(Excel.XlLink.xlOLELinks),  _
        Array)

    ' If there are DDE/OLE links, then display how each link
    ' updates.
    If Links IsNot Nothing Then
        Dim i As Integer
        For i = 1 To Links.Length
            Dim UpdateValue As Integer = Me.LinkInfo(Links(i), _
                Excel.XlLinkInfo.xlUpdateState, _
                Excel.XlLinkInfoType.xlLinkInfoOLELinks)

            If UpdateValue = 1 Then
                MsgBox(Links(i) & " link updates automatically.")
            ElseIf UpdateValue = 2 Then
                MsgBox(Links(i) & " link updates manually.")
            End If
        Next i
    Else
        MsgBox("The workbook contains no DDE/OLE links.")
    End If
End Sub

Комментарии

Необязательные параметры

Сведения о необязательных параметрах см. в разделе Необязательные параметры в решениях Office.

Применяется к