Discussion :

[Franck.H]

Il faudrait, avant un export au format Excel, que je supprime tous les contrôles de type HiddenField. Voici mon code actuel

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
    Private Sub NettoyageColonne(ByVal dg As DataGrid)
        For i As Integer = 0 To dg.Items.Count - 1
            For j As Integer = 1 To dg.Columns.Count - 1
                For k As Integer = 0 To dg.Items(i).Cells(j).Controls.Count - 1
                    If TypeOf dg.Items(i).Cells(j).Controls(k) Is HiddenField Then
                        dg.Items(i).Cells(j).Controls.Remove(dg.Items(i).Cells(j).Controls(k))
                    End If
                Next
            Next
        Next
    End Sub

Cependant, la dernière boucle à l'air de boucler au-delà du nombre de contrôles présents dans la cellule en cours de parcours et me lève donc une exception de dépassement d'indice. Quais-je fait de mal ?