关于在word中添加按钮时遇到的问题？(100分)

B

bain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-20

• #1

我在word中添加按钮时遇到问题：
1、word2000没问题，但是在word97中无法设定按钮对应的宏，
cBarCtl : CommandBarControl ;
cBarCtl.Set_OnAction('DocFax') ;//这句报错 cBarCtl.Set_OnAction('')这样就没事
2、在word xp中无法添加宏，
vc:=appWord.VBE.ActiveVBProject.VBComponents;//这句报错
好像无法建立这个类型对象。

 

磊

磊

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-20

• #2

gz

 

B

bain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-22

• #3

有人知道吗？

 

G

goddy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-24

• #4

[]

 

B

bain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-24

• #5

有人知道吗？

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-24

• #6

看下面的代码，希望对你有用，就是OnAction，可以的。在Word97下，只是记得实验过，手头没有97，你自己实验吧。
Sub AddBtn_Print()

Dim Btn_Print As CommandBarButton
Set Btn_Print = My_Bar.Controls.Add(Type:=msoControlButton, Temporary:=False)
With Btn_Print
.Caption = "打印文稿"
.TooltipText = "打印当前文稿"
.Style = msoButtonIconAndCaption 'msoButtonAutomatic
'.PasteFace
.OnAction = "FilePrint"
.Visible = True
End With
End Sub

 

B

bain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-07

• #7

我试了，不行！有人能解决吗？

 

B

bain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-15

• #8

提前

 

B

bain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #9

没人知道吗？希望哪位大虾指点一下！

 

B

bain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-27

• #10

up

 

B

bain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-28

• #11

up

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-14

• #12

仔细看了一下，不是我给你的代码不行，是你不会使用。
cBarCtl.Set_OnAction('DocFax') ;
你就需要有一个Sub和这句话对应。就是说需要存在一个
sub DocFax
'
end Sub
否则，VB编译器找不到DocFax，肯定报错。

 

Z

zm30

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-02

• #13

1.同意楼上
2.你要在word xp里的宏->安全性里设置可靠来源页面下，将信任对于Visual basic项目的访问打上勾

 

B

bain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-02

• #14

谢谢了！