2015-02-08|@Excel报表顾问

        

这些小技巧，主要算是些Excel数据处理应用的小场景。知道的，都觉得容易。不知道，很可能想不到。

问题1：excel里1/3，4/3这些怎么输。

错误做法1：直接输入1/3，得到1-3或1月3日，总之就是日期.

错误做法2：加引号'1/3，得到1/3，但是确实文本，不是数值。通过istext函数判断可知。

正确做法：输入0+空格符号+1/3,得到1/3数值.就是我们要的。

问题2：多张工作表中同一位置比如A1输入相同的内容 我。

老实做法：一个个输，好累。

聪明做法：可以选中一张工作表，然后按住Ctrl键，再单击窗口左下角的Sheet1、Sheet2......来直接选择需要输入相同内容的多个工作表，可以看到接着在其中的任意一个工作表中的A1输入我。完成后点有机工作表标签点取消就是恢复了。

特别方法VBA：

Sub aa()

For i = 1 To Sheets.Count

Sheets(i).[a1] = "我"

Next

End Sub

问题3：所有工作表中同一位置比如A1的值都相加。

比如sheet1的A1是10，sheet2的A1是20，sheet3的A1是30，怎么算最快

老实做法：一个个切换自己去加，太多的话，人都晕了。

好快方法：=SUM(Sheet1:Sheet3!A1)

特殊方法：Sub aa()

For i = 1 To Sheets.Count

Sum = Sum + Sheets(i).[b1].Value

Next

[b4] = Sum

End Sub

可能你感觉这特殊方法vba在这有点无聊蛋疼，但有时却很有用。同样这问题，变化一下，求sheet1，sheet3，sheet5,sheet7,sheet9,sheet11中A1值的总和。

好快方法也不方便了，但vba很给力，只要小修改

Sub aa()

For i = 1 To Sheets.Count / 2 + 1

Sum = Sum + Sheets(i * 2 - 1).[a1].Value

Next

[b4] = Sum

End Sub

  作者介绍：薛奔(Sharpen)，大电商网站运营分析师。

微软Excel专家认证，擅长Excel数据报表自动化。微博@Excel报表顾问。

自营店铺:Xexcel.taobao.com 销售本人原创的全系列Excel视频教程。