office常用
当Excel文本里面包含号,此时vlooup不一定好用,采取以下两种办法:
=VLOOKUP(SUBSTITUTE(E3,”“,”~*”),B3:C12,2,)
或者
=INDEX(C2:C12,MATCH(TRUE,B2:B12=E3,))
公式输入完毕,按Ctrl+Shift+Enter
Excel如何合并两个单元格内容
用连字符“&”来合并单元格内容
想将多列的内容合并到一列中,不需要利用函数,一个小小的连字符“&”就能将它搞定。例如想把A、B、C列合并到D列中,操作方法如下:</span>
<span style="color:#0000ff">1、只需要在D1单元格中输入公式:=A1&B1&C1 即可; </span>
<span style="color:#0000ff">2、再次选中D1单元格,移动鼠标,当鼠标形状变成黑色实心十字时(即利用“填充柄”将上述公式复制到D列下面的单元格中),然后按住鼠标左键向下拖动,这样A、B、C列的内容即被合并到D列对应的单元格中。 </span>
<span style="color:#0000ff">3、选中D列,执行“复制”操作,然后再次选中D列,执行“编辑→选择性粘贴”命令,打开“选择性粘贴”对话框,选中其中的“数值”选项,按下“确定”按钮,D列的内容就是合并后的结果,而不是公式。</span>
<span style="color:#0000ff">另外,如果希望在合并文本之间添加空格或者中划线(-),请键入 &” “&或者&”-“&。第一步就需要改成 =A1&”-“&B1&”-“&C1。</span>
<span style="color:#ff0000">Excel批量去掉超链接</span>
<span style="color:#0000ff">选择要去掉链接的数据,Ctrl+c 然后按回车键</span>
<span style="color:#ff0000">怎样将Excel中的科学计数法数值转换成文本字符格式,怎样在Excel中禁用科学计数法?</span>
<span style="color:#0000ff">在EXCEL中,输入超过11位数字时,会自动转为科学计数的方式,比如:123456789012345,输入后就变成了:1.23457E14,要解决的方法有很多种,现在为大家说几种比较简单快速的方法:
1、在A1单元输入号码时,在前面先输入单引号’(英文状态下),就是:’123456789012345,这样单元格会默认为该单元为文本方式,会完整显示出15个号码来,而不会显示那令人讨厌的科学计数方式来了。2、如果已经输入了大量的号码,全部以科学计数显示的话,而又懒的按照上面的方法一个一个的重新输入的话,也有这个好方法,比如已在单元A1:A100输入了号码,按以下步骤做:选择单元A1:A100—>单击鼠标右键—>设置单元格式—>选择自定义,在‘类型’中输入0即可,轻松搞定!
3、还有一种用函数来解决的方法:在A1:A100已经输入大量的号码时,在B1单元中输入:=trim(a1)。输完后,B1单元也是显示出完整的15位数字了。</span>
Excel打印的时候都带着首行
Word来清除中文字符
<span style="color:#0000ff">删除英文方法:
按ctrl+H查找替换就可以了!在查找内容中输入^$替换为^p,点“全部替换”,这时所有的英文都会被删除了,并且会自动换行出来!
删除汉字和中文标点:
同上在查找内容输入“[!^1-^127]”(输入引号之间的内容,这表示所有非西文字符,即所有汉字和中文标点符号)。替换内容什么也不要输入,点全部替换。</span>
<span style="color:#0000ff">删除汉字:</span><span style="color:#0000ff">
用Ctrl+H打开查找和替换,高级选项里的“使用通配符”要记得选上。
输入查找内容“[一-龥]”(输入引号之间的内容,这表示所有的中文汉字),
替换内容什么也不要输入,即删除所有查找内容。
删除汉字和中文标点:
同上在查找内容输入“[!^1-^127]”(输入引号之间的内容,这表示所有非西文字符,即所有汉字和中文标点符号),这个就有点正则表达式的意思了。
替换内容什么也不要输入。
请用查找替换法,在钩选通配符下:
[^1-^127] 所有西文
[!^1-^127] 所有西文以外字符
Word小技巧:仅删除文件里的中文或英文
如果我们在一份混杂着全角与半角的中英文、数字和符号的文件中,只想单独删除里头的英文字或中文字时,除了一个字一个字删除之外,有什么比较快速简便的方法吗?
1.首先开启我们想处理的文件,其中包含全角与半角的中英文、数字和符号,并点选菜单【编辑】→【取代】。
※[ ]里的「^1-^127」表示ASCII字码的编号1至127,其中编号48~57代表数字「0~9」,65~90代表大写英文字母「A~Z」,97~122代表小写英文字母「a~z」。
2.在「寻找及取代」对话盒中的「寻找目标」输入「[^1-^127]」,接着点选〔更多〕后,勾选「使用万用字符」,并按下〔全部取代〕。
3.此时可以看到文件中所有半角的英文字、数字及符号,全都删除掉了。
※由于中文字都是全角,没有半角的,因此不会受影响。
4.不存盘关闭档案并重新开启后,这次在「寻找及取代」对话盒中的「寻找目标」
输入「[!^1-^127]」,并在点选〔更多〕后勾选「使用万用字符」,按下〔全部取代〕。
5.可以发现这次是把全角的中英文、数字及符号,全都删除掉,只剩下半角的部分。</span>
Word 格式刷连续刷
<pre accuse="aContent" id="best-content-83714038"><span style="color:#0000ff">双击格式刷就可以连续刷了</span><br></br>
Excel 时间两列 减去一小时
<span style="color:#0000ff"> =D2-C2-TIME(0,60,0) </span>
<span style="color:#0000ff">Excel 如a1表格中包江苏,那么b1表格就设置成同省,否则设定成异地</span>
<span style="color:#0000ff"></span>
<pre accuse="aContent" id="answer-content-532545937"><strong style="color:#ff0000;"><span id="_baidu_bookmark_start_18" style="display: none; line-height: 0px;"></span></strong><span id="_baidu_bookmark_start_20" style="display: none; line-height: 0px;"></span><span style="color:#0000ff">=if(countif(a1,"*江苏*"),"同省","异地")</span><span id="_baidu_bookmark_end_21" style="display: none; line-height: 0px;"></span><strong style="color:#ff0000;"><span id="_baidu_bookmark_end_19" style="display: none; line-height: 0px;"></span></strong><br></br>
Excel 根据日期换算成星期
=TEXT(A1,”aaaa”)
excel 增加 获取汉字首字母的vba
Function getpychar(char)
tmp = 65536 + Asc(char)
If (tmp >= 45217 And tmp <= 45252) Then
getpychar = "a"
ElseIf (tmp >= 45253 And tmp <= 45760) Then
getpychar = "b"
ElseIf (tmp >= 45761 And tmp <= 46317) Then
getpychar = "c"
ElseIf (tmp >= 46318 And tmp <= 46825) Then
getpychar = "d"
ElseIf (tmp >= 46826 And tmp <= 47009) Then
getpychar = "e"
ElseIf (tmp >= 47010 And tmp <= 47296) Then
getpychar = "f"
ElseIf (tmp >= 47297 And tmp <= 47613) Then
getpychar = "g"
ElseIf (tmp >= 47614 And tmp <= 48118) Then
getpychar = "h"
ElseIf (tmp >= 48119 And tmp <= 49061) Then
getpychar = "j"
ElseIf (tmp >= 49062 And tmp <= 49323) Then
getpychar = "k"
ElseIf (tmp >= 49324 And tmp <= 49895) Then
getpychar = "l"
ElseIf (tmp >= 49896 And tmp <= 50370) Then
getpychar = "m"
ElseIf (tmp >= 50371 And tmp <= 50613) Then
getpychar = "n"
ElseIf (tmp >= 50614 And tmp <= 50621) Then
getpychar = "o"
ElseIf (tmp >= 50622 And tmp <= 50905) Then
getpychar = "p"
ElseIf (tmp >= 50906 And tmp <= 51386) Then
getpychar = "q"
ElseIf (tmp >= 51387 And tmp <= 51445) Then
getpychar = "r"
ElseIf (tmp >= 51446 And tmp <= 52217) Then
getpychar = "s"
ElseIf (tmp >= 52218 And tmp <= 52697) Then
getpychar = "t"
ElseIf (tmp >= 52698 And tmp <= 52979) Then
getpychar = "w"
ElseIf (tmp >= 52980 And tmp <= 53640) Then
getpychar = "x"
ElseIf (tmp >= 53679 And tmp <= 54480) Then
getpychar = "y"
ElseIf (tmp >= 54481 And tmp <= 62289) Then
getpychar = "z"
Else '如果不是中文,则不处理
getpychar = char
End If
End Function
'逐个取ASC码
Function getpy(str)
For i = 1 To Len(str)
getpy = getpy & getpychar(Mid(str, i, 1))
Next i
End Function
批量删除除sheet1以外的sheet工作表格
Sub delete_sheet()
Application.DisplayAlerts = False
Dim i As Integer
For i = Sheets.Count To 1 Step -1
Debug.Print Sheets(i).Name
If Sheets(i).Name <> "sheet1" Then
Sheets(i).Delete
End If
Next
Application.DisplayAlerts = True
End Sub
目录 返回
首页