Question

把VBA用VB6封装到.dll中去，（要具体解决我这个问题的，我自己能改好普通的，这个改不好）

我想把一个 vba 封装到 dll中去，试了好久都不行，求助大神

代码要达到的效果是：当选中的单元格发生变化时，一个控件跟着变化，控件编号是8，这段代码是放在Sheets("交易历史")中的
封装是用的 vb6，谢谢大神帮我生成代码，一个是vb那边的，一个是vba里的：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
a = Sheets("交易历史").Range("b65536").End(xlUp).Row
If ActiveCell.Row > a Then
c = ActiveCell.Row
d = ActiveCell.Column
ActiveSheet.Shapes.Range(Array("Button 1")).Select
Selection.Characters.Text = "看他"
Shapes(1).Top = ActiveCell.Top
Shapes(1).Left = ActiveCell.Left + ActiveCell.Width + 5
Cells(c, d).Select
End If
End Sub
http://pan.baidu.com/s/1jG5WmYM

表格我放在这个链接了

Answer 1

代码最开始加
dim el as object
set el=getobject(,"excel.application")
然后对excel中特有的对象函数等前加el. 例如el.sheets("....")。。

追问

请针对我这个案例回答，普通的vba 我也能转dll

追答

你已经加过了？还是不行吗？