全民一起VBA实战篇 专题1 第二回 可选参数灵活搭配 格式内容一应俱全

最新推荐文章于 2023-02-09 17:22:56 发布
最新推荐文章于 2023-02-09 17:22:56 发布
阅读量522 收藏
点赞数
分类专栏： 全民一起VBA实战篇笔记 文章标签： 第二回 可选参数灵活搭配 格式内容一应俱全
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/lei_686/article/details/92389667
版权
本文详细介绍了如何利用VBA的可选参数进行灵活的Excel查找操作，包括设置字体加粗、查找范围、匹配大小写、匹配单元格内容以及按特定格式查找。通过五个实例，展示了如何在不同情况下应用这些参数，提高查找效率。
摘要由CSDN通过智能技术生成

 

相关知识点：

Application.FindFormat属性：用于指定后面Find等方法中需要查找的格式,与Range的方法一致

                     Application.FindFormat.Font.Bold=True

Range.Find(What,After,LookIn,Lookat,SearchOrder,SeachDirection,MatchCase,MatchByte,SeachFormat)

           9个参数：What 必填,后面8个参数，定义为可选参数（提高18回）。

What：含义，需要查找的内容；特点，为变体类型，可以接受数字、字符串、日期等各种VBA数据类型,支持通配符（正则表达式，？*-），从而实现模糊查找。（25），（”熊猫”），（#3/18/2019#）

