资源描述：
《Excel制作小结》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、1）根据颜色求和：FunctionSumColor(colAsRange,sumrangeAsRange)AsIntegerDimicellAsRangeApplication.VolatileForEachicellInsumrangeIficell.Interior.ColorIndex=col.Interior.ColorIndexThenSumColor=Application.Sum(icell)+SumColorEndIfNexticellEndFunction2）去除下拉列表框的小箭头S
2、ubHideAutoFilterDropdowns()DimRngAsRangeSetRng=ActiveSheet.Range("A3:D3")WithRng.AutoFilterField:=1,VisibleDropDown:=False.AutoFilterField:=2,VisibleDropDown:=True.AutoFilterField:=3,VisibleDropDown:=False.AutoFilterField:=4,VisibleDropDown:=FalseEndWit
3、hEndSub3）两张表相同内容合并ForI=1To44ForJ=1To50IfSheet2.Cells(I+1,1)=Sheet1.Cells(J+2,3)ThenSheet2.Cells(I+1,11)=Sheet1.Cells(J+2,12)Sheet2.Cells(I+1,12)=Sheet1.Cells(J+2,13)Sheet2.Cells(I+1,13)=Sheet1.Cells(J+2,14)EndIfNextJNextI4）SUM函数SUMIF函数Sumif（求和对象，条件，求和的范
4、围）SUMIF(A1:A10,"四川",E1:E10)，SUM((A2:A75="山东")*(B2:B75="青岛")*(E2:E75))最后公式写完后，要同时按下Ctrl+Shift+Enter快捷键，出现大括号5）Excel查找函数三剑客之Vlookup函数的用法Vlookup（查找对象，查找区域，列数，查找类别）需要注意的是：Vlookup函数需要输入四个参数，第二个参数表示在哪个区域查找，注意查找的对象必须在该区域的第一列；第三个参数表示函数最终得出的结果在查找区域中的列数是多少；第四个参数表
5、示精确查找还是模糊查找，0或者False表示精确查找，1或者true表示模糊查找6）Vlookup（查找对象，查找区域，列数，查找类别）第二个参数表示在哪个区域查找，注意查找的对象必须在该区域的第一列；第三个参数表示函数最终得出的结果在查找区域中的列数是多少；第四个参数表示精确查找还是模糊查找，0或者False表示精确查找，1或者true表示模糊查找Vlookup（(A2,Sheet1!B:D,3,0)），然后下拉就可以全部自动套用该公式了7）冻结窗口ActiveWindow.SplitRow=2Ac
6、tiveWindow.SplitColumn=1ActiveWindow.FreezePanes=True8）在A1数字前面全部加上233方法1：用函数“233”&A1方法2：单元格自定义"23363712010"@这个格式，双击即可9）如何将WORD文档转换成EXCEL文档？比如下面这组楼据，我希望进入到EXCEL里后，是分别对应到A、B、C三列里去，而不是全部Copy到A列？1姓名班级2小明1班3小陈2班4小夏3班5小美1班6小东2班STEP1：复制内容到A列STEP2：到复制过来的内容里面复制一
7、个空格STEP3：数据/分列/分隔符号/下一步/勾选“空格”/完成10）如何得到空格前面/后面的内容=LEFT(A1,FIND("",A1)-1)=RIGHT(A1,LEN(A1)-FIND("",A1))11）破解Excel工作表OptionPrivateModuleSUB（）。。。Dim w1 As Worksheet, w2 As Worksheet Dim i As Integer, j As Integer, k As Integer, l As Integer Dim m As Integ
8、er, n As Integer, i1 As Integer, i2 As Integer Dim i3 As Integer, i4 As Integer, i5 As Integer, i6 As Integer Dim PWord1 As String Dim ShTag As Boolean, WinTag As Boolean Application.ScreenUpdating = False With ActiveWorkbook Win
