如何用VBA实现对excel里一个块数据按照某列排序?如何调用AcitiveX,使用它的事件,

Question

如题:
Public WithEvents m_TwsCtrl As TWSLib.TwsPublic Sub ConnectIB()
 Dim iClientID As Integer
 iClientID = CInt(Sheet1.Cells(2, 2).Value)
 m_TwsCtrl.Connect "127.0.0.1", 7496, iClientID
End Sub这样用报错,应该怎样初试化控件,且使用它的事件

Answer 1

如何用VBA实现对excel里一个块数据按照某列排序
-----------------------------------------------
选中块数据，选者菜单“数据”--“排序”，set m_TwsCtrl =new TWSLib.Tws
m_TwsCtrl.Connect "127.0.0.1", 7496, iClientID