推荐阅读
excel 取最大值函数的实际行业应用 excel最大值函数max、large的使用
excel最大值函数常见的有两个,分别是Max函数和Large函数。下面我们直接使用案例来理解excel取最大值操作。excel取最大值函数应用实例一:
excel2007怎么画图
在Excel中录入好数据以后经常需要统计数据,而数据统计的时候通常需要用到图表的功能进行辅助,那么怎样利用Excel2007画图呢?下面给大家分享excel2007画图的方法,欢迎大家来到学习。 excel2007画图的方法 1:打开一个excel表格,点击插入,如图: 2: 打开后你会看到各种形状的图形,你想用哪种图来表示就点哪个。如图 3:找到你想要统计绘图的数据,用鼠标选定,如图, 4:点击你想用的图的形状,如图 5:点击下拉菜单中的图形形状,这样很容易就会画出你的数据图形了。如图 6:这只是以一种图形为例,其它的一样,这里就不再一一介绍了希望对大家有点作用。如图想删除这个图形只要点击鼠标的右键就会看到以下图形。 再点击删除就可以了。 7:也可以在原图表上更改图形的形状,点击鼠标右键,如图:点击键头所指的地方, 8:在下图你可以随时更换图形的形状,很方便的。想到哪种图形,只要点击左边的导航就可以了。
word2013中如何使用查找和替换
查找和替换解决了批量修改word内容的问题,提高了效率,在word2013中,一些人不知道怎样进行查找和替换,快速修改word内容内,那么下面就由小编为您分享下word2013中查找和替换的技巧,希望能帮助您。。 查找和替换步骤一:最常用的方式是,从菜单栏点击相关按钮进行操作。打开需要查找和替换的文档。这里以将“.”替换为“、”为例。 查找和替换步骤二:在菜单栏中,点击“开始”,然后在开始的常用工具中,点击“编辑”下面的倒三角形。 查找和替换步骤三:请看这里,被替换为新的内容了。 查找和替换步骤四:很快就替换完所有需要替换的内容。 查找和替换步骤五:调查更多的查找选项,勾上需要的选项,然后按照第四步操作即可。这里是替换,一次性替换全部,点击“全部替换”。 查找和替换步骤六:调出编辑菜单,点击“替换”选项。 查找和替换步骤七:调出了编辑选项卡,在“查找内容”中输入需要查找的内容“.”;在“替换为”中输入需要替换的内容“、”。如果只是查找不替换,在“替换为”中不输入内容,点击“查找下一处”,就可以找到需要查看的内容,也可以直接点击上方的“查找”进行查找。如果需要更多的查找选项,点击“更多”。看了“word2013中如何使用查找和替换”此文的人还看了:1.Word2013怎么查找和替换文本
excel2010绘图工具栏不见了怎么办
不少朋友在使用excel2010的时候发现绘图工具栏不见了,这该怎么办?如何找回呢?下面小编就来教你找回绘图工具栏。希望对你有帮助! excel2010显示绘图工具栏的步骤 插入图形、艺术字等是绘图工具栏最常用的功能,这些命令被集中在excel2010的插入选项卡中。如下图所示。excel2010显示绘图工具栏的步骤图1 编辑图片时需要调整线的颜色、粗线、形状。原来它们躲在“绘图工具”选项卡中,只是你只有选中插入的图片,这个选项卡才会出现。excel2010显示绘图工具栏的步骤图2 当插入多个图形时,需要对它们进行对齐等操作,这些命令依旧在“绘图工具”选项卡中。excel2010显示绘图工具栏的步骤图3 在绘图工具栏中还有一个命令:改变自选图形。通过它我们可以把单元格中的批注也设置成其他样式。但在默认的功能区们,我们找不到这个命令,它被excel2010雪藏了起来。excel2010显示绘图工具栏的步骤图4
最新发布
excel在VBA中使用非连续区域
如果要在VBA中使用非连续区域,可以用类似Range("A1, B2, C3:D10")的语句,如下例:Sub NonContiguousRange()Dim oRng As RangeSet oRng = Range("A1, B2, C3:D10")oRng.Value = 100oRng.Interior.ColorIndex = 2End Sub上述代码设置非连续区域A1、B2、C3:D10的值为100,同时设置非连续区域的背景颜色为粉红。
excel利用自定义函数提取单元格中的批注
用下面的自定义函数可以将某个单元格中的批注提取到其他单元格中,方法如下:1.按Alt+F11打开VBA编辑器,单击菜单“插入→模块”,在“工程”窗口中会看到Excel插入了一个名称为“模块1”的模块。2.在右侧“模块1”的代码窗口中输入下列代码:Function GetComment(rCell As Range)Application.Volatile ‘将自定义函数标记为易失性函数Dim Cmt As StringOn Error Resume NextCmt = rCell.Comment.TextGetComment = Right(Cmt, Len(Cmt) – InStr(1, Cmt, ":", vbTextCompare))On Error GoTo 0End Function3.关闭VBA编辑器,返回到Excel界面。假如要提取A10单元格中的批注,则在其他单元格中输入公式:=GetComment(A10)回车后即可得到A10单元格中的批注内容,注意本自定义函数仅提取批注内容,而不包含批注作者。由于将自定义函数标记为易失性函数,如果A10单元格中的批注被修改,按F9键或当任意单元格进行计算时即可得到修改后的批注内容。
如何在Excel工作表中添加最后保存时间
有时我们在Excel中制作的工作表需要反复修改,并保存为多个版本。修改的次数多了,很容易混淆。如果能把工作簿的最后保存日期和时间显示在工作表的某个单元格或页眉页脚中,查看起来就非常方便了。用VBA代码就能够轻松地实现这一点,方法如下:1.按Alt+F11,打开VBA编辑器。2.在“工程”窗口中,双击“ThisWorkBook”,在右侧的代码窗口中输入下列代码:Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)ActiveSheet.Range("G3").Value = Format(Now, "yyyy年m月d日 hh:mm:ss")End Sub说明:上述代码将工作簿保存的日期和时间保存在活动工作表的“G3”单元格中,需根据实际进行修改。如果要将保存的时间放到页眉或页脚中,可以改为类似下面的代码,下例中将工作簿的保存日期和时间放到页脚右侧:Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)ActiveSheet.PageSetup.RightFooter = "修改时间:" & Format(Now, "yyyy年m月d日 hh:mm:ss")End Sub3.关闭VBA编辑器,回到Excel界面中。以后每次单击工具栏中的“保存”按钮,G3单元格或页眉页脚中就会显示当前保存的日期和时间。
利用VBA创建新的工作簿
如果要用VBA创建新的工作簿,可以使用Add方法,如下面的代码。Excel自动将该工作簿命名为“BookN”,其中“N”是下一个可用的数字,同时新工作簿将成为活动工作簿。Sub AddOne()Workbooks.AddEnd Sub另外,创建新工作簿更好的方法是将其分配给一个对象变量。例如下例中,由Add方法返回的Workbook对象分配给了对象变量“NewBook”。然后,又设置了“NewBook ”的若干属性。Sub AddNew()Set NewBook = Workbooks.AddWith NewBook.Title = "图书销售目录一览表".Subject = "图书销售"End WithEnd Sub“Title”和“Subject”分别为工作簿的“标题”和“主题”属性,可以在工作簿属性的“摘要”选项卡中查看。下面的代码不仅创建了一个新工作簿的同时,还在工作簿中的第一个工作表前插入了一个名为“计算机类”的工作表,并将该工作表中的B2单元格赋值为“销售数量”。Sub CreateNewWorkBook()Dim WBook As Workbook, WSheet As WorksheetSet WBook = Workbooks.AddSet WSheet = WBook.Worksheets.AddWSheet.Name = "计算机类"WSheet.Range("B2").Value = "销售数量"End Sub
excel实现按指定的单元格颜色进行计数或求和实例教程
如果Excel工作表的某区域中包含不同的底纹颜色,我们可以用一个自定义函数对该区域按指定的单元格颜色进行计数或求和。方法是:1.按Alt+F11,打开VBA编辑器。2.单击菜单“插入→模块”,将插入名称为“模块1”的模块,在右侧的代码窗口中输入下列代码:Function SumByColor(Ref_color As Range, Sum_range As Range)Application.VolatileDim iCol As IntegerDim rCell As RangeiCol = Ref_color.Interior.ColorIndexFor Each rCell In Sum_rangeIf iCol = rCell.Interior.ColorIndex ThenSumByColor = SumByColor + rCell.ValueEnd IfNext rCellEnd FunctionFunction CountByColor(Ref_color As Range, CountRange As Range)Application.VolatileDim iCol As IntegerDim rCell As RangeiCol = Ref_color.Interior.ColorIndexFor Each rCell In CountRangeIf iCol = rCell.Interior.ColorIndex ThenCountByColor = CountByColor + 1End IfNext rCellEnd Function上述两个自定义函数,一个是SumByColor,可以对区域按指定单元格的颜色求和。另一个是CountByColor,可以统计区域中某种颜色的个数。这两个自定义函数都有两个参数,前一个参数指定包含某种颜色的单元格,后一个参数为求和或计数区域。3.关闭VBA编辑器。使用方法:假如要求和或计数的区域在A1:B10区域中。
excel VBA同时选择多个工作表的方法
如果要用VBA同时选择多个工作表,可以利用数组或设置“Select”方法的参数为“False”来扩展所选择的内容,如下面的一些代码:1.用工作表名称:假如工作表名称为“Sheet1”、“Sheet2”、“Sheet3”,同时选择这3个工作表:Sub SelectMultiSheets()Sheets(Array("Sheet3", "Sheet2", "Sheet1")).SelectEnd Sub2.用工作表索引号:索引号是分配给工作表的连续数字,同一类型的工作表在工作簿中按照从左到右的顺序,依次为1、2、3……。下面的代码同时选择第1个和第3个工作表:Sub SelectMultiSheets1()Worksheets(Array(3, 1)).SelectEnd Sub3.选择所有工作表:如果工作簿中不包含图表工作表、对话框工作表,下面的代码可以同时选择所有的工作表:Sub SelectAllSheets()Dim ws As WorksheetFor Each ws In ActiveWorkbook.Sheetsws.Select FalseNext wsEnd Sub
利用VBA禁用Excel中的F1键
如果在使用Excel过程中习惯使用F2键切换到单元格编辑状态,有时可能会不小心错按了F1键而弹出Excel帮助窗口,特别是对于键盘较小的笔记本这种情况就更容易出现。如果是Excel 2007/2010,Excel帮助窗口会覆盖工作表窗口,显得有些不便。如果要禁用F1键,可以用下面的VBA代码。在Excel中按快捷键Alt+F11,打开VBA编辑器,按Ctrl+G打开“立即”窗口,在其中输入下面的代码并按回车键:Application.OnKey "{F1}", ""这样就禁用了F1键的功能。重启Excel或用下面的代码即可恢复F1键正常功能:Application.OnKey "{F1}"但上述方法不能在每次启动Excel时都起作用。如果要每次启动Excel后都禁用F1键的功能,可以用多种方法来实现,本文以Excel 2007为例介绍两种方法:方法一:用加载宏对话框1.新建一个工作簿,打开VBA编辑器,在“工程”窗口中双击选择“ThisWorkbook”,在右侧的代码窗口中输入下列代码:Private Sub Workbook_Open()Application.OnKey "{F1}", ""End Sub2.单击“保存”按钮,将工作簿另存为“Excel 97-2003加载宏(*.xla)”格式,如名称为“禁用F1键.xla”。Excel会自动将该文件保存到“AddIns”文件夹中。
excel自定义一个具有Like运算符功能的工作表函数
我们知道VBA中的Like运算符是用来比较两个字符串的,其语法为:result = string Like pattern如果string与pattern匹配,则result为True,如果不匹配,则result为False。Like运算符的比较方式比较灵活,除了可以使用通配符外,pattern中还可以使用中括号“[ ]”。在中括号“[ ]”中,可以用由一个或多个字符组成的组与 string 中的任一字符进行匹配。虽然用COUNTIF工作表函数可以实现类似的比较功能,但COUNTIF函数不支持中括号。为此,我们可以创建一个自定义函数来实现类似Like运算符的功能,使用起来非常方便。方法如下:按Alt+F11,打开VBA编辑器,单击菜单“插入→模块”,将下列代码输入到代码窗口中:Public Function IsLike(sText As String, _sPattern As String) As BooleanIsLike = IIf(sText Like sPattern, True, False)End FunctionIsLike有2个字符串参数:sText和sPattern,sText类似于Like运算符的String, sPattern类似于Like运算符的pattern。其使用方法为:=islike(sText,sPattern)如果sText与sPattern匹配,则返回TRUE,否则FALSE。例如下面的公式:=islike("EXCEL技巧天地","E*")该公式检测“EXCEL技巧天地”字符串是否已字母“E”开头,结果返回TRUE。又如:
excel打开工作簿时总是打开指定的工作表
通常在保存Excel工作簿时,如果某个工作表处于活动状态,下次打开这个工作簿时就会自动打开这个工作表。如果我们需要每次打开工作簿时总是打开指定的工作表,而无论保存时哪个工作表处于活动状态,可以用下面一个简单的VBA代码来实现:Private Sub Workbook_Open()Sheet3.ActivateEnd Sub按Alt+F11,打开VBA编辑器,在工程窗口中双击当前Excel文件名中的“ThisWorkBook”,在右侧的代码窗口中输入上述代码并保存,如图。 这样,每次打开工作簿时,Excel将自动打开“Sheet3”所对应的工作表,需要说明的是,这里的“Sheet3”不是工作表名称,而是工程窗口中的对象名称“Sheet3”,它对应的工作表名称是“汇总表”。当在Excel中更改工作表名称时,不会影响代码的运行,仍然会打开对象“Sheet3”对应的工作表。如果需要在代码中指定每次打开的工作表名称,可以用下面的代码:Private Sub Workbook_Open()Sheets("汇总表").SelectEnd Sub
excel用自定义函数获取单元格注释
我们可以用一个自定义函数来提取单元格注释。方法如下:1.按Alt+F11,打开VBA编辑器。2.单击菜单“插入→模块”,在右边的代码窗口中输入代码:Function GetCommentText(rCommentCell As Range)Dim strGotIt As StringOn Error Resume NextstrGotIt = WorksheetFunction.Clean(rCommentCell.Comment.Text)GetCommentText = strGotItOn Error GoTo 0End Function3.关闭VBA编辑器。在单元格中输入公式:=GetCommentText(B4)将在当前单元格中返回B4单元格中的注释。