colorier un msflexgridRésolu

Question

Bonjour,

Qui peut donner un p'tit coup de main en r&#233;pondant &#224; cette question :

Sur une form, j'affiche un msflexgrid de 6 colonnes. La derni&#232;re colonne contient la valeur 1 ou 2.

Comment faire pour colorier la ligne en rouge par exemple si la valeur de la derni&#232;re colonne est 1 ?

De plus, comment faire pour supprimer la premi&#232;re ligne vierge qui s'affiche dans la grille ?

Merci !!

cs_ITALIA · Accepted Answer

Test cette Fonction pour mettre la ligne en Rouge

Public Sub ChangeC(ByVal grille As Object)
With grille
        For i = 1 To .Rows - 1
            If .TextMatrix(i, 6) ="1" or .TextMatrix(i, 6) ="2" Then
                .Row = i
                For J = 1 To .Cols - 1
                    .Col = J
                    .CellBackColor = vbRed
                Next
            End If
        Next
End With
End Sub

It@li@

laurent92370 · Answer

Salut It@li@

G&#233;nial, merci pour ce code.
Par contre, sais tu comment retirer la premi&#232;re ligne vierge par d&#233;faut qui s'affiche avant ?

MErci

cs_ITALIA · Answer

non

It@li@

Colorier un msflexgrid

3 réponses

Discussions similaires