none
mettre en forme un Datagridview RRS feed

  • Question

  • J'aimerais mettre en forme ma saisie dans un Datagridview.

    J'ai trouvé ce code mais je suis sur que l'on peux plus simple.

    Colonne 1 & 4 en Majuscule, Colonne 2 en Propre, colonne 3 & 5 en Numéric.

     

    Private Sub DataGridViewFournisseur_CellEndEdit(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) _
        Handles DataGridViewFournisseur.CellEndEdit
        'Met la saisie au Format:Colonne 0 & 3=Majuscule, Colonne 1=Propre, Colonne 2 & 4=Numérique
        If e.ColumnIndex = 0 Or e.ColumnIndex = 3 Then _
        DataGridViewFournisseur.CurrentCell.Value = StrConv(DataGridViewFournisseur.CurrentCell.Value, VbStrConv.Uppercase)
        If e.ColumnIndex = 1 Then _
        DataGridViewFournisseur.CurrentCell.Value = StrConv(DataGridViewFournisseur.CurrentCell.Value, VbStrConv.ProperCase)
        If e.ColumnIndex = 2 Or e.ColumnIndex = 4 Then
          Try
            If DataGridViewFournisseur.CurrentCell.Value <> IsNumeric(Nothing) Then IsNothing(True)
          Catch ex As Exception
            MessageBox.Show("Cellule numérique", "Erreur de saisie", MessageBoxButtons.OK, MessageBoxIcon.Error)
            If e.ColumnIndex = 2 Then DataGridViewFournisseur.CurrentCell.Value = "00000"
            If e.ColumnIndex = 4 Then DataGridViewFournisseur.CurrentCell.Value = "0000000000"
          End Try
        End If
      End Sub


    Merci

     
    michel23
    mardi 21 juin 2011 07:29

Réponses