文章背景:工作生活中,有时很多人都会用到同一份模板文件。为了防止文件内的公式被修改,以及单元格的误删除,往往都会给文件设置保护。受保护的同时,希望可以正常使用筛选等功能。...(1)关于查找 设置保护后,如果要正常使用查找功能,需要确保查找范围内的单元格没有勾选隐藏。 (2)关于筛选 设置保护后,如果要正常使用筛选功能,需要提前启用筛选模式。...选中标题行,然后选中菜单栏中的筛选功能。最后再对表格进行保护设置,设置时勾选自动筛选这个选项。...dis_t=1663654969&vid=wxv_1829891023594913798&format_id=10002&support_redirect=0&mmversion=false 注意:在受保护的状态下...参考资料: [1] 如何让受保护的工作表进行查找、筛选和排序的操作(http://club.excelhome.net/thread-1029711-1-1.html)
标签:VBA 下面介绍一个使用少量VBA代码实现的简单实用的小技巧。 通常情况下,我们执行“保护工作簿”命令后,此时删除工作表的命令变成灰色,用户就不能轻易地删除工作表了。...然而,这样也不能进行插入、移动或复制工作表的操作了。 如果想要在不保护工作簿的情况下防止用户删除工作表,而且允许用户插入工作表并对其进行重命名,也允许用户移动或复制工作表,有没有什么好的方法实现?...在工作簿的ThisWorkbook模块中粘贴或输入下面的代码: Option Explicit Private Sub Workbook_SheetDeactivate(ByVal Sh As Object..." End Sub Sub RemoveProtection() '撤销保护工作簿 ThisWorkbook.Unprotect End Sub 此时,用户再要删除该工作簿中的工作表,就会弹出...的警告信息(如下图1所示),但用户仍可以在该工作簿中进行添加工作表、移动或复制工作表、对工作表重命名等操作。 图1
标签:VBA 有时候,工作簿中可能有大量的命名区域。...下面是一段简单的代码,它将列出工作簿中的所有定义的名称,并显示名称所指向的单元格区域。...Sub NamesList() Dim wks As Worksheet Dim nm As Name '可以修改为你想置名称和引用区域的工作表 Set wks = Sheet1....End(xlUp)(2) = "'" & nm.RefersTo Next nm '恢复错误触发 On Error GoTo 0 End Sub 一个非常简单的过程,它将显示工作簿中的所有名称及命名区域...其中的错误捕捉语句以防止工作簿中没有命名区域。
标签:VBA 自Excel 2010发布以来,已经具备删除工作表中重复行的功能,如下图1所示,即功能区“数据”选项卡“数据工具——删除重复值”。...图1 使用VBA,可以自动执行这样的操作,删除工作表所有数据列中的重复行,或者指定列的重复行。 下面的Excel VBA代码,用于删除特定工作表所有列中的所有重复行。...Cols(i) = i + 1 Next i rng.RemoveDuplicates Columns:=(Cols), Header:=xlYes End Sub 这里使用了当前区域...如果只想删除指定列(例如第1、2、3列)中的重复项,那么可以使用下面的代码: Sub DeDupeColSpecific() Cells.RemoveDuplicates Columns:=Array...(1, 2, 3), Header:=xlYes End Sub 可以修改代码中代表列的数字,以删除你想要的列中的重复行。
有时候早期建的表上可能缺少主键,这样容易导致查询或者主从复制比较慢。 下面是一个小的脚本,用于找出没有主键的表。 #!.../bin/bash # 找出没有主键的表 # Date: 2017/06/05 source /etc/profile LOG="/tmp/nopk.log_$(date +%F)" user='root
经常会踫到这样的场景需求:自定义时间从MySql流水月表中SELECT出来数据到excel报表文件中,所以自己写了这个shell脚本来处理。...1 实现思路 代码比较简单,主要使用了mysql -e执行SQL语句,然后重定向到txt文件中。...由于linux默认是uft-8的格式,所以在使用awk命令处理完txt文件后,通过iconv命令把utf8的文件转换成最终的gbk文件。.../bin/bash # FileName: exportmysqlshell1.sh # Description: 使用shell脚本导出MySql月表数据到EXCEL中 # Simple...Github了,地址是https://github.com/vfhky/shell-tools,以后脚本的更新或者更多好用的脚本也都会加入到这个工程中。
shell脚本中 '$' 与不同的符号搭配其表示的意义也会不同 特殊标志符 含义 $0 当前脚本的文件名 $n 传递给脚本或函数的参数。n 是一个数字,表示第几个参数。...例如,第一个参数是$1,第二个参数是$2 $# 传递给脚本或函数的参数个数 $* 传递给脚本或函数的所有参数 $@ 传递给脚本或函数的所有参数 $?...上个命令的退出状态 $$ 当前Shell进程ID $() 与 `(反引号) 一样用来命令替换使用 ${} 引用变量划分出边界 注释:$* 和 $@ 都表示传递给函数或脚本的所有参数,不被双引号(" "...)包含时,都以"$1" "$2" … "$n" 的形式输出所有参数。...但是当它们被双引号(" ")包含时,"$*" 会将所有的参数作为一个整体,以"$1 $2 … $n"的形式输出所有参数;"$@" 会将各个参数分开,以"$1" "$2" … "$n" 的形式输出所有参数
学习Excel技术,关注微信公众号: excelperfect 我从数据库中导入数据到工作表,本来数据库中的数据顺序是排好了的,然而导入工作表中后数据顺序变乱了。...如果在工作表中使用复制粘贴来重新恢复固定的顺序,将会花费大量的时间,能否使用VBA快速完成排序,详情如下。 下图1中“固定顺序”工作表为数据本来应该的顺序: ?...图1 图2中“整理前”工作表为导入数据后的顺序: ? 图2 可以看出,“整理前”工作表中的列顺序被打乱了,我们需要根据“固定顺序”工作表中列的顺序将“整理前”工作表恢复排序。...lngLastVariable As Long Dim lngNewCol As Long Dim i As Long Dim SearchHeader, rng '赋值工作表对象...For i = 1 To lngLastFixed SearchHeader =wksYesOrder.Cells(1, i) '在"整理前"工作表中查找
为简化起见,我们使用少量的数据来进行演示,示例数据如下图1所示。 图1 示例数据位于名为“表1”的表中,我们想获取“产地”列为“宜昌”的数据。...方法1:使用Power Query 在新工作簿中,单击功能区“数据”选项卡中的“获取数据——来自文件——从工作簿”命令,找到“表1”所在的工作簿,单击“导入”,在弹出的导航器中选择工作簿文件中的“表1”...单击功能区新出现的“查询”选项卡中的“编辑”命令,打开Power Query编辑器,在“产地”列中,选取“宜昌”,如下图2所示。 图2 单击“确定”。...然而,单击Power Query编辑器中的“关闭并上载”命令,结果如下图3所示。...图3 方法2:使用FILTER函数 新建一个工作表,在合适的位置输入公式: =FILTER(表1,表1[产地]="宜昌") 结果如下图4所示。
有一次我女朋友让我帮忙解一个excel表格的保护密码,然后~用了宏 网上下载来的Excel经常会有工作表保护,也就是无法修改,妄图做任何修改的时候你就会看见这句话: 您试图更改的单元格或图表位于受保护的工作表中...若要进行更改,请取消工作表保护。您可能需要输入密码。 那么这篇文章可以简单的帮你解决这个问题...因为Excel中内置了Visual Basic,所以我们写个宏暴力破解密码就可以了。。。 1....当然是先打开有保护密码的Excel文件 2. 新建一个宏(不同版本的office宏所在的位置不一样,一般都在"菜单—视图" 中) ?...然后在弹出的框中我们可以看到我们新建的空宏"asd" ? 5. 把这个框内的所有内容全部删除,将下面的所有代码复制进去 ? 6....选中这个宏,点击执行,就可以破解当前这份Excel中的工作保护密码了 当然在执行完这个宏之后,当前打开的Excel中的密码已经被清除,你可以选择直接保存这份Excel,这样的话你的Excel就不再有密码了
学习Excel技术,关注微信公众号: excelperfect 本文来源于wellsr.com的Q&A栏目,个人觉得很有意思,对于想要在工作表中使用形状来绘制图形的需求比较具有借鉴意义,特辑录于此,代码稍有修改...Q:如下图1所示,左侧是一个4行4列的数值矩阵,要使用VBA根据这些数值绘制右侧的图形。 ?...在连接的过程中,遇到0不连接,如果两个要连接的数值之间有其他数,则从这些数值上直接跨过。如图1所示,连接的顺序是1-2-3-4-5-6-7-8-9-10-11-12-13。...A:VBA代码如下: '在Excel中使用VBA连接单元格中的整数 '输入: 根据实际修改rangeIN和rangeOUT变量 ' rangeIN - 包括数字矩阵的单元格区域 '...Dim arrRange() As Variant Set rangeIN= Range("B3:E6") Set rangeOUT = Range("H3") '删除工作表中已绘制的形状
有时候我们会遇到这种问题: 很多数据散落在很多工作表或者工作簿中,由于某项工作我们需要将这些数据做个汇总。...然后有一天我在ExcelHome论坛发现了版主写的一个神器,可以自动生成SQL语句,实现跨工作簿/工作表进行数据汇总透视。(点击阅读原文可以找到工具下载链接)下面介绍下该工具的使用方式。...2.右侧列出了涉及工作表中的所有字段,你可以只选你需要的字段进行显示。...我们不需要理解语句的内容,只需要点“复制”,然后点“退出”。 三、命令文本的粘贴 打开工具中的数据透视表。...这个工具的另外一个好处是,数据源字段格式不一定要一样,比方这个工作表中有销售数量,销售额字段,那个工作表中还有“折扣“等字段,对你的结果不会产生影响,只是取你需要的字段即可。
分享一些工作中常用的脚本工具~ 1,Bag包的合并 2,CallBack的使用 3,#define 中声明类 4,获取当前进程PID 5,C调用shell返回结果 6,根据指定字符分割字符串 7,统计文本文件时间戳...一,rosBag的合并 #!...% (total_included_count, total_skipped_count)) if __name__ == "__main__": main() 二,CallBack的使用...lililili"); m_callbacks.funbcallback(1); } int main() { Init(); Process(); } 三,#define 中声明类...<<std::endl; for (auto i: str_1_1) { std::cout<<"str_1: "<<i<<std::endl; } } 七,脚本统计文本文件时间戳
本文提供了一种方法,在给定一个或多个相同布局的工作表的情况下,可以创建另一个“主”工作表,该工作表仅由满足特定条件的所有工作表中的数据组成。并且,这里不使用VBA,仅使用公式。...图3 想要创建一个主工作表Master,其数据来源于上面三个工作表中列D中的值为“Y”的数据: ?...D2:D10"),"Y")) 如果不熟悉跨多个工作表使用公式的技术,那么应记下使用INDIRECT的这种公式构造,因为它实际上是我们执行此类计算的唯一方法。...D2:D10"),"Y")) 然后,将这组代表工作表名称的文本字符串的两端连接,在后面是所使用的工作表区域(D2:D10),在前面用单个撇号连接。...k的值,即在工作表Sheet1中匹配第1、第2和第3小的行,在工作表Sheet2中匹配第1和第2小的行,在工作表Sheet3中匹配第1小的行。
四、项目中常用操作 参考文档 图形界面操作: 在"git clone"弹出窗口,输入仓库地址,如果使用的是SSH方式clone,那么在"load putty key"中需要指定之前生成的putty私钥...基本概念: 工作拷贝(工作目录):用于存放产品开发数据本地工作目录。 索引(Index):用于存放待提交数据的缓存区。 本地库:远端库的一个完整的拷贝,包括所有文件的修改记录,分支等。...全球版本号(commitID):Git库的版本号是通过SHA-1算法根据库中的所有内容计算出一个40位的哈希值,这个哈希值是全球唯一的,基本只要前六位就可以唯一标识了。...4.5 回退 reset的参数: –mixed 意思是:不删除工作空间改动代码,撤销commit,并且撤销git add ....stash drop stash@{X} //将记录列表中取出的对应暂存记录删除 六、rebase 使用git pull命令的时候,可以使用–rebase参数,即git pull --rebase,这里表示把你的本地当前分支里的每个提交
文章背景:工作生活中涉及到VBA,时常要将Excel文件保存为.xlsm格式。而在右键新建的可选项中,一般只有.xlsx文件。下面介绍如何在右键新建选项中添加启用宏的工作簿.xlsm。...系统环境:Win10;产品:office365。 (1)按快捷键Win + R,调出运行窗口,输入regedit,按回车,进入注册表编辑器界面。...(5)在注册表中,找到.xlsx 文件夹,找到Excel.Sheet.12文件夹下的ShellNew文件夹,双击FileName打开,复制其中的数值数据:C:\Program Files\Microsoft...(7)在桌面上新建一个空的启用宏的工作簿,将其重命名为:Excel14M.xlsm,然后将该文件移动到以下路径的文件夹中:C:\Program Files\Microsoft Office\root\vfs...(8)关闭注册表编辑器界面,回到桌面。在桌面上点击右键,选择新建,此时可以看到在可选项中已经有了启用宏的工作簿。
标签:VBA 下面是在网上找到的一段程序,可以让工作表中指定的矩形动起来。一个动作是转圈,一个动作是走斜线,如下图1所示。 图1 示例中矩形的名称为“Rectangle 1”。...End Sub Sub MoveShape(shp As Shape, ByVal fLeft As Single, ByVal fTop As Single, t As Date) ' 将指定的形状从它所在的位置移动到它经过间隔...t的位置 Const d2R = 1.74532925199433E-02 Const n1 As Long = 20 ' 加速/减速步数 Const n2 As Long = 20 Const...n1 + n2 ' 总步数 Dim fcv As Single ' 滑行速度,像素/步 Dim i As Long Dim v As Single ' 给定步数的速度...fNumTop = .Top - fTopOld DoEvents Sleep t * 86400000# / n Next i End With End Sub 有兴趣的朋友
标签:VBA Q:我在工作表中放置有一些形状,例如圆形、矩形等,我想当我在工作表中使用鼠标单击这些形状时能够根据单击的形状有不同的操作,该如何实现?...我想在一个过程中实现,而不是每个形状关联不同的过程。 如下图1所示,当我使用鼠标单击上方的圆形时,会执行一个操作;单击下方的矩形时,会执行另一个操作,但这两个形状都关联相同的过程。...图1 A:在示例工作表中,将上方的圆形命名为“椭圆示例”,下方的矩形命名为“圆角矩形”。...End If End Sub 然后,返回工作表,在形状中单击鼠标右键,将其关联到宏过程testShape。当你单击工作表中的形状时,结果如下图2所示。...图2 你可以代替过程中MsgBox行的代码为你想要执行的操作代码。
标签:VBA 下面的VBA过程在指定的新工作表中列出指定工作表中的所有公式,包含具体的公式、所在工作表名称及其所在单元格地址。...rSheet As Worksheet Dim myRng As Range Dim newRng As Range Dim c As Range Dim endRow As Long '放置公式的工作表..., 可修改为你的实际工作表名 Set rSheet = Sheets("FormulasSheet") '要查找公式的工作表, 可修改为你的实际工作表名 Set sht = Sheets("Sheet1...") '查找已使用的单元格区域 Set myRng = sht.UsedRange '错误处理, 以应对没有公式的情形 On Error Resume Next '使用SpecialCells..." & endRow).Value = Mid(c.Formula, 2, (Len(c.Formula))) '放置包含公式的工作表名在列B中 .Range("B" & endRow
单击 对象类型 列表中的 Microsoft Office Excel 工作表 ,单击 创建新 ,然后单击 确定 。 双击嵌入的 Excel 工作表,然后添加所需的数据。...使用以下步骤根据您的具体情况之一: 如果想要嵌入 Excel 工作表,请单击 粘贴 如果它不被选中,然后单击 另存为 列表中的 Microsoft Office Excel 工作表 。...请注意,如果您双击嵌入的 Excel 工作表,水平并在 Excel 工作表中显示的垂直滚动条。 您可以使用滚动条查看嵌入工作表中的所有列和行。...若要调整到绘图页在 Excel 工作表,使用以下方法根据您的具体情况之一: 调整绘图页的大小。 若要调整绘图页,请请按 Ctrl,,然后拖动绘图页的边缘,以便在工作表适合绘图页中。...因此,您可能需要通过测试工作表,您要在 Visio 绘图中显示工作表中使用此方法之前尝试此方法。 要调整工作表中的列的大小,请按下列步骤操作: 启动 Excel,然后打开所需的工作表。
领取专属 10元无门槛券
手把手带您无忧上云