excel 按钮功能
展开全部
按ALT+F11,调出VBA编辑器
,最左边选择
你这个工作表,然后
插入-模块-在模块里
复制下面的语言
进去,然后关闭.
Sub
Macro3()
'
'
Macro3
Macro
'
宏由
BoBo
录制,时间:
2008-8-8
'
'
ActiveCell.FormulaR1C1
=
"=R[1]C*R[2]C*R[3]C"
Selection.Copy
Selection.PasteSpecial
Paste:=xlPasteValues,
Operation:=xlNone,
SkipBlanks
_
:=False,
Transpose:=False
Application.CutCopyMode
=
False
End
Sub
视图-工具栏-窗体-按钮-画一个按钮后
右键-指定宏-Macro3()-确定
以后点就行了
我修改了一下,如果到别的单元格,就首先点要显示结果的地方,然后点按钮就行了.但是要保证公式
都是
这个单元格下面的三个单元格相乘
,最左边选择
你这个工作表,然后
插入-模块-在模块里
复制下面的语言
进去,然后关闭.
Sub
Macro3()
'
'
Macro3
Macro
'
宏由
BoBo
录制,时间:
2008-8-8
'
'
ActiveCell.FormulaR1C1
=
"=R[1]C*R[2]C*R[3]C"
Selection.Copy
Selection.PasteSpecial
Paste:=xlPasteValues,
Operation:=xlNone,
SkipBlanks
_
:=False,
Transpose:=False
Application.CutCopyMode
=
False
End
Sub
视图-工具栏-窗体-按钮-画一个按钮后
右键-指定宏-Macro3()-确定
以后点就行了
我修改了一下,如果到别的单元格,就首先点要显示结果的地方,然后点按钮就行了.但是要保证公式
都是
这个单元格下面的三个单元格相乘
展开全部
1.
在“视图”→点击“工程资源管理器”下”→在出现的右侧,右键点选“micorsoft
excel对象”→“插入”→“模块”
2.
录入公式:
3.
在excel中“插入”→“图形”→“形状”,并右键点击形状→“指定宏”
4.
在弹出的窗口,点击“按钮计算”→“确定”即可。
在“视图”→点击“工程资源管理器”下”→在出现的右侧,右键点选“micorsoft
excel对象”→“插入”→“模块”
2.
录入公式:
3.
在excel中“插入”→“图形”→“形状”,并右键点击形状→“指定宏”
4.
在弹出的窗口,点击“按钮计算”→“确定”即可。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
1.
在“视图”→点击“工程资源管理器”下”→在出现的右侧,右键点选“Micorsoft
Excel对象”→“插入”→“模块”
2.
录入公式:
3.
在excel中“插入”→“图形”→“形状”,并右键点击形状→“指定宏”
4.
在弹出的窗口,点击“按钮计算”→“确定”即可。
在“视图”→点击“工程资源管理器”下”→在出现的右侧,右键点选“Micorsoft
Excel对象”→“插入”→“模块”
2.
录入公式:
3.
在excel中“插入”→“图形”→“形状”,并右键点击形状→“指定宏”
4.
在弹出的窗口,点击“按钮计算”→“确定”即可。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
按ALT+F11,调出VBA编辑器 ,最左边选择 你这个工作表,然后 插入-模块-在模块里 复制下面的语言 进去,然后关闭.
Sub Macro3()
'
' Macro3 Macro
' 宏由 BoBo 录制,时间: 2008-8-8
'
'
ActiveCell.FormulaR1C1 = "=R[1]C*R[2]C*R[3]C"
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
End Sub
视图-工具栏-窗体-按钮-画一个按钮后 右键-指定宏-Macro3()-确定 以后点就行了
我修改了一下,如果到别的单元格,就首先点要显示结果的地方,然后点按钮就行了.但是要保证公式 都是 这个单元格下面的三个单元格相乘
Sub Macro3()
'
' Macro3 Macro
' 宏由 BoBo 录制,时间: 2008-8-8
'
'
ActiveCell.FormulaR1C1 = "=R[1]C*R[2]C*R[3]C"
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
End Sub
视图-工具栏-窗体-按钮-画一个按钮后 右键-指定宏-Macro3()-确定 以后点就行了
我修改了一下,如果到别的单元格,就首先点要显示结果的地方,然后点按钮就行了.但是要保证公式 都是 这个单元格下面的三个单元格相乘
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询