有請playyuer、songyangk，泰山，巴頓及各位高手(總計380分)，急~~~

Question

喔，可惜。
up
up
up
各位高手都來指點一下吧。5555~~~~

Answer 1

Dim xlApp As Object
Set xlApp = CreateObject("Excel.Application", "YourIpAddress")
Debug.Print xlApp.Version

Answer 2

m.AddItem "333333333333333"      '需要添加的记录
m.TopRow = m.Rows - 1            '永远都可以看见-----------------------------------------------
原来2个都是这么简单的问题，以前怎么会没有人回答呢
看来我的运气还不错。

Answer 3

非常感謝jyu1221(天同) 
MSHFlexgrid問題己解決，遠程對象不能創建，問題解決送上所有分。