WorkbookBase.LinkInfo, méthode
Obtient la date et l'état de mise à jour de la liaison
Espace de noms : Microsoft.Office.Tools.Excel
Assembly : Microsoft.Office.Tools.Excel.v4.0.Utilities (dans Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)
Syntaxe
'Déclaration
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
)
Paramètres
- name
Type : System.String
Nom de la liaison.
- linkInfoArgument
Type : Microsoft.Office.Interop.Excel.XlLinkInfo
L'une des valeurs XlLinkInfo qui spécifie le type d'informations à retourner.
- type
Type : System.Object
L'une des valeurs XlLinkInfoType qui spécifie le type de liaison pour laquelle retourner des informations.
- editionRef
Type : System.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 si le classeur comporte plusieurs éditeurs ou abonnés portant le même nom.
Valeur de retour
Type : System.Object
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.
Notes
Paramètres optionnels
Pour plus d'informations sur les paramètres optionnels, consultez Paramètres optionnels dans les solutions Office.
Exemples
L'exemple de code suivant utilise la collection de liaisons de DDE/OLE du classeur actif, puis la méthode LinkInfo pour déterminer si chaque liaison DDE/OLE est mise à jour automatiquement ou manuellement.
Cet exemple illustre une personnalisation au niveau du document.
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.");
}
}
Sécurité .NET Framework
- Confiance totale accordée à l'appelant immédiat. Ce membre ne peut pas être utilisé par du code d'un niveau de confiance partiel. Pour plus d'informations, consultez Utilisation de bibliothèques à partir de code d'un niveau de confiance partiel.