作者：乔山办公网日期：
返回目录：excel表格制作
这是很多新手最想知道的事，函数那么多，要从哪儿学起呢。我个人谈点小体会：
1、“学以致用”，用才是目的——就是你要和将要用到的东西先学。比如你根本用不上财务、工程函数，没必要一下子就去看那些专业性很强的东西（嘿嘿，那些我基本不会），这样就容易入门了。基本上函数用得最多的逻辑判断和查找和引用这2类函数了。先不要急于学会“数组”，自己常用函数的普通用法有个大致的用法了解之后再去看它的数组用法。
2、善于搜索，网上很多高手很多的经典学习案例!最佳学习方法:搜一下，能找到更多的解答；而且锻炼了自己的表述能力。
3、除了“求助”式学习，还要“助人”式的学习，只要有时间，助人助己，有了越来越多的“求助”者给你免费提供了练习的机会，练得多了再综合各种思路的比较，自己就有了一些想法，你的水平肯定与日俱增。
4、一口气吃不成胖子，多记一些学习的体会，日积月累，你就是高手了。另外，到“优秀会员园地”瞧瞧，不少学习心得哦。
excel需要掌握的很多,主要就是查找,引用,汇总等的!
我不知道你需要什么,现在救简单说几个技巧吧,你看着好值得学,那发信给我!谢谢
1、如何更改excel默认的行列标签的颜色？
桌面-属性-外观-项目-高级_已选定的项目，设置颜色。
2、系统提供的排序功能最多只能同时依据三个关键字来进行。如果需要依据三个以上的条件来排序，该如何实现？
答：虽然系统一次最多只能同时对三个关键字来排序，但是我们可以利用设置排序关键字的优先级，通过多次排序来实现关键字大于3个以上的排序。
具体操作如下：首先打开工作表。单击“数据”菜单中的“排序”项，依次在“主要关键字”、“次要关键字”、“第三关键字”中选择优先级最低的几个排序关键字，然后执行排序操作。接下来再依次选择优先级较高的几个关键字，进行2次排序。这样直到最高优先级的关键字排序完成为止，就可以实现了对三个以上关键字的排序操作了。
3、若A1-A6中有大于0和小于0的数，请问怎样将其中小于0的数所在的行自动删除。
for i=6 to 1 step -1
if cells(i,1)<0 then rows(i).Delete
next i
4、请问：INDEX（data，，1）中的data是什么意思
是定义的名称，具体是什么要看文件。按ctrl+F3看看。
5、快速插入行(列)的快捷键，CTrl+键盘+
6、桌面上的"网上邻居"没有了,在我的电脑找到了,移动到桌面只是个快捷方式,
在桌面点右键选属性，点“桌面”“自定义桌面”把“网上邻居”前打上勾，确定
7、如何获取一个月的最大天数？
:"=DAY(DATE(2002,3,1)-1)"或"=DAY(B1-1)",B1为"2001-03-01
8、数据区包含某一字符的项的总和,该用什么公式
=sumif(a:a,"*"&"某一字符"&"*",数据区)
9、能否在EXCEL中定时打印?
Private Sub Workbook_Open()
Application.OnTime "9:30:00", "wlqPrint"
'将"9:30:00"改为要自动打印的时间
End Sub
Sub wlqPrint() '打印
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
10、比方说要求得g在图示区域中所在列号，如何表达？
数组公式，按ctrl+shift+enter结束。
=MAX((A1:F4="g")*COLUMN(A1:F4))
11、勾怎么输入
按住ALT键输入41420后放开ALT键√
12、将单元格中的数全部变成万元表示（？？？）
自定义单元格格式：0"."0,
或：0!.0000
13、自定义名称中的引用范围中可以直接粘贴公式
从编辑栏里Ctrl+C复制，然后Ctrl+V粘贴
14、如果一个单元格中既有数字又有字母，怎么提取其中的数字呢？
Function getnumber(rng As String) As String
'自定义函数作用：提取当前单元格中的数字
Dim mylen As Integer
Dim mystr As String
mylen = Len(rng)
For I = 1 To mylen
mystr = Mid(rng, I, 1)
If Asc(mystr) >= 48 And Asc(mystr) <= 57 Then
getnumber = getnumber & mystr
End If
Next I
End Function
15、用VB制作EXCEL作品封面
本人在论坛上发了一个EXCEL作品封装实例后，有很多人来信询问怎样用VB打开EXCEL，并且带有启动封面，现本人将过程
底细说出来，希望给大家起到一个抛砖引玉的作用。
一、新建一个文件夹，该文件夹主要是用来装EXCEL工作簿、VB编译的可执行文件、图标文件及帮助文件用的。
二、打开VB，新建一个标准EXE。
三、1、对form1的设置：
Borderstyle=0-none 去掉form1的标题栏
Icon 设定图标
StartupPositio=2 将启动封面始终悬挂在屏幕中部
2、添加一个Timer控件，将其Interval设为1000，双击Timer控件出现代码窗口，输入如下代码：
Private Sub Timer1_Timer()
Dim Exl As Object
Set Exl = CreateObject("Excel.Application")
Exl.Workbooks.Open (App.Path & "\" & "DZB.xls")
Exl.Visible = True
Unload Me
End Sub
3、点击文件－－生成EXE文件，将其保存到步骤一中的文件夹中去。
大功告成！
推荐使用图标编辑工具AXIcons制作图标文件！
16、邮件合并一步一步学
邮件合并一步一步学：
软件OFFICE2003，EXCEL2003
1、在excel2003中建一个数据表(联系表.xls)如：姓名，身份证号，其它编号，职业，联系方式，输入相应数据，保存；
如想在一张页面中打印多个人的信息，就在excel2003多排几列了！
2、打开一个空白word文档(联系表.doc)，点击工具-信函与邮件-邮件合并，这时在你的右面就会出现一个任务窗格；
3、在窗格中选择信函，然后点击下一步：正在启动文档；
4、选择使用当前文档，点击下一步：选取收件人；
5、选择使用现有列表，点击浏览，选取”联系表.xls”然后在弹出的窗口中选择你建表的工作薄（一
般都是sheet1$）。确定，再确定，点出下一步：撰写信函；
6、在你的word文件中建好你想把数据插入后的格式；
想在一张页面中打印多个人的信息，就用文本框做好，一张页面多排几张文本框而已。
7、点击右面的项目的中其它项目（当然你也可选择插入地址块、问候语），你就会看到姓名、姓名1、姓名2等等，把你想要的项目插入到对应的位置即可。
8、在工具栏上点右键，点击邮件合并，在弹出的邮件合并工具栏中点击ABC，就会在域与你的实际项目中切换，工具栏上其它键自己试好了，懂中文一看就知！
17、工具栏>>自定>>格式>>[浅底纹]搬出来用
矩形>>[浅底纹]>>透明>>阴影
18、把Excel表格转换为图片
许多报纸和杂志都介绍过在Excel中，同时按住Shift键点击“文件”菜单，原来的“关闭”菜单项就会变成“全部关闭”。如果我们在按下Shift键的同时点击“编辑”菜单，原来的复制和粘贴就会变成“复制图片”和“粘贴图片”。利用这一功能，我们可以将一个数据表以图片的形式进行复制，从而将其转换为图片。方法如下：
首先选中需要复制成图片的单元格区域，然后按住Shift键依次选择“编辑→复制图片”命令，接着弹出“复制图片”窗口，选择“图片”单选项后点击“确定”按钮，这时就将选定的表格区域复制成图片了。最后复制到目标只需直接选择“粘贴”命令即可（或者按Shift键再选择“编辑→粘贴图片”命令）。我们还可以将其在Word中进行粘贴。
另外，在复制图片时如果选择了“如打印效果”单选项，在粘贴的时候如果表格没有边框，复制后的图片也不会出现边框。
19、=HYPERLINK("#表1！L2","轻客支撑")，不明白#号的意思
#加在表名前，是指当前工作簿，加在单元格前是指当前工作表
20、在B1中同步显示A列中最后一行的内容
最后一行为文本：
=offset($b$1,MATCH(CHAR(65535),b:b)-1,)
最后一行为数字：
=offset($b$1,MATCH(9.9999E+307,b:b)-1,)
或者：=lookup(2,1/(b1:b1000<>""),b1:b1000)
21、为Excel中的“中文”添加拼音
由于工作的需要，经常要为中文添加拼音，这样可以为某些生僻的汉字加上拼音注释。如果是在Word中就比较简单了，但在Excel中应该怎么添加呢？
答：如果要在Excel中为“中文”添加拼音，可以执行如下的操作步骤（下面以Excel 2003为例进行介绍）：
（1）选中需要输入拼音的单元格区域，执行菜单栏中的【格式】|【拼音指南】|【显示或隐藏】命令（如图1所示），这样就可以为该单元格区域激活拼音信息的显示模式，否则即使输入后也处于隐藏状态。
（2）输入正常的中文文字，然后执行菜单栏中的【格式】|【拼音指南】|【编辑】命令，此时就可以直接在单元格的上半部区域输入相应的拼音了，如图2所示。
（3）一般情况下，由于拼音缺省使用半角字符，而且又缺省使用左对齐模式，因此看起来不是那么美观。因此可以执行菜单栏中的【格式】|【拼音指南】|【设置】命令，在打开的“拼音属性”对话框中的“字体”选项卡中可以调整拼音的字体、字形、字号、下划线、颜色等格式（如图3所示）；在“设置”选项卡中重新设置拼音与文字的对齐状态，比如左对齐、居中、分散对齐等（如图4所示），建议选择“分散对齐”，这样拼音与文字就可以一一对应了。
22、怎样不修改单元格的公式，就可以不显示“#DIV/0!”
不能改公式就采用条件格式，选取该区域（如整个D列），格式－条件格式－公式－输入=ISERROR(D1)，下步选格式为字体－白色.。
23、评委打分中，如何去掉两个以上最高分，两个以上最底分，求剩余人员的平均分？同时显示出被去掉的e79fa5e98193e58685e5aeb9361分数。
看看trimmean()函数帮助。
被去掉的分数：
最大两个：=large(data,{1;2})
最小两个：=small(data,{1;2})
24、怎样很简单的判断最后一位是字母
right(a1)*1
出错的字母
=IF(ISNUMBER(--RIGHT(A1,1)),"数字","字母")
=IF(ISERR(RIGHT(A1)*1),"字母","数字")
25、不知道--是什么意思？
VALUE(F1)，--F1以及其他的算术运算的办法如：0+F1，F1-0，F1*1，F1/1以及乘幂的办法等等……
这几种方式都是一样的。只要是文本型数字都可以用这个办法变为数值以便运算；对于逻辑值（TRUE,FALSE)，除了VALUE函数外，其他几种都可以。
但据说，测试的结果，--F1速度最快
26、请问如何 设置单元格，令其不接受包含空格的字符
选定A列
数据——有效性——自定义——公式
=iserror(find(" ",a1))
数据－－有效性－－自定义－－公式
=len(a1)=len(trim(a1))
27、=VLOOKUP(B3,IF({1,0},G$3:G$5,F$3:F$5),2,0)
公式中的 IF({1,0},G$3:G$15,F$3:F$15)作何解释？
我的理解:{1,0}的含义是1代表TRUE(即逻辑值为真),0代表FALSE(即逻辑值为假),公式为
=VLOOKUP(B3,IF({TRUE,FALSE},G3:G17,F3:F17),2,0)也同样正确,这样更好理解.通过执行IF({TRUE,FALSE},G3:G17,F3:F17)为真,得到G3:G17这列数,由于是数组,再执行FALSE得到F3:F17,因此得到一个2列多行的数组.
28、不同工作簿间的引用如何不打开源工作簿、不弹出链接对话框且能自动更新数据。经过一段时间的摸索，我发现以下方法可供参考。
1、新建工作簿，输入数据（作为源工作簿），保存，保存类型选wk4(1-2-3)(*.wk4)，文件名为book1。
2、再建立一个工作簿，输入要引用源工作簿的公式，保存文件名称为book2。
3、关闭工作簿。
再打开book2看是不是不出现链接对话框。
或打开book1，修改一下数据，保存，关闭，再打开book2，是不是已经更新了数据。
另：引用多个源工作簿也可以，但源工作簿要保存wk4(1-2-3)(*.wk4)类型，我已试过，大家可以试试看。
以上是winXP+excel2003，较低版本的朋友，请把保存类型选为：wk3或wk1。
29、我的单元格怎么输入时间后前面自动加了等号,然后2005年就变成了1905年了呢?
工具——选项——1-2-3帮助——转换 lotus 123 公式
有无打勾？去掉
30、原来的函数是=a1+a4+a7+a10+a13+a16+a19+a22.....
现在想用offset来简化公式，我只会用比如a4=offset(a1,3,0)的，不会弄出一个数组出来实现上面的效果
sum(n(offset(a1,(row(1:10)-1)*3,)))
row(1:10)={1;2;3;4;5;6;7;8;9;10}
(row(1:10)-1)*3={0;3;6;9;12;15;18;21;24;27}
自A1向下偏移，就是a1、a4、a7、a10、a13、、、a28
31、未被发现的两个日期格式符号
例如：如果是24小时值班的话比较方便的。如果是 白百 夜办 分开上的度话，比较麻烦。18/2，刚好整数。所以排版就9天一轮。要吗是白，要吗是夜。
a1到a7，a1=1,a2=a1+1-rounddown(a1/18,0)*18,a3拉a2公式专。属
b1到b7。b1=a7+1，b2到b7，拉a2到a7公式。
C开始，拉b1到b7 公式。
然后会出现一个数值19，替换为1即可。
C2公式下拉
=IF(MOD(ROW(),3),"",SUM(OFFSET(B2,{-1,0,1},)))