excel常用函数
excel利用自定义函数获取多个单元格中相同的字符
要在Excel中获取区域内各单元格字符串中的相同字符，可用下面的自定义函数。例如要在D1单元格获取A1:C1区域各单元格中相同的字符，如图： 按Alt+F11，打开VBA编辑器，单击菜单“插入→模块”，在代码窗口中输入自定义函数：Function GetDupChars(rRng As Range) As String Application.Volatile Dim i As Integer, j As Integer, k As Integer Dim Str As String Str = rRng.Item(1).Text For i = 1 To Len(Str) k = 0 For j = 2 To rRng.Cells.Count If InStr(rRng.Item(j).Text, Mid(Str, i, 1)) Then k = k + 1 Next If k = j - 2 And InStr(GetDupChars, Mid(Str, i, 1)) = 0 _ Then GetDupChars = GetDupChars & Mid(Str, i, 1) Next End Function 然后关闭VBA编辑器，在D1单元格中输入公式即可： =GetDupChars(A1:C1)
excel VBA同时选择多个工作表的方法
如果要用VBA同时选择多个工作表，可以利用数组或设置“Select”方法的参数为“False”来扩展所选择的内容，如下面的一些代码：1.用工作表名称：假如工作表名称为“Sheet1”、“Sheet2”、“Sheet3”，同时选择这3个工作表：Sub SelectMultiSheets() Sheets(Array("Sheet3", "Sheet2", "Sheet1")).Select End Sub2.用工作表索引号：索引号是分配给工作表的连续数字，同一类型的工作表在工作簿中按照从左到右的顺序，依次为1、2、3……。下面的代码同时选择第1个和第3个工作表：Sub SelectMultiSheets1() Worksheets(Array(3, 1)).Select End Sub3.选择所有工作表：如果工作簿中不包含图表工作表、对话框工作表，下面的代码可以同时选择所有的工作表：Sub SelectAllSheets() Dim ws As Worksheet For Each ws In ActiveWorkbook.Sheets ws.Select False Next ws End Sub
excel 中ROW(ROWS)、COLUMN(COLUMNS)函数用法进行小结，ROW和COLUMN一般作为其余函数的参数使用，解决生成自然数的问题
第一：基础用法 column()函数是返回所在的列标，如column(A1)=1，column(B3)=2，column(K21)=11 Row()函数是返回所在的行标，如Row(A5)=5，Row(C21)=21 columns()函数是返回所引用区域的列数，如columns(A4:C8)=3，columns(B4:C8)=2，columns(A4:G8)=7 Rows()函数是返回所引用区域的行数，如Rows(A4:C8)=5，Rows(A2:C21)=20第二：另类用法： 比如经常看到公式里有ROW(1:1)，COLUMN(A:A)之类的，为什么要这么用呢？最主要是用以在复制公式时产生一个单步等差序列。 比如：=ROW(1:1)，返回1，当公式向下复制时，会变成=ROW(2:2)，返回2…… 结合SMALL函数，就可以将一组数值从小到大进行排序。下面这个实例就是通过SMALL+ROW排序的小列子。 和row函数一样，=COLUMN(A:A)，当公式向右复制时，会变成=COLUMN(B:B)、COLUMN(C:C)……等。 ROWS($1:1)，下拉，返回的结果是从第1行至当前行的行数，向下复制变为ROWS($1:2)返回2…… 同样的， COLUMNS($A:A)，右拉，返回从A列至当前列的列数，向右复制变为COLUMNS($A:B)返回2…… 总之，ROW和colunms一般是和其余的函数嵌套使用，解决生成自然数的问题。
如何快速显示所有隐藏的Excel工作表
如果Excel工作簿中包含许多隐藏的工作表，要显示隐藏的工作表，通常的方法是单击菜单“格式→工作表→取消隐藏”（Excel 2003）或右击工作表标签，在弹出的快捷菜单中选择“取消隐藏”（Excel 2007/2010）。然后在“取消隐藏”对话框中逐一选择工作表取消其隐藏。但每次只能取消一个工作表的隐藏，当隐藏的工作表数量较多时，逐一这样操作稍显繁琐。实际上，用一行简单的VBA代码即可快速显示工作簿中所有隐藏的工作表。方法是：按Alt+F11，打开VBA编辑器，单击菜单“视图→立即窗口”，或按Ctrl+G，打开“立即窗口”，在其中输入：For Each s in sheets : s.Visible = True : Next然后按回车键运行代码，Excel会将工作簿中所有工作表（包括图表工作表）的“Visible”属性设置为“TRUE”，即显示所有隐藏的工作表。
excel 常用函数汇总
第一类：文本处理函数● Trim函数：作用：除了单词之间的单个空格之外，移除文本中的所有空格。语法：TRIM(text)，Text为必需项，为要移除空格的文本。● Concatenate函数：作用：将两个或多个文本字符串联接为一个字符串。语法：CONCATENATE(text1, [text2], ...)，至少包含一个项目，最多255个项目，最多支持8192个字符，项目可以是文本值、数字、或单元格引用。说明：可以利用连接符&实现相同的功能。● Replace函数：作用： 将特定位置的字符串替换为不同的文本字符。
excel如何快速整理出一个目录工作表
1、用宏3.0取出各工作表的名称，方法： Ctrl+F3出现自定义名称对话框，取名为X，在“引用位置”框中输入： =MID(GET.WORKBOOK(1),FIND("]",GET.WORKBOOK(1))+1,100) 确定 2、用HYPERLINK函数批量插入连接，方法： 在目录工作表(一般为第一个sheet)的A2单元格输入公式： =HYPERLINK("#'"&INDEX(X,ROW())&"'!A1",INDEX(X,ROW())) 将公式向下填充，直到出错为止，目录就生成了。
excel利用VBA删除工作表中的重复行
如果要在Excel中用VBA的方法以根据某列内容删除重复的行，即当某列有重复数据时仅保留一行，可以用下面的VBA代码。假如以A列为参考，工作表的第一行为标题行，数据从第二行开始。方法一：用工作表函数CountIf判断该行是否重复Sub 删除重复行1() Dim i As Long Application.ScreenUpdating = False For i = Range("A65536").End(xlUp).Row To 3 Step -1 If WorksheetFunction.CountIf(Range("A2:A" & i), Cells(i, 1)) > 1 Then Cells(i, 1).EntireRow.delete End If Next Application.ScreenUpdating = True End Sub方法二：先高级筛选，再删除隐藏行Sub 删除重复行2() Dim rCell As Range, rRng As Range, dRng As Range On Error Resume Next Application.ScreenUpdating = False Set rRng = Range("A1:A" & Range("A65536").End(xlUp).Row) rRng.AdvancedFilter Action:=xlFilterInPlace, unique:=True For Each rCell In rRng If rCell.EntireRow.Hidden = True Then If dRng Is Nothing Then Set dRng = rCell.EntireRow Else Set dRng = Application.Union(dRng, rCell.EntireRow) End If End If Next If Not dRng Is Nothing Then dRng.delete ActiveSheet.ShowAllData Application.ScreenUpdating = True End Sub
Excel 常用函数的功能与应用
1、AND函数 功能： 返回逻辑值：如果所有参数值均为逻辑“真(TRUE)”，则返回逻辑“真(TRUE)”，反之返回逻辑“假(FALSE)”。 语法：AND(logical1,logical2, ...) 参数表示待测试的条件值或表达式。 应用举例： 在C5单元格输入公式： =AND(A5>=60,B5>=60) 如果C5中返回TRUE，说明A5和B5中的数值均大于等于60，如果返回FALSE，说明A5和B5中的数值至少有一个小于60。 特别提醒：
excel如何颠倒单元格内字符的排列顺序
如果要颠倒某个单元格中字符串的排列顺序，例如将A1单元格中的“ABCDEFG”颠倒顺序排列为“GFEDCBA”，可以用自定义函数来实现，方法如下。1.按Alt+F11，打开VBA编辑器。2.单击菜单“插入→模块”，然后在代码窗口中输入下列代码：Function Reverse(Str As String) Reverse = StrReverse(Str) End Function3.关闭VBA编辑器，返回Excel界面。4.在某个单元格中输入公式：=Reverse(A1)即可得到A1单元格中颠倒顺序后的字符串。
excel如何利用单元格的F5定位，玩转9种样式？
如何批量删除空列？这个案例几乎成为了Excel的必备案例。操作也很简单，利用Excel的定位功能搞定，今天牛闪闪和大家总结一下，Excel中的定位功能的常见用法。 还是老规矩，先搞定上面这个定位操作，利用F5快捷键调出定位功能，然后定位空值即可。请看动图：是不是很简单，我们再来看看定位还有什么高效的用法？ 1.定位公式： 拿到人家的表格，怎么知道那些单元格是由公式算出来的呢？