Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
MSFlexGrid Delete Row
Hi all, I have implemented an MSFlexGrid onto my form, I have a fixed row for Header. I have a problem when deleting from the grid, see code below; Code ------------------- Private Sub ProductionGrid_DblClick() Dim R$ Dim lCurRow As Long lCurRow = ProductionGrid.Row 'delete row upon confirmation MsgBox ProductionGrid.RowSel If ProductionGrid.RowSel 0 Then R = MsgBox("Are you sure you want to delete this line?", vbYesNo, "Confirm Delete") If R = vbYes Then If ProductionGrid.Rows = ProductionGrid.FixedRows + 1 Then ProductionGrid.FixedRows = 0 End If ProductionGrid.RemoveItem (lCurRow) End If End If End Sub ------------------- The code above is a modification to enable me to delete the last ro without the error "unable to delete last non fixed row". but now my header row is no longer fixed and I cant set it t fixed.... Anyone else been having some trouble here? TI -- gti_jober ----------------------------------------------------------------------- gti_jobert's Profile: http://www.excelforum.com/member.php...fo&userid=3063 View this thread: http://www.excelforum.com/showthread.php?threadid=53631 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Mutliple selection in MSFlexgrid | Excel Programming | |||
Datepicker not visible on the MSFlexgrid. | Excel Programming | |||
MSFlexGrid | Excel Programming | |||
paint row in MSFlexGrid | Excel Programming | |||
MSflexgrid data | Excel Programming |