Sdílet prostřednictvím


WorkbookBase.LinkInfo(String, XlLinkInfo, Object, Object) Metoda

Definice

Získá datum propojení a stav aktualizace.

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

Parametry

name
String

Název propojení

linkInfoArgument
XlLinkInfo

Jedna z XlLinkInfo hodnot, která určuje typ informací, které mají být vráceny.

type
Object

Jedna z XlLinkInfoType hodnot, která určuje typ odkazu, pro který se mají vrátit informace.

editionRef
Object

Pokud je odkaz edice, tento parametr určuje odkaz na edici jako řetězec ve stylu R1C1. EditionRef se vyžaduje, pokud sešit obsahuje více vydavatelů nebo odběratelů se stejným názvem.

Návraty

Hodnota, která označuje informace o odkazu. Pokud LinkInfoArgument je xlUpdateState, vrátí tato metoda hodnotu 1, pokud se propojení aktualizuje automaticky, nebo 2, pokud je nutné propojení aktualizovat ručně.

Příklady

Následující příklad kódu používá kolekci DDE/OLE propojení v aktuálním sešitu a pak používá metodu LinkInfo k určení, zda se každý DDE/OLE propojení aktualizuje automaticky nebo ručně.

Tento příklad je pro přizpůsobení na úrovni dokumentu.

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

Poznámky

Volitelné parametry

Informace o volitelných parametrech najdete v tématu Volitelné parametry v řešeních pro systém Office.

Platí pro