VB排版excel错误
Set xl = New Excel.Application
xl.Visible = True '设置EXCEL可见
xl.Workbooks.Add
xl.Workbooks.Open ("C:\Documents and Settings\Administrator\桌面\exportExcel.xls") '打开网页保存的EXCLE文档
Rows("1:1").Select '选择并删除第一列
Selection.Delete Shift:=xlUp
Dim rng As Range '赋予rng变量Range(单元格)属性
Dim i As Integer, j As Integer '计算exportExcel文件中的行、列数
Set rng = xl.ActiveSheet.UsedRange
i = rng.Rows.Count
j = rng.Columns.Count
Debug.Print i
Debug.Print j
EXCELAPP.ActiveSheet.Range("A1:P99").Sort Key1:=Range("H1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin
执行后能完成排序，但是弹出窗口提示“实时错误424，要求对象”，请问这个怎么改
Private Sub Cdload_Click()
Set xl = New excel.Application
xl.Visible = True '设置EXCEL可见
相关问答：
在vb这编程里似乎有很多的东西是相联系的，为什么有些人对vb的编程摸不到头脑啊！并且有些事很容易的，但是却把它们的代码变成复杂，也去想一些不能实现的东西啊！
没分了，楼主多来点分！
来接点分
......
初学，大胆提问，请高手不吝赐教
1、滚动条点击与绘图板（屏幕,Piceure1）的移动问题已经解决。
Picture1.Top = -VScroll1.Value + bcW '垂直移动
Picture1.Left = -HScroll1.Value + bcW ' ......
VB怎样获得鼠标处的超级连接呢？
在WebBrowser控件中有这样一个事件:StatusTextChange(index As Integer, ByVal Text As String)
它的Text参数正是鼠标处的超级连接,但问题是如果我的浏览器正� ......
用vc编写的dll在debug模式和release模式下启动vb的exe程序调用vc的dll可以得到正确结果，但是如果直接双击vb的exe程序调用dll报错，在dll内部添加messagebox后发现只要在函数内部声明std::string类型的变量就会出现� ......
