).Worksheets(1).Range("b:b").Find("*", , , , , xlPrevious).Row)'查找最大行号 ).Worksheets(1).Range("b:b").Find("*", , , , , xlPrevious).column)'查找最大列号存在数据的最大行列号:Sub 查找数据单元格的最大行列号()MsgBox "数据单元格的最大行号: " & Cel

如图所示,命名为file文件的表头有BP.A1.TEST等 假如想提取含有"ADD"的行和该行对应列的"BP"和"P"值,则需要用到以下命令 awk '/ADD/ {print $1,$7}' file > file_BP_P /ADD/表示搜索含有"ADD"的行,$1表示提取第一列,$7表示提取第七列,file指的是搜索的文件名,">"表示输出,file_BP_P表示输出后保存的文件名

在主要的编程语言中, 结构体是用大括号来表示 代码段的 范围 界定的. 但是在一些比较"老的"语言中,由于历史原因, 还是使用的 是: 关键字来进行界定代码 的 结构段, 如vba中的 语法结构: if .. . then ... end if, if .... then ... else ... end if; if .... then .... elseif .... then .... elseif .... then.... end if for i=1 to 10 ... e

https://www.kernel.org/pub/software/scm/git/docs/git-grep.html   把所有本地分支包含某个字符的行列出来,把含有master的列出来 git branch|sed 's/*/ /g'|xargs -i git grep -n master {} shell的写法: #!/bin/bash a=$(git branch|sed 's/*/ /g') for i in ${a} do git grep -n master $i done

在vb中 dim a# 定义a变量为双精度型变量~ #是类型符 % 整型 & 长整型 !单精度 $ 字符型 VB中strconv 的作用 StrConv("要转换的字符串",转换类型)转换类型可以取的值是:vbUpperCase 1 将字符串文字转成大写. vbLowerCase 2 将字符串文字转成小写. vbProperCase 3 将字符串中每个字的开头字母转成大写. vbWide* 4* 将字符串中单字节字符转成双字节字符. vbnarrow*8* 将字符串中双字节字符

一.正则表达式特殊符号: 二.grep的用法 grep [-A|B|a|c|i|n|v] [--color=auto] '搜索字串' filename -A ===> after缩写,后面接数字,除了列出该列外,还列出后续的n列 -B ===> before缩写,后面接数字,除了列出该列外,还列出前面的n列 -a ===> 将二进制binary文件以text文件的方式查找数据 -c ===> 记录找到字符串的次数 -i ===> 忽略大小写 -n ===> 输出行号 -

awk简介 首先要知道awk的使用场景,需了解awk有哪些优势与短板. 关于个人近期学习awk总结其优势: awk对文本的处理运算效率同比其他工具效率高很多(比shell的for循环高10倍以上,运算比bc计时器也高很多) awk默认可对多个空格进行列切分,需要再借助其他工具. awk可以对任意多个字符进行列分隔. 如果文本列很多,可通过NF定位到最后一列获取列数据. awk工具处理文本的命令非常丰富,几乎可以看成一套完整的编程语言. 缺点 awk无法修改文本文件. awk案例 案例场景:/et

遇到这种情况可以判断:行显示字符数不够,可以增加行显示字符数 01.可以当前会话HR@ACE >set line 400; 02.上面的方法其它会话不生效,懒不想每次设置怎么办? Oracle:cd $ORACLE_HOME/sqlplus/admin [oracle@ACE admin]$ pwd/u01/app/oracle/product/11.2.0/dbhome_1/sqlplus/admin[oracle@ACE admin]$ lltotal 20-rw-r--r-- 1 orac

假设存在文件file1.xlsx,其内容如下: 存在文件file2.xlsx,其内容如下: 现在我想从第七列开始,将file2所有的字符替换成file1一样的,即第七.八.九.十列不需要改变,因为file1和file2的字符一致的(3和1,2和4):从第11列开始,file1和file2的字符不一样了.我的命名规则是从第11列开始,file2的2改为3,4改1,3改为2,1改为4: 下面是代码的实现过程: install.packages("openxlsx") #安装openxlsx

'删除空行 Sub DeleteEmptyRows() Dim LastRow As Long, r As Long LastRow = ActiveSheet.UsedRange.Rows.Count LastRow = LastRow + ActiveSheet.UsedRange.Row - Then Rows(r).Delete Next r End Sub '删除空列 Sub DeleteEmptyColumns() Dim LastColumn As Long, c As Long

.Option Explicit '强制对模块内所有变量进行声明 Option Private Module '标记模块为私有,仅对同一工程中其它模块有用,在宏对话框中不显示 Option Compare Text '字符串不区分大小写 '指定数组的第一个下标为 1 .On Error Resume Next '忽略错误继续执行 VBA代码,避免出现错误消息 .On Error GoTo ErrorHandler '当错误发生时跳转到过程中的某个位置 . '恢复正常的错误提示 .Applicat