最低0.47元/天 解锁文章
lei_686
关注
专栏目录
全民一起VBA实战篇 专题1 第一回 FIND方法实现快速查找 通配符号提供灵活选择
06-16 2671
相关知识点： Range.Find 方法，在该Range类对象代表的单元格区域中，搜索含有指定内容的单元格。Find只返回第一个找到的结果，例找374这个数字：Range(“B2，G14”).Find(374)，返回Range（”C4”） Range.Find(What,After,LookIn,Lookat,SearchOrder,SeachDirection,MatchCase,Ma...
全民一起VBA实战篇第三课：文本内容的实用技巧
qq_43568982的博客
02-01 516
题目要求： 要求大家编写程序自动在F列中标记出每一个交易记录是该客户的第几次交易。比如第3行的“赵六”是第一次出现，所以F3为 1 ，而第4行的“赵六”是第二次出现，所以F4应为 2 。 方法一： 双重循环 Option Explicit Sub demo() Dim i As Long, j As Long, s As Long Dim r As Object Set...
全民一起VBA实战篇第一课：表格格式操作与Excel功能调用
qq_43568982的博客
02-08 1088
文件打印 Sub 批量打印() Dim fn As String, wb As Workbook, ws As Worksheet fn = Dir("E:\EXCEL\*.xlsx") Do While fn <> "" Set wb = Workbooks.Open("E:\EXCEL\" & fn) ...
全民一起VBA实战篇 专题4 第七回 递归不怕检索难，万缕千层只等闲
10-13 859
相关知识点： Collection对象： 用于存放任意多个对象，不需要事先指定其长度，常用方法： Add方法：添加一个元素 Clear方法：清空所有元素 Count属性：返回元素的总数 例1 递归遍历子文件夹，将找到的文件夹名字存放在数组里...
全民一起VBA实战篇第六课：VBA编程技巧及Word调用
qq_43568982的博客
02-09 1076
Err 对象 使用Err可以提升程序的健壮性，有利于用户使用。 Option Explicit Sub errDemo() Dim i As Long i = 3 On Error GoTo sthwrong '出现问题跳转到sthwrong Do While Cells(i, 2) <> "" ...
全民一起VBA基础+提高+实战-视频课程资源网盘链接提取码下载 .txt
最新发布
03-16
很多人都知道，VBA是提高Excel工作效率的不二利器。...没关系，学完“全民一起VBA”系列课程，你就会发现，原来VBA如此易学、如此实用！只要是经常使用Excel的人士，均可通过本课程轻松掌握VBA。 课程大小：13.3G
全民一起VBA实战篇 专题4 第四回 位运算处理零一变换，属性值识别文件类型
09-15 694
相关知识点： GetAttr 函数，文件或文件夹的名字，返回一个数字，代表该文件的各种属性。 位运算（逻辑尺）：and（按位与，位乘），将判断的属性值与属性返回的数值and，计算结果为判断的属性值，则此文件夹具备此属性，否则不具备。 例1得到子文件夹的名字(返回不仅是文件夹的名字还有文件的名字) Sub dirdemo() Dim fname as ...
全民一起VBA实战篇 专题3 第一回 格式化规定各人迥异，Format函数一招摆平
06-28 366
相关知识点： Format（原始内容，期望格式，每周起始日，每年起始周）将原始内容（数字、日期、文本等）转换成 指定格式的字符串并返回。除了第一个参数（原始内容）外，其他参数均为可选。 #：代表一位数字， ”.##”:小数点后保留两位 “##.##”:前后都是保留两位数，523.12格式化以后变成523.12不会截断整数部分 例1 将数字转换为货币格式 ...
全民一起VBA实战篇第四课：文本内容的处理技巧
qq_43568982的博客
02-04 573
题目一 按照要求设置输出格式 Option Explicit Sub 单位() Dim i, s i = 1222.222223 s = Format(i, "$.###") '#代表一位数字 MsgBox s End Sub Option Explicit Sub 单位() Dim i, s i = 1222.2 ...
VB 可选参数举例
06-07
VB 可选参数举例 VB 可选参数举例 VB 可选参数举例
全民一起VBA实战篇 专题2 第五回 多键排序无非多次循环，独特功能还需独自开发
06-26 349
相关知识点： 多关键字排序原理：现对次要的列排序，再排序优先的倒序（从最次要开始）进行依次排序，就能实现 Worksheets.Sort 工作表排序，自学 例1 足球赛积分表排序，四个排序列 本来的优先级是总积分、获胜次数、净胜球、进球数 实现排序就得倒序进球数、净胜球、获胜次数、总积分按照这个顺序排序，最关键的最后排 Sub demo2() ...
ExcelVBA 之可选参数
soga235的博客
06-04 4608
有时候，你也许要给函数提供额外的参数，例如，你有一个计算每个人膳食的函数。然而，有时你不希望函数进行相同的计算。在参数名称前面加上关键字Optional可以指明该参数不是必须的。可选参数在必须的参数之后，列在参数清单的最后；可选参数总是Variant数据类型，这意味着你不能使用关键字As来明确可选参数的类型。在前面部分，你创建了一个计算三个数值的平均值的函数，假设，你有时只想要计算两个数的均值，你就可以将第三个参数设置为可选的。为了不破坏原来的函数MyAverage，我们来创建一个新的函数Avg，来计算两个
全民一起VBA实战篇第二课：表格数据处理的实用技巧
qq_43568982的博客
01-28 752
Find方法 官方文档 https://docs.microsoft.com/zh-TW/office/vba/api/excel.range.find 内容可使用通配符 符号 含义 ? 一个任意字符，比如?a? * 任意多个任意字符，a ~ 转义符，把通配符改为普通字符串 题目一 题目要求： （1） 找到第一个内容为“程序员”的单元格，并用Msgbox显示其单元格地...
全民一起VBA实战篇第七课：实战篇小结
qq_43568982的博客
02-27 675
实战篇一共学习了六个专题 在第一个专题里学习了表格格式操作与Excel功能调用 包括 文件打印的方法以及设置打印细节 定时器的应用 跨range的处理 操作窗体、图表等Shape对象 在第二个专题里学习了文本的查找定位和替换 包括 Find方法的使用 Findnext的使用 定位最后一行的技巧 各种情况 Usedrange或SpecialCells End属性 Find方法 倒序循...
VBA提高篇_19 可选参数Optional_ IsMissing _MSgbox
pigerr的博客
02-09 1558
Optional 代表本参数是可选项 =False;代表参数若不指定,则默认为False。: 第二参数, Msgbox风格代码(可用常量名称,可用风格代码). Msgbox的返回值代码。:第三参数, 对话框标题栏。: 第一参数,字符串。
vb 函数参数可选
boys1999的专栏
02-20 1333
Public Sub AddItem(Item As String, Optional Index As String = "") If Len(Index) = 0 Then MsgBox Index Else MsgBox Index End If End Sub Private Sub Command1_Click() Call
全民一起VBA提高篇 第17回
bestyuuzh的博客
03-29 363
第十七回 三原则优化录制代码，一属性玩转合并表格 1.range.rows 与worksheet.rows属性 重点: (1).Range.Rows(n):由该区城第n行所有单元格构成的Range (2).Worksheet.rows(8):表格第8行全部 (3).Worksheet.Column(5):表格第5列全部 (4).Worksheet.rows(“2:3”):一次性返回2-3多行 (5...
全民一起VBA实战篇 专题4 第三回  建目录做拷贝有求必应，VBA玩文件无所不能
08-01 492
相关知识点： 文件操作函数有时无法成功情况，有可能是windows文件夹权限，不允许删除修改等。 MkDir(“文件夹路径和名称”) 根据指定路径和名称新建一个文件夹，如果该文件夹已经存在，则会发生错误 FileCopy(“源文件名”,”目标路径与文件名”) 如果不存在该源文件，则会出错。 Name函数 重命名一个文件或文件夹 RmDir函数 删除一个空文件夹（该文件夹不能有任何...
全民K歌实战：React Native开发与集成经验分享
在《React Native在全民K歌的开发实践》一文中，作者庄子健（阿子）作为腾讯的资深开发者，分享了K歌Web团队在将React Native引入全民K歌项目中的经验与挑战。文章主要分为以下几个部分： 1. **自我介绍**：庄子健...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值