推荐阅读
Word如何输入省略号_Word中省略号的三种打法
省略号是日常使用频率较高的几种符号之一，本文总结了word中省略号三种打法。将电脑的输入法切换至中文状态，然后输入快捷键『Shift+6』，即可输出省略号。将电脑的输入法切换至搜狗拼音输入法，然后在键盘中输入『slh』，输入法拼写结果中就会出现省略号了。点击word界面的『插入』功能菜单，然后点击『符号』功能，弹出『插入特殊符号』对话框后，在『标点符号』栏中就可以找到省略号了（此省略号是3个点，需要插入2个省略号）。
word 怎样在论文首页添加脚注，输入作者详细资料
写论文投稿时，一般要求在论文首页添加脚注，以便输入作者的详细信息。那怎样操作呢？下面给大家简单的介绍一下操作步骤第一步：把光标定位在要插入尾注的位置第一步：点击【引用】选项卡 第二步：点击【插入脚注】选项 第三步：输入尾注信息
WPS2016热点令人头痛 如何永久删除它
许多人喜欢使用wps办公软件，但他们对WPS热点不知疲倦的弹出感到头痛，他们不能通过各种方法完全关闭它。 事实上，为了完全防止WPS热点的出现，我们必须关闭订阅，但是这个功能隐藏得很深，不容易被发现。 以下是取消订阅wps热点的方法，这样每个人都可以永远告别被打扰的日子，安心使用WPS办公室。 1.启动——程序——工作站——工作站工具——配置工具，并打开配置工具，如下所示： 2.点击“高级”选项进入该页签，然后点击“其他选项”，如图： 3.清除所有三个复选框，确认并退出。嗯，恼人的事情已经解决了
工程常用的12个Excel技巧
1.工程量计算公式快捷地得出计算结果在很多情况下，造价人员在计算工程量时，需要列出及保留工程量的计算公式和计算备注，以方便后期的对账。如何在输入计算式和计算备注后，就能很方便地得出工程量计算结果呢？实用案例列述如下：首先，需选中显示计算结果的单元格E2(可以理解为定位作用)，然后再按以下动态图演示：在此，解释一下这个公式“=EVALUATE(SUBSTITUTE(SUBSTITUTE(Sheet3!D2,”[“,”*ISTEXT(“”[“),”]”,”]””)”))”的注意点：除公式中的黄色标识“Sheet3!D2”的参数需要自行修改外，其他复制即可。其中Sheet3是标签名，D2是计算书所在单元格位置。切记：上述计算书备注须用英文格式中括号”[“”]”。使用此函数的Excel的文件需以（*.XLSM）格式进行保存，否则下次重新打开表格，该函数无法实现（及需重新定义该函数）。2.Datedif函数计算工期及租赁天数在大家在计算工程工期或周转性材料租赁期时，是否为每个月的31日或30日所困扰？可能会用扳手指或翻日历的笨方法计算两个日期的相隔天数？其实Datedif函数就可以帮你很轻松解决。实用案例如下：笔者先简单解释下以下表格中的单元格D2输入的公式“=DATEDIF（B2，C2，”d”）“前两个参数分别是开始日期和结束日期，第三个参数”d”是计算天数的参数，也可以改成”m”(计算月份)和”y”(计算年份)。
最新发布
Excel vba给所有的工作表自动批量加页码，会计的有福啦
今天来分享一段有用而简单的excel编程代码。目的就是这个工作簿所有的工作表自动批量加页码。会计亲们有福啦。我们按快捷键alt+F11，进入vba的编辑器里。点插入模块。然后在这输入以下代码Sub 加页码() Dim i%For i = 1 To Sheets.Count ‘表示工作表数量Sheets(i).Range("d1") = i ‘固定在i1添加页码，i1代表你要的单元格位置。NextEnd Sub效果就是Excel vba给所有的工作表自动批量加页码，会计的有福啦
Excel Vba正数数字批量换成文字
今天拿到了一个比较棘手的难题，把数字全部换成正数这两个字。我最早用了定位，但定位只能是数字而不能正数。我又写了定义对象大于0，后来发现居然字母都被换掉了，这显然不是我要的。后来问了一个朋友原来也还要写段代码进行是不是数字的判断。最后的结果是Sub ee()Dim rng As RangeFor Each rng In Range("a1:d8") ‘foreach的用法If IsNumeric(rng) And rng.Value > 0 Then ‘判断是不是数字类型,还有是不是>0rng.Value = "正数" ‘把正数赋给所有的对象End IfNextEnd Sub
如何删除excel中隐藏的名称
一些Excel宏和加载宏可以坐成隐含的名称，这些名称存在于某个工作簿中，但是并不出现在“定义名称”对话框中。例如， Solver加载宏生成了许多隐含的名称。通常，可以忽略掉这些隐含的名称。 然而，有时候这些隐含的名称会引起问题。假如将一个工作表复制到另一个工作簿中，隐含的名称也同样被复制，并且它们可能产生很难跟踪的链接。 可以使用下列一段VBA程序删除工作簿中的所有隐含的名称： Sub DeleteHiddenNames() Dim n As Name Dim Count As Integer For Each n in ActiveWorkbook.Names If Not n.Visible Then n.DeleteCount=Count+1End IfNext nMsgBox Count & "hidden names were deleted."End Sub
Excel中vba宏代码合并单元格的方法
文章介绍excel中用vba宏代码来进行合并单元格的操作过程，以及用VBA宏代码语句判断单元格是否为合并单元格。 以前的文章介绍excel合并单元格多是基础操作，本文介绍关于excel合并单元格宏VBA代码方面的应用。第一，用VBA宏判断excel合并单元格 在excel中按下ALT+F11，打开VBE编辑器，复制下面代码，按F5键运行，如果A1单元格为合并单元格，则弹出消息框提示此单元格为合并单元格，如果A1单元格没有合并，消息框提示此单元格不是合并单元格。Sub excel合并单元格宏()If Range("A1").MergeCells ThenMsgBox "此单元格为合并单元格"ElseMsgBox "此单元格不是合并单元格"End IfEnd Sub 第二，用宏VBA代码来进行合并单元格 用上面介绍的方法，复制下面这段代码，运行的结果是：当我们在输入框输入一个行号，然后excel会自动合并A1到输入行号的单元格区域。比如我们输入8，excel则合并A1：A8单元格区域。Sub合并单元格宏()Dim x1 As Longx1 = InputBox("请输入行号：")Sheets("sheet1").Range("a1:a" & x1).MergeEnd Sub 又比如下面这段宏VBA代码可以实现C6:F10单元格区域合并。
Excel vba删除工作表的代码和实例
文章介绍excel中vba删除工作表的方法，并通过两个案例来具体理解vba代码。 上一篇文章我们介绍了使用excel的基础操作来删除工作表。本文给大家分享vba删除工作表的代码写法。vba删除工作表案例一：删除一张表以外的所有工作表 如下图所示：这一个excel工作薄包含多张工作表，如何使用vba删除 “IT部落窝论坛”以外的工作表呢？右边截图就是使用VBA代码删除后的效果，整个工作薄就只剩下一张工作表：IT部落窝论坛。 下面是具体的vba删除工作表操作步骤： 第一，按下ALT+F11，打开VBE编辑器。 第二，单击菜单：插入——模块，插入一个模块，并复制下面的代码到代码输入区：Sub vba删除工作表()Application.DisplayAlerts = FalseDim sht As ObjectFor Each sht In ThisWorkbook.WorksheetsIf sht.Name <> "IT部落窝论坛" Thensht.DeleteEnd IfNextApplication.DisplayAlerts = TrueEnd Sub
Excel启用宏的详细说明
Visual Basic for Applications（VBA）是Visual Basic的一种宏语言，主要能用来扩展Windows的应用程式功能，特别是Microsoft Office软件，其中包括Excel、PPT、Word、Outlook等。使用Excel的VBA开发的Excel文档，在Excel中运行时需要开启Excel的宏功能，否则此文档的VBA自动化功能将被完全屏蔽，文档的功能无法实现。因此，在打开这些Excel程序文件之前，您需要先对您的Excel宏安全性进行设置（设置永久有效，在同一台电脑上无需再次设置）在Excel2003版本中，可以依以下步骤操作：1，在Excel的菜单栏上依次单击“工具”——“宏”——“安全性”，打开下图所示的“安全性”对话框，2，在“安全级”选项卡中将宏的安全级别设置为“中”或“低”。其中推荐使用“中”级，这样的设置并不会降低您的安全性，您仍然对任意一个宏文件都拥有主动选择是否运行的权力。 在宏的安全性级别设置成功后，再次打开Excel程序文件时，会出现下图所示信息框，此时点击“启用宏”按钮即可使本程序正常运行：在Excel2007/2010版本中，可以依以下步骤操作：1，依次单击Excel的Office按钮（2010版本为“文件”按钮）——“Excel选项”，打开下图所示的“Excel选项”选项卡，在左侧列表中选择“信任中心”，在右侧出现的窗口中点击“信任中心设置”按钮，
Excel定位最后一行的四种方法
文章总结excel定位最后一行的多种方法，使用技巧、快捷键、VBA代码来定位到最后一行。 如果在excel工作表中数据很多，需要快速定位最后一行，有什么可以实现呢？ 比如EXCEL可用的表格有65536行，实际有6000多行是填充了数据的，如何快速定位最后一行。第一，使用技巧完成 按下快捷键：ctrl +↓，或者Ctrl+end，以及双击选取单元格之下框线（对不连续区域不适用）。 另外，在最后一行双击又可以定位到第一行。双击单元格的中间可以编辑单元格，双击单元格右下角可以进行填充。第二，使用VBA代码完成 下面这段代码能定位选择最后一行：Sub 定位最后一行()Range("a65536").End(xlUp).EntireRow.SelectEnd Sub 如果需要定位选择最后一行数据行的下一行，可以使用下面的代码：
excel VBA批量更改数据透视表数据字段值汇总方式
如果需要更改Excel数据透视表数值区域中字段的值汇总方式，在字段较多的情况下，手动逐一更改显得有些繁琐。用下面的VBA代码可快速批量更改全部数据字段的值汇总方式。例如要将当前工作表中第一个数据透视表的所有数据字段值汇总方式改为“求和”，方法如下： 按Alt+F11，打开VBA编辑器，在代码窗口中粘贴下列代码：Sub SumDataFields()Dim ptField As PivotFieldFor Each ptField In ActiveSheet.PivotTables(1).DataFieldsWith ptField.Function = xlSum.Caption = "求和项:" & .SourceNameEnd WithNextEnd Sub关闭VBA编辑器，返回Excel工作表界面，按Alt+F8，打开“宏”对话框，选择“SumDataFields”宏执行即可。
excel利用自定义函数获取工作表名称
有时需要在工作表中引用同一工作簿中其他工作表名称，当工作表数量较多时，逐一手工输入有些繁琐，这时可以添加一个自定义函数来快速获取工作表名称，方法如下：按Alt+F11，打开VBA编辑器，单击菜单“插入→模块”，在代码窗口中输入下列代码：Function GetSheetName(idx As Integer, Optional relative_position As Boolean) As StringApplication.VolatileGetSheetName = Sheets(IIf(relative_position, ActiveSheet.index – -idx, idx)).NameEnd Function上述代码定义了一个自定义函数GetSheetName，有两个参数：“idx”为工作表的索引号，“relative_position ”为逻辑型可选参数。“relative_position ”参数为“0”或省略时表示按工作表的绝对位置来获取工作表名称，其取值范围为“1,2,3，……”，当“idx”取这些值时依次获取工作簿中从左到右的第1,2,3，……个工作表的名称；该参数为真时按相对位置来获取工作表名称，即“idx”参数为“0”时取得当前工作表名称，为“-1”时取得其左侧第一个工作表名称，为“1”时取得其右侧第一个工作表名称。示例：取得第一个工作表的名称：=getsheetname(ROW(A1))向下拖到填充柄填充公式即可依次取得各工作表名称。在G11单元格取得当前工作表的名称：=getsheetname(ROW()-11,1)
Excel中vba变量类型小结
本文对excel中vba变量类型和dim语句进行一些小结。 EXCEL VBA中，如何判断数据类型？使用变量的第一步是了解变量的数据类型。变量的数据类型控制变量允许保存何种类型的数据。 下面这个表列出了VBA支持的数据类型，以及各种数据类型的变量所需要的存储空间和能够存储的数值范围。 作为我们编写代码，为了做到效率，一个目标是选择需要存储空间尽可能小的数据类型来保存需要存储的数据。例如，如果要保存诸如班级学生总数这样的小数字，那么Byte数据类型就OK。这种情况，使用Single数据类型只是对计算机存储空间的浪费。 使用Dim语句创建变量 对变量可以使用的数据类型已经熟悉了，就可以创建变量。创建变量可以使用Dim语句，创建变量通常称为声明变量。 Dim语句的基本语法：Dim变量名As数据类型 Dim sName As String：申明sName变量为字符串类型。 如果在语句中没有提供数据类型，变量将被指定为Variant类型，因为VBA中默认的数据类型是Variant。 必须指定数据类型的第一个原因是，Variant数据类型占用的存储空间较大，即使没有给Variant类型的变量赋值，它也要占用16个字节或者22个字节。第二个原因是，Variant数据类型将影响应用程序的性能。VBA必须辨认Variant类型的变量中存储了何种类型的数据。