Någon som vet om man kan ändra bakgrundsfärg i en enda cell eller i en enda column i en Grid. Du behöver nog tala om vilken grid du använder...finns en massa olika :-) Det här använder jag i en datagrid i ItemDatabound: Ann: Tyvärr, men frågan ligger i vb6-forumet, så man får säkert krångla lite extra :) Fasen, det var sömnigt av mig. Tack för påpekandet :) Har vy per senast ärende och inte per avdelning. Är det inte typ: Ovanstående koder funkar bara i en FlexGrid. Vad är det för skillnad på en vanlig Grid och en FlexGrid control om man skulle vilja börja med en sådan istället. <b>Vad är det för skillnad på en vanlig Grid och en FlexGrid control</b>Ändra färg i en cell i en Grid
Sv: Ändra färg i en cell i en Grid
Sv: Ändra färg i en cell i en Grid
e.Item.Cells(0).BackColor = Drawing.Color.RedSv:Ändra färg i en cell i en Grid
Sv: Ändra färg i en cell i en Grid
Sv: Ändra färg i en cell i en Grid
Dim Row As Long
Dim Col As Long
Row = 1 'Exempel värde
Col = 2 'Exempel värde
Grid1.Row = Row
Grid1.Col = Col
Grid1.CellBackColor = vbRed
Så koden för att ändra bakgrundsfärg för markerade celler hade sett ut så här:
Dim Row As Long
Dim Col As Long
Dim FirstRow As Long
Dim FirstCol As Long
Dim LastRow As Long
Dim LastCol As Long
Dim Color As OLE_COLOR
Color = vbRed
If Grid1.Row < Grid1.RowSel Then
FirstRow = Grid1.Row
LastRow = Grid1.RowSel
Else
FirstRow = Grid1.RowSel
LastRow = Grid1.Row
End If
If Grid1.Col < Grid1.ColSel Then
FirstCol = Grid1.Col
LastCol = Grid1.ColSel
Else
FirstCol = Grid1.ColSel
LastCol = Grid1.Col
End If
For Row = FirstRow To LastRow
For Col = FirstCol To LastCol
Grid1.Row = Row
Grid1.Col = Col
Grid1.CellBackColor = Color
Next
Next
Varför använder du inte "Microsoft FlexGrid Control". JAg har för mig att den ersatt "Microsoft Grid". Control
Sv:Ändra färg i en cell i en Grid
Sv: Ändra färg i en cell i en Grid
Man kan bla. färglägga olika celler ;-)