excel color?

[Hulisi]

i have some code for scgrid ocx showing in excel.
here it is:

Dim objXL As Excel.Application
Dim objWB As Excel.Workbook
Dim objWS As Excel.Worksheet
Dim r As Long
Dim c As Long
Dim intRed As Integer
Dim intGreen As Integer
Dim intBlue As Integer

Set objXL = New Excel.Application
Set objWB = objXL.Workbooks.Add
Set objWS = objWB.Worksheets(1)

With objWS

For r = 0 To objGrid.Rows '- 1
For c = 0 To objGrid.Cols '- 1
.Cells(r + 1, c + 1) = objGrid.Text(r - 1, c - 1)
Next
Next

.Cells.Columns.AutoFit
End With

objXL.Visible = True

Set objWS = Nothing
Set objWB = Nothing
Set objXL = Nothing

but i need help...
scgrid's not data but cell color isnt shown in excel..
can you help me?..
please...

 

[johnwm]

faq222-2244
thread222-952983

________________________________________________________________
If you want to get the best response to a question, please check out FAQ222-2244 first

'If we're supposed to work in Hex, why have we only got A fingers?'

http://www.essexsteam.co.uk

for steam enthusiasts