|
等 级:资深长老 |
经 验 值:7202 |
魅 力 值:541 |
龙 币:9945 |
积 分:6134.8 |
注册日期:2004-06-08 |
|
|
|
vba举个简单例子:
选择录制宏,然后随便点击一下sheet,再打开vba编辑器的模块,将如下代码copy过去,然后运行宏即可实现将sheet1的A1和sheet2的A1相加写回至sheet3的A1:
Dim sheet1cella1 As String
Dim sheet2cella1 As String
Sheets("Sheet1").Select
sheet1cella1 = Range("A1").Value
Sheets("Sheet2").Select
sheet2cella1 = Range("A1").Value
Sheets("Sheet3").Select
Range("A1").Value = Val(sheet1cella1) + Val(sheet2cella1)
|
|
|
|