Hack Flexgrid by Rhino

Got error on "SET" and "excel" object. kindly resolve
Set xl = CreateObject("excel.application")


Dim i As Long
Dim p As Long
Dim newCell As String
Dim xl As Excel.Application
Set xl = CreateObject("excel.application")
xl.Workbooks.Open (App.Path & "\Book1")
DoEvents
xl.Visible = True
For i = 1 To MSFlexGrid1.Rows - 1
For p = 1 To MSFlexGrid1.Cols - 1
MSFlexGrid1.Col = p
MSFlexGrid1.Row = i
newCell = Chr(i + 64) & p
xl.Worksheets("Sheet1").Range(newCell).Value = MSFlexGrid1.Text
Next
Next

what do you want to achieve ?

exexution of mentioned program.

also need to open old threads that were started by my account. any sugestion.

Quote:

---

Originally Posted by yasrab

Hack Flexgrid by Rhino

---

What is that supposed to mean? :confused::confused::confused:

Quote:

---

Originally Posted by yasrab

also need to open old threads that were started by my account. any sugestion.

---

Click on UserCP

It will then display all threads you are subscribed to
that have had new posts since you last visited said thread.

Spoo

Rhino is a JavaScript writing application. It deals with OLE and ActiveX like COM, .NET and #...