Поделиться через

Workbook.LinkInfo Метод (2007 System)

  • Статья

Обновлен: Ноябрь 2007

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

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

Синтаксис

'Декларация
Public Function LinkInfo ( _
    Name As String, _
    LinkInfoArgument As XlLinkInfo, _
    Type As Object, _
    EditionRef As Object _
) As Object
'Применение
Dim instance As Workbook
Dim Name As String
Dim LinkInfoArgument As XlLinkInfo
Dim Type As Object
Dim EditionRef As Object
Dim returnValue As Object

returnValue = instance.LinkInfo(Name, _
    LinkInfoArgument, Type, EditionRef)

public Object LinkInfo(
    string Name,
    XlLinkInfo LinkInfoArgument,
    Object Type,
    Object EditionRef
)

Параметры

  • Type
    Тип: System.Object
    Одно из значений XlLinkInfoType, указывающее тип ссылки, для которой возвращаются сведения.
  • EditionRef
    Тип: System.Object
    Если ссылка является изданием, этот параметр указывает ссылку издания в виде строки в формате R1C1. Параметр EditionRef требуется, если в книге существует несколько издателей или подписчиков с одним именем.

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

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

Заметки

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

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

Примеры

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

В этом примере демонстрируется настройка уровня документа.

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

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,
                missing);

            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.");
    }
}

Разрешения

См. также

Ссылки

Workbook Класс

Workbook - члены

Microsoft.Office.Tools.Excel - пространство имен