WorkbookBase.LinkInfo – metoda

Článek
01/03/2014

Získá data a aktualizace stavu propojení.

Obor názvů: Microsoft.Office.Tools.Excel
Sestavení: Microsoft.Office.Tools.Excel.v4.0.Utilities (v Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

Syntaxe

'Deklarace
Public Function LinkInfo ( _
    name As String, _
    linkInfoArgument As XlLinkInfo, _
    type As Object, _
    editionRef As Object _
) As Object

public Object LinkInfo(
    string name,
    XlLinkInfo linkInfoArgument,
    Object type,
    Object editionRef
)

Parametry

name
Typ: System.String
Název propojení

linkInfoArgument
Typ: Microsoft.Office.Interop.Excel.XlLinkInfo
Více XlLinkInfo hodnoty, které určuje typ informací, které chcete vrátit.

type
Typ: System.Object
Více XlLinkInfoType hodnoty, které určuje typ propojení k vrácení informace o.

editionRef
Typ: System.Object
Pokud je odkaz vydání, tento parametr určuje referenční edition jako řetězec ve stylu R1C1. EditionRefPokud existuje více než jeden vydavatelem ani odběratelem se stejným názvem v sešit je požadován.

Vrácená hodnota

Typ: System.Object
Hodnota, která určuje informace o odkazu.Pokud LinkInfoArgument je xlUpdateState, tato metoda vrátí 1, pokud se automaticky aktualizuje propojení nebo 2, pokud odkaz musí být aktualizováno ručně.

Poznámky

Volitelné parametry

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

Příklady

Následující příklad kódu používá získá kolekce DDE/OLE odkazů v aktuálním sešitu a potom použije LinkInfo metoda k určení, zda aktualizuje všechna propojení DDE/OLE automaticky nebo ručně.

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

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

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

Zabezpečení rozhraní .NET Framework

Plná důvěra přímému volajícímu. Částečně zabezpečený kód nemůže tento člen použít. Další informace naleznete v tématu Používání knihoven z částečně důvěryhodného kódu.

Viz také

Referenční dokumentace

WorkbookBase Třída

Microsoft.Office.Tools.Excel – obor názvů

Sdílet prostřednictvím