Private Sub dgv_CellFormatting(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellFormattingEventArgs) Handles dgv.CellFormatting
        'Recupera il CellStyle di base
        Dim cs As New DataGridViewCellStyle
        cs = e.CellStyle

        'Formatta le colonne
        Select Case e.ColumnIndex
            Case 0
              ...
            Case 1 ' Tua colonna
                cs.Format = "€ #.###,00"
                e.CellStyle = cs
            Case 2 'Ora Inizio
              ...
            Case 3 'Data Fine
              ...
            Case 4 'Ora Fine
              ...
            Case ...
              ...
            Case Else
        End Select
    End Sub