学一点excel

1.文本联接符 &

2.两个日期相减，结果还是日期，如果计算相差天数，要把结果单元格先设成数值型。

3.给单元格起个好记的名字：左上角标记处输入后回车

4.两个区域求和：sum(a1:e1,a3:e3)

5.=AVERAGE(K32,K35) 求k32,k35两个单元格的平均值，=AVERAGE(K32：K35) 求k32到k35多个连续单元格的平均值，

6.自动求和：选中要放结果的单元格，单击“自动求和”工具，选择求和的区域，回车

7.count（）统计数字项的个数，纯文本及逻辑格式的数据被忽略，日期型及同一单元格中有数字和文本的被统计

8.sumif(区域1，条件，区域2):当区域1满足“条件”时，对区域2的数据求和，区域1与区域2可以重和

9.高级筛选：多个条件“且”时：字段名在一行，条件在相邻的下一行。“或”时，条件在与字段名中间隔一空行

10.date(y,m,d) 根据输入的数值参数，返回一个日期

11.datevalue() 文本参数返回日期

12.time(h,m,s) 根据输入的数值参数，返回一个时间

13.timevalue() 根据文本参数返回时间，该时间值是一个十进制数据。例：=TIMEVALUE("12:00 pm") 值为0.5 即一天的一半

14.WEEKDAY(日期,2) 返回日期所在的星期。第二个参数说明返回值是如何与星期对应的。

15.rounddown(数据,小数位数) 小数位数之后的不论大小皆舍去，roundup()与之相反

16.vba:

日期分割符#9/14/1999#

定长字符串：dim mystr as string*16 最长16位

17.保护工作薄

先加载用户窗口

Private Sub Workbook_Open()

Application.Visible = False '隐藏工作簿

UserForm1.Show '启动窗体

End Sub

窗体中建立密码输入框

Private Sub CommandButton1_Click()

If TextBox1.Text = "你要的用户名" And TextBox2.Text = "密码" then

unload UserForm1 '卸载窗体

Application.Visible = True '显示工作簿

end if

end sub

18.获取活动单元格的数据：activecell.value

19.活动工作薄：activeworkbook

活动工作表：activesheet

活动单元格：activecell

workbooks:工作薄集合

wrokbook:工作薄对象

worksheets:工作表集合

wroksheet:工作表对象

20.相对引用：a1 相对于当前活动单元格的位置，它随活动单元格的变化而变化

绝对引用：$a$1 工作表中的经绝对位置，固定不变

混合引用：$a1 ,a$1

21.range :指定单元格区域

指定坐标，引用区域，activecell,select方式

22.将当前选定区域中的字体为斜体

ActiveSheet.Cells.Font.Italic = True

命令中指定区域：

ActiveSheet.Range("a1:h1").Font.Italic = True

特定单元格

ActiveSheet.Cells(1, 1).Font.Italic = True

用法：

范围

Range("A1:D10").FormulaR1C1 = "10"

Range("A1:D10").Value = 100

Range("A13").Value = 1

坐标

Cells(13, 1).FormulaR1C1 = "10"

Cells(13, 1).Value = 100

23.操作特定区域

Dim ran As Range

Set ran = Range(Cells(13, 1), Cells(16, 20))

ran.Font.Color = RGB(125, 25, 255)

24.获取当前鼠标选择的区域

selection

例：

MsgBox Selection.Font.Name

25.选择含有指定单元格的连续（有数据）区域

Range("m12").CurrentRegion.Select

26.给某单元格写个公式

Range("j2").Formula = "=sum(f2:g2)"

27.清除数据

Range("b2:j2").Clear

clearComments 清除批注

clearcontents 清除公式

clearformats 清除格式

clearnotes 清除附注

delete 删除区域

28.选择的行数

MsgBox Selection.Rows.Count

29.当前表有多少行

MsgBox Range("a3").CurrentRegion.Rows.Count

各行是连续有数据的

本文出自 “风起云涌” 博客，请务必保留此出处http://gzkhrh.blog.51cto.com/30447/391509