Excel2013
excel如何统计晚于早上九点到公司的人数？
问题：如何用PPT绘制有“透视感”的曲线时间线？ 解答：如何统计晚于早上九点到公司的人数？ 具体操作方法如下： 如果是要做公司总体考勤分析，利用countif函数直接统计公司所有的迟到员工人次。 在H6单元格输入函数=countif() ,在括号中选择统计区域，E4：E35。这里有个小技巧，可以将光标放在E4单元格，然后按住Ctrl+Shift+向下箭头，批量选中整列数据区域。（下图1处） 在时间区域选好后，输入英文半角的逗号隔开参数，接着输入统计条件>9:00，需要注意的是这个条件要用双引号引起来。（下图2处） 敲击回车后，系统自动算出有4人次迟到。
excel计算从小开始指定位置的数值的SMALL函数
返回数据集中第 k 个最小值。使用此函数可以返回数据集中特定位置上的数值。 语法 SMALL(array,k) Array 为需要找到第 k 个最小值的数组或数字型数据区域。 K 为返回的数据在数组或数据区域里的位置（从小到大）。 说明 • 如果 array 为空，函数 SMALL 返回错误值 #NUM!。 • 如果 k ≤ 0 或 k 超过了数据点个数，函数 SMALL 返回错误值 #NUM!。 • 如果 n 为数组中的数据点个数，则 SMALL(array,1) 等于最小值，SMALL(array,n) 等于最大值。 示例 如果您将示例复制到空白工作表中，可能会更易于理解该示例。
Excel利用拼写检查查找工作表中的单词拼写错误
如果担心工作表中输入的英文词语包含拼写错误，可以使用Excel提供的拼写检查功能来查找包含拼写错误的单词。步骤如下： 1.选择需要进行拼写检查的区域，如果要检查整个工作表，选择某个单元格即可。如果要检查多个工作表，可以用Ctrl键或Shift键选择多个工作表。 2.按F7键开始拼写检查。在Excel 2003中，还可以单击工具栏中的“拼写检查”按钮或单击菜单“工具→拼写检查”。在Excel 2007中，在“审阅”选项卡的“校对”组中，单击“拼写检查”按钮。 3.如果Excel找到一个可能有拼写错误的词语，会弹出“拼写检查”对话框，并在其中列出正确的单词建议修改。 忽略一次：如果检查到的单词没有拼写错误，可单击该按钮跳过该单词的检查。 全部忽略：如果工作表中有多个相同的单词，单击该按钮Excel将不再对该单词进行拼写检查。 添加到词典：如果所检查的单词拼写是正确的，但Excel的词典中却没有包含这个词语，单击该按钮将该单词添加到词典中。以后再进行拼写检查时Excel将不再检查该词语。 更改：按照“建议”下所选择的单词进行更改。 全部更改：如果工作表中有多处包含这种相同的拼写错误，单击该按钮Excel将对所有这种拼写错误自动进行更改。
怎么在excel中画斜线
快速的完成想要的Excel表格，而不仅仅只是靠简单的填写汇总，小编就来和大家分享一下如何在excel中画斜线。在excel中画斜线一般用在工作表中，我们有两种办法可以拿来画斜线。一是设置单元格：选中要画斜线的单元格，右键选择设置单元格格式;选择边框，然后选择斜线，确定即可
excel利用VBA判断工作表是否存在
下面的VBA代码可以判断当前Excel工作簿中的某个工作表是否存在，如果指定的工作表不存在，则以指定的工作表名新建一个工作表，如果指定的工作表已存在，则给出一个提示，并激活该工作表。下例中指定的工作表标签为“一月”，可根据实际进行修改。Sub IsSheetExist() Dim ws As Worksheet Dim sName As String sName = "一月" '指定工作表 On Error Resume Next Set ws = Sheets(sName) If ws Is Nothing Then '指定的工作表不存在 Sheets.Add.Name = sName Else '指定的工作表已存在 MsgBox "“" & sName & "”工作表已存在。" ws.Activate End If End Sub
如何让Excel新建工作表时自动设置为“页面布局”视图
Excel2007：依次单击“Office按钮→Excel选项→常用”，在“新建工作簿时”下方将“新工作表的默认视图”调整为“页面视图”，单击“确定”即可。 Excel2010/2013的设置方法类似，不再赘述。
EXCEL用自定义函数去掉字符串中的数字
如果要去掉某个字符串中的所有数字，例如将一个字符串“Excel123”去掉数字后变为“Excel”，可以用自定义函数来实现。按Alt+F11打开VBA编辑器，单击菜单“插入→模块”，在右侧的代码窗口中输入自定义函数： Function RemoveNums(theString As String) Dim eachChar, Temp As String Dim i As Integer Temp = "" For i = 1 To Len(theString) eachChar = Mid(theString, i, 1) If Asc(eachChar) < 48 Or Asc(eachChar) > 57 Then Temp = Temp & eachChar End If Next RemoveNums = Temp End Function假如包含数字的字符串在A1单元格，在B1单元格中输入=RemoveNums(A1)即可返回一个去掉数字后的字符串，如果字符串全部由数字组成，则返回空字符串。
excel用VBA将文本字符串的首字母变成大写
下面的VBA代码可以将活动工作表中的所有文本字符串的首字母改为大写，对包含公式单元格则不作更改。Sub CapitalizeFirstLetter() Dim Rng As Range ActiveSheet.UsedRange.Select For Each Rng In Selection.Cells If Rng.HasFormula = False Then Rng.Value = Application.WorksheetFunction.Proper(Rng.Value) End If Next Rng End Sub
Excel利用VBA批量添加邮件链接
如果Excel表格中的某个区域有许多文本格式的邮件地址需要添加链接，用手工的方式非常繁琐。可以使用下面的VBA代码来快速添加链接，假设该区域为F2:F18。Sub ConvertToEmail() Dim convertRng As Range Set convertRng = Range("F2:F18") Dim rng As Range For Each rng In convertRng If rng.Value <> "" Then ActiveSheet.Hyperlinks.Add rng, "mailto:" & rng.Value End If Next rng End Sub
excel改变鼠标指针形状的VBA代码
可以通过设置Application.Cursor属性改变鼠标指针形状。如在XP中下面的语句将鼠标指针的形状改变为沙漏状，这种形状的鼠标指针表示系统比较繁忙。Application.Cursor = xlWait改为I型指针：Application.Cursor = xlIBeam 改变鼠标指针形状后，Excel不会自动恢复，用下面的语句恢复默认指针形状：Application.Cursor = xlDefault