Partager via


WorkbookBase.LinkInfo(String, XlLinkInfo, Object, Object) Méthode

Définition

Obtient la date et l'état de mise à jour de la liaison

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

Paramètres

name
String

Nom du lien.

linkInfoArgument
XlLinkInfo

L'une des valeurs XlLinkInfo qui spécifie le type d'informations à retourner.

type
Object

L'une des valeurs XlLinkInfoType qui spécifie le type de liaison pour laquelle retourner des informations.

editionRef
Object

Si la liaison est une édition, ce paramètre spécifie la référence d'édition comme une chaîne dans le style R1C1. EditionRef est obligatoire s’il existe plusieurs éditeurs ou abonnés portant le même nom dans le classeur.

Retours

Valeur qui indique des informations à propos de la liaison. Si LinkInfoArgument est xlUpdateState, cette méthode retourne 1 si la liaison est mise à jour automatiquement, 2 si la liaison doit être mise à jour manuellement.

Exemples

L’exemple de code suivant utilise obtient la collection de liens DDE/OLE dans le classeur actif, puis utilise la LinkInfo méthode pour déterminer si chaque lien DDE/OLE est mis à jour automatiquement ou manuellement.

Cet exemple concerne une personnalisation au niveau du document.

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

Remarques

Paramètres facultatifs

Pour plus d’informations sur les paramètres facultatifs, consultez Paramètres facultatifs dans les solutions Office.

S’applique à