word中的VB编辑器编辑程序后如何保存应用?

来源:百度知道 编辑:UC知道 时间:2024/06/26 02:41:53
在word文档中的VB编辑器中编辑一下代码:
Private Sub CommandButton1_Click()
S = Selection
D = Val(S)
C = D * 2
Selection = C
End Sub

可以把VB中的一个数字*2后赋值给原来的数字,也就是说让选中的数字*2。

请问,编辑后能把这个程序保存起来以便随时的调用吗??希望能建成一个按钮,选中数字后鼠标一点这个按键选中的数字就变成本身的2倍。就像选中一段文段后鼠标点击“字体颜色”,该文段就变成选中的颜色。

word文档的VB编辑器超爽,看看这个:
http://www.diybl.com/course/5_office/word/wordshl/2007214/23366_3.html

如果你想在同一台电脑中用,可以保存到normal.dot里(2007的叫normal.dotx)。
代码本身可以复制到记事本里备用。

Private Sub Command1_Click()
S = Text1.SelText
Text1.SelText = Val(S) * 2
End Sub

能,