(Visual Basic Application) VBA(Visual Basic for Application)是Microsoft Office系列软件的内置编程语言,其语法结构与Visual Basic编程语言互相兼容,采用的是面向对象的编程机制和可视化的编程环境. 第一节 标识符 一．定义 标识符是一种标识变量.常量.过程.函数.类等语言构成单位的符号,利用它可以完成对变量.常量.过程.函数.类等的引用. 二．命名规则 1)  字母打头,由字母.数字和下划线组成,如 A987b_2

Excel VBA语句集 引子 最近批阅学生成绩,用Excel 处理学生成绩,用到VBA 提高办公效率.需要经常查阅VBA的一些用法 正文 定制模块行为 (1) Option Explicit '强制对模块内所有变量进行声明 Option Private Module '标记模块为私有,仅对同一工程中其它模块有用,在宏对话框中不显示 Option Compare Text '字符串不区分大小写 Option Base 1 '指定数组的第一个下标为1 (2) On Error Resume Nex

定制模块行为(1) Option Explicit '强制对模块内所有变量进行声明    Option Private Module '标记模块为私有,仅对同一工程中其它模块有用,在宏对话框中不显示    Option Compare Text '字符串不区分大小写    Option Base 1 '指定数组的第一个下标为1(2) On Error Resume Next '忽略错误继续执行VBA代码,避免出现错误消息(3) On Error GoTo ErrorHandler '当错误发生时

VBA语言基础 第一节 标识符 一．定义 标识符是一种标识变量.常量.过程.函数.类等语言构成单位的符号,利用它可以完成对变量.常量.过程.函数.类等的引用. 二．命名规则 1) 字母打头,由字母.数字和下划线组成,如 A987b_23Abc 2) 字符长度小于40,(Excel2002以上中文版等,可以用汉字且长度可达254个字符) 3) 不能与VB保留字重名,如public, private, dim, goto, next, with, integer, single等 第二节 运算符 定

VBA 语言基础 第一节 标识符 一．定义 标识符是一种标识变量.常量.过程.函数.类等语言构成单位的符号,利用它可以完成对变量.常量.过程.函数.类等的引用. 二．命名规则 1) 字母打头,由字母.数字和下划线组成,如 A987b_23Abc 2) 字符长度小于40,(Excel2002 以上中文版等,可以用汉字且长度可达254 个字符) 3) 不能与VB 保留字重名,如public, private, dim, goto, next, with, integer, single等 第二节 运

Excel VBA数组入门教程 1. 前言:不要把VBA数组想的太神秘,它其实就是一组数字而已. 2. 数组的维数: Sub 数组示例()  Dim x As Long, y As Long  Dim arr(1 To 10, 1 To 3)  '创建一个可以容下10行3列的数组空间  For x = 1 To 4    For y = 1 To 3       arr(x, y) = Cells(x, y)  '通过循环把单元格区域a1:c4的数据装进数组中    Next y  Next x

Excel VBA表格自行开发计划 要求功能 1. 批量删除 2. [X] 批量填充 3. [X] 批量重命名 4. [ ] 按颜色求和 5. [ ] 按底纹色选中单元格 6. [ ] 统计底纹颜色个数 7. [ ] 统计字体颜色个数 8. [ ] 按颜色求和 9. [ ] 升序.降序排序工作表 10. [X] 批量删除非活动工作表 11. [X] 批量删除空工作表 12. [X] 批量复制工作表并重命名排序 13. [ ] 删除空白行空白列 14. [ ] 删除工作表所有对象(子项:删除图片,

此篇对应功能出自:第10波-快速排列工作表图形对象 - 简书 https://www.jianshu.com/p/eab71f2969a6 在Excel的对象模型中,列的宽度不是一般所期待的和行高一样是磅为单位,而是由当前所设定的字符大小的字符宽度为单位,致使在根据图片大小来调整列宽时,没有办法调整到位,总是有那么一点点误差. 此篇介绍的图形排列过程中,也会受此困扰,间接使用循环的方式将列宽调整好,或者用当前的ColumnWidth和Width两个值来算他们之间的比例的方式,但仍然有误差,所以E

PART1: 三.查找 1.从某一行向上/下找到第一个不为空的行 intRowPntEnd = ActiveSheet.Cells(intRowPntStart, intColPnt).End(xlDown).Row m = Range("e65536").End(xlUp).Row 四.定位 2.在某个区域查找标记名称 For Each std In ActiveSheet.UsedRange 五.行列的range变量 ActiveSheet.Range("F3"

VBA 格式化字符串 VBA 的 Format 函数与工作表函数 TEXT 用法基本相同,但功能更加强大,许多格式只能用于VBA 的 Format 函数,而不能用于工作表函数 TEXT ,以下是本人归纳的几点用法,希望对学习VBA有所裨益.Format(值,格式(可选参数))一.数字格式:1.General Number:普通数字,可以用来去掉千位分隔号和无效 0 .如:Format("1,234,567.80", "General Number")="1