Finns det något bättre sätt att rensa en Grid på än att skriva så här:

Grid1.Row = 0
Grid1.Col = 0
Grid1.text = ""

Grid1.Row = 0
Grid1.Col = 1
Grid1.text = ""

Grid1.Row = 0
Grid1.Col = 2
Grid1.text = ""

'osv. min Grid har 5 st. col och 5 st. row

Testade en Loop som nedan också med den blir också fel

For e = 0 To 4
For f = 0 To 4
Grid1.Col = e
Grid1.Row = f
Grid1.Text = ""
Next

Kanske kan det här vara nåt?

      ' Select all non-fixed grid cells.
      Grid1.SelStartCol = Grid1.FixedCols
      Grid1.SelStartRow = Grid1.FixedRows
      Grid1.SelEndCol = Grid1.Cols - 1
      Grid1.SelEndRow = Grid1.Rows - 1

      ' Clear the cells.
      Grid1.Clip = ""

      ' Clean up the grid.
      Grid1.Col = Grid1.FixedCols
      Grid1.Row = Grid1.FixedRows
      Grid1.SelEndCol = Grid1.SelStartCol
      Grid1.SelEndRow = Grid1.SelStartRow

Ditt andra exempel verkar väl smidigt ?
Jag tycker dock att det saknas ett "next".
Det är ju 2 loopar.

/Martin

Visst nu fick jag till det. Det var som du sa Martin det fattades bara ett Next längst ner. Tack du också Tomas. Ska vara tydligare också vilket fel jag får. Så här blev rätt kod och den var ju mycket enkel.

For e = 0 To 4
For f = 0 To 4
Grid1.Col = e
Grid1.Row = f
Grid1.Text = ""
Next
Next

Annars finns även Grid1.Clear