Partager via


WorkbookBase.SetLinkOnData, méthode

Définit le nom d'une procédure qui s'exécute à chaque mise à jour d'une liaison DDE.

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 Sub SetLinkOnData ( _
    name As String, _
    procedure As Object _
)
public void SetLinkOnData(
    string name,
    Object procedure
)

Paramètres

  • procedure
    Type : System.Object
    Nom de la procédure à exécuter lors de la mise à jour de la liaison.Ce peut être une macro Microsoft Office Excel 4.0 ou une procédure Visual Basic.Affectez une chaîne vide ("") à cet argument pour indiquer qu'aucune procédure ne doit s'exécuter lors de la mise à jour de la liaison.

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 obtient la collection de toutes les liaisons DDE du classeur actif, puis utilise la méthode SetLinkOnData pour exécuter une macro nommée UPDATE_MACRO à chaque mise à jour de l'une des liaisons.

Cet exemple illustre une personnalisation au niveau du document.

Private Sub WorkbookSetLinkOnData()
    Dim Links As Array = _
        CType(Me.LinkSources(Excel.XlLink.xlOLELinks),  _
        Array)
    If Links IsNot Nothing Then
        Dim i As Integer
        For i = 1 To Links.Length
            Me.SetLinkOnData(Links(i), "UPDATE_MACR0")
        Next i
    Else
        MsgBox("The workbook contains no DDE/OLE links.")
    End If
End Sub
private void WorkbookSetLinkOnData()
{
    Array links = (Array)this.LinkSources(Excel.XlLink.xlOLELinks);

    if (links != null)
    {
        for (int i = 1; i <= links.Length; i++)
        {
            this.SetLinkOnData((string)links.GetValue(i), "UPDATE_MACR0");
        }
    }
    else
    {
        MessageBox.Show("The workbook contains no DDE/OLE links.");
    }
}

Sécurité .NET Framework

Voir aussi

Référence

WorkbookBase Classe

Microsoft.Office.Tools.Excel, espace de noms