Dim xlApp as Object
xlapp = GetObject("Excel.Application")
xlapp.Activesheet.Range("A1:B10").Formula = "=Trunc(rand()*100+1)"

Treat xlapp as the application object you would use within excel itself.

--
Regards,
Tom Ogilvy

Brian wrote in message
...
Plse could anyone once you have opened an instance of excel with getobject
how do you populate a worksheet

Any advice welcome