急急急！！！小猫请教问题啦！！

saniwei

vba可以解决吗？您能够做到吗？可不可以帮我一下？

海狸先生

不好意思，对EXCEL的VBA没接触过

saniwei

555～～这下我死定了，怎么办呀？

淼漫

何必考虑那么复杂? 为何不加工作表解决呢? 最简单而且留有历史数据.

红池坝

同意楼上的观点。

如果实在要在现有的表上操作，下面的VBA代码可以完成（我只写了第8行到12行的累计，其他的你可以类推）

Private Sub CommandButton1_Click()

Dim a, i As Integer

a = MsgBox("真的要把今日数据累计到“本月累计”中吗？", vbOKCancel, "确认操作")

If a = 2 Then

Exit Sub

End If

For i = 8 To 12

Cells(i, 7).Value = Cells(i, 7).Value + Cells(i, 6).Value

Cells(i, 3).Value = 0

Cells(i, 4).Value = 0

Cells(i, 5).Value = 0

Next

End Sub

saniwei

唉。。。我也这么建议，可这是boss的要求呀，没办法，不过真是要谢谢管理员了，呵呵～我是新来乍到，说实话，就是因为这个问题才来这个坛子，不过以后我会经常来了，因为这里的朋友们都是很热心呀，呵呵～～

saniwei

一个大问题呀，怎么打印的时候也会把commandbutton打印出来呀？怎么在打印时屏蔽它呀？还有，怎样能将commandbutton变小一点，太大了呀

saniwei

呵呵，我已经知道隐藏commandbutton的代码了，现在还有两个问题：1、就是怎样commandbutton的大小 2、我还想增加一个commandbutton，请问怎样添加呢？

海狸先生

研究了一下代码中加上Cells(1, 1).NoteText "1月数据"可以添加A1的标注，这样的话，可以更加明了

海狸先生

以下是引用saniwei在2005-6-2 9:56:00的发言：

呵呵，我已经知道隐藏commandbutton的代码了，现在还有两个问题：1、就是怎样commandbutton的大小 2、我还想增加一个commandbutton，请问怎样添加呢？

1、选中这个按钮，就可以调整大小了

2、视图－工具栏－控件工具箱