Partager via


ListObject.DataBindingFailure, événement

Se produit lorsqu'une condition provoque l'échec de la liaison de données d'un contrôle ListObject.

Espace de noms :  Microsoft.Office.Tools.Excel
Assembly :  Microsoft.Office.Tools.Excel (dans Microsoft.Office.Tools.Excel.dll)

Syntaxe

'Déclaration
Event DataBindingFailure As EventHandler
event EventHandler DataBindingFailure

Notes

À titre d'exemple, une condition est à l'origine d'un échec si un utilisateur dépose un contrôle ListObject sur un autre contrôle ListObject qui se trouve déjà dans l'emplacement cible.La liaison de données du nouveau contrôle échoue et le contrôle déclenche cet événement.

Exemples

L'exemple de code suivant crée un ListObject et ajoute un gestionnaire d'événements pour l'événement DataBindingFailure.Si list1 est lié à une source de données, puis que la liaison échoue, l'événement est intercepté et un message indiquant l'état de la liaison s'affiche.

Cette version est destinée à une personnalisation au niveau du document.

    WithEvents List4 As Microsoft.Office.Tools.Excel.ListObject

    Private Sub ListObject_DataBindingFailure()
        List4 = Me.Controls.AddListObject( _
            Me.Range("A1", "C4"), "List4")
    End Sub


    Private Sub List4_DataBindingFailure(ByVal sender As Object, _
        ByVal e As EventArgs) Handles List4.DataBindingFailure
        MessageBox.Show("Data binding is " & _
        List4.IsBinding)
    End Sub

Microsoft.Office.Tools.Excel.ListObject list4;
private void ListObject_DataBindingFailure()
{
    list4 = this.Controls.AddListObject(
        this.Range["A1", "C4"], "list4");
    list4.DataBindingFailure += new EventHandler(list4_DataBindingFailure);
}

void list4_DataBindingFailure(object sender, EventArgs e)
{
    MessageBox.Show("Data binding is " + list4.IsBinding);
}

Cette version est destinée à un complément d'application.

    WithEvents List4 As ListObject

    Private Sub ListObject_DataBindingFailure()
        Dim NativeWorksheet As Microsoft.Office.Interop.Excel.Worksheet =
            Me.Application.Worksheets(1)
        Dim vstoWorksheet As Microsoft.Office.Tools.Excel.Worksheet =
                Globals.Factory.GetVstoObject(NativeWorksheet)
        List4 = vstoWorksheet.Controls.AddListObject( _
            vstoWorksheet.Range("A1", "C4"), "List4")
    End Sub


    Private Sub List4_DataBindingFailure(ByVal sender As Object, _
        ByVal e As EventArgs) Handles List4.DataBindingFailure
        System.Windows.Forms.MessageBox.Show("Data binding is " & _
        List4.IsBinding)
    End Sub

ListObject list4;
private void ListObject_DataBindingFailure()
{
    Worksheet vstoWorksheet =
        Globals.Factory.GetVstoObject(this.Application.ActiveWorkbook.Worksheets[1]);
    list4 = vstoWorksheet.Controls.AddListObject(
        vstoWorksheet.Range["A1", "C4"], "list4");
    list4.DataBindingFailure += new EventHandler(list4_DataBindingFailure);
}

void list4_DataBindingFailure(object sender, EventArgs e)
{
    System.Windows.Forms.MessageBox.Show("Data binding is " + list4.IsBinding);
}

Sécurité .NET Framework

Voir aussi

Référence

ListObject Interface

Microsoft.Office.Tools.Excel, espace de noms