Dim strText As String   Dim intLen As Integer   Dim i As Integer   Dim strResult As String  ...

在Excel中，我们可以选中一个区域或者单元格给它一个名称。在公式-名称管理器 中能看到。 如果我们创建了很多名称，逐个删除就会相对费时。是否可以一键快速删除全部名称呢 通过下面代码，遍历工作表的名称，逐个删除 Sub DelNam...

在Excel中我们经常需要对一组数据进行求和。有时还要加上一些条件，而且条件可能是比较模糊的 比如要求姓李的合计工资。我们李姓就是模糊查询了。 简单处理的话，我们可以直接写公式。 =SUMIF(A2:A9,"李*",G2:G9) ...

SUB 设置单元格颜色字体等() ActiveSheet.Range("A1:B5").Interior.ColorIndex = 2 ActiveSheet.Range("A1:B5").Borders.LineStyle = xlC...

有的表格为了突出高亮显示，会把一些数据标注为不同的颜色，方便阅读 有时我们需要统计出某类标注了颜色的数据，虽然可以逐个选择计算，但是相对会麻烦，也不方便下次继续计算使用。是否有方法可以快速计算呢？ 1. 选中数据区域，按开始-查找和选择...

判断指定的图形形状shape是否存在 Function shapeExists(shapeName As String) As Boolean 'returns TRUE if a shape named [ShapeName] exi...

在Excel表格中，我们有需要隔行取数据，即只获取双数行或者单数行的数据。 如果要逐行去复制提取数据，会显示相对麻烦。是否有办法快速提取呢？如图，提取双数行的姓名列 1. 复制表头“姓名”，填入A2，A4； 2. 下拉填充数据，...

 复制一个形状Shape的格式给另一个形状Shape 格式复制-格式刷 Sub active()     With ActivePresentation    &nb...

获取当前激活单元所在的Listobject 表格的列名称 Find column name of active cell within ListObject in Excel Target 如果多于一个单元格，只有第一个单元格被使用 ...

WPS表格里插入的嵌入式图片 是=DISPIMG格式，这个图片是wps特有的功能，它不是shape, 有shapes集合中找不到。只能用wps的et表格打开才能看到这个图片 在Excel中打开会显示为#NAME错误，图片显示不出来 只...

工作表中生成图形（形状），名称是不确定的（比如“矩形 100”、“矩形 1011”），当点击图形(形状）时，如何获取被点图形(形状）的名称，即要获得Shape的名称来判断做不同的操作 如果3个Shape 共用相同的宏代码，但判断来自不同的...

VBA代码设置单元格或选择区域的格式 可以通过 NumberFormatLocal 属性来设置格式，以下是常用的格式代码    Selection.NumberFormatLocal ="G/通用格式"&...

使用wps表格自动计算功能的方法 新建一个表格， 在你想要的地方输入计算公式，如：=1+2+3 先选好表格格式“常规”：左键点击在你需要出结果的那一格：右键---设置单元格格式---常规---点击确定  然后就回车确定了，...

在Excel中，每个单元格都有一个位置名称，如A1，B3等。也可以给这个位置添加一个别名 这个名称可以是单元格，也可以是区域。所以它处理一些比较复杂的数据时，例如公式、数组或者制作下拉菜单时能够提供更有效的帮助。 如何单元格（区域）名...

最近在运行一个VBA写的系统时出现这个错误 拒绝的权限，运行时错误 70 原因是因为 sys_LogonUserRole 名称 引用的是另一个工作表中的一个位置（因为这个工作表是导入进来的）...