全民一起VBA实战篇 专题3 第一回 格式化规定各人迥异，Format函数一招摆平

最新推荐文章于 2020-03-29 15:51:43 发布
最新推荐文章于 2020-03-29 15:51:43 发布
阅读量376 收藏 1
点赞数 1
分类专栏： 全民一起VBA实战篇笔记 文章标签： 第一回 格式化规定各人迥异，Format函数一招摆平
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/lei_686/article/details/93988842
版权
本文详细介绍了VBA中的Format函数，通过多个实例展示了如何使用该函数进行数字、货币、日期格式化，包括四舍五入、保留小数、自定义格式等操作，帮助读者掌握VBA中的格式化技巧。
摘要由CSDN通过智能技术生成

 

相关知识点：

Format（原始内容，期望格式，每周起始日，每年起始周）将原始内容（数字、日期、文本等）转换成

指定格式的字符串并返回。除了第一个参数（原始内容）外，其他参数均为可选。

       #：代表一位数字，

”.##”:小数点后保留两位

“##.##”:前后都是保留两位数，523.12格式化以后变成523.12不会截断整数部分

 

例1 将数字转换为货币格式

最低0.47元/天 解锁文章
lei_686
关注
专栏目录
全民一起VBA实战篇第一课：表格格式操作与Excel功能调用
qq_43568982的博客
02-08 1097
文件打印 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实战篇 专题1 第一回 FIND方法实现快速查找 通配符号提供灵活选择
06-16 2693
相关知识点： Range.Find 方法，在该Range类对象代表的单元格区域中，搜索含有指定内容的单元格。Find只返回第一个找到的结果，例找374这个数字：Range(“B2，G14”).Find(374)，返回Range（”C4”） Range.Find(What,After,LookIn,Lookat,SearchOrder,SeachDirection,MatchCase,Ma...
全民一起VBA实战篇 专题1 第二回 可选参数灵活搭配 格式内容一应俱全
06-16 527
相关知识点： Application.FindFormat属性：用于指定后面Find等方法中需要查找的格式,与Range的方法一致 Application.FindFormat.Font.Bold=True Range.Find(What,After,LookIn,Lookat,SearchOrder,SeachDirection,MatchC...
全民一起VBA实战篇 专题4 第七回 递归不怕检索难，万缕千层只等闲
10-13 871
相关知识点： Collection对象： 用于存放任意多个对象，不需要事先指定其长度，常用方法： Add方法：添加一个元素 Clear方法：清空所有元素 Count属性：返回元素的总数 例1 递归遍历子文件夹，将找到的文件夹名字存放在数组里...
全民一起VBA实战篇第六课：VBA编程技巧及Word调用
qq_43568982的博客
02-09 1090
Err 对象 使用Err可以提升程序的健壮性，有利于用户使用。 Option Explicit Sub errDemo() Dim i As Long i = 3 On Error GoTo sthwrong '出现问题跳转到sthwrong Do While Cells(i, 2) <> "" ...
全民一起VBA提高篇 专题1 第一回 变体能容 高矮胖瘦皆适用，数据细分 大小黑白各不同
06-11 607
相关知识点 数据类型 类型不一样，数据大小不一样，运算规则和处理方式不一样 As 定义数据类型 Integer 整数类型（只存放-326768~+32767之间的整数） String 字符串类型 Variant 变体类型，没有指定数据类型，默认为此种类型， 缺点：1. 效率低下，内存开销大，执行速度慢 2. 总是猜数据类型，会猜错 声明变量时，...
全民一起VBA基础+提高+实战-视频课程资源网盘链接提取码下载 .txt
最新发布
03-16
很多人都知道，VBA是提高Excel工作效率的不二利器。...没关系，学完“全民一起VBA”系列课程，你就会发现，原来VBA如此易学、如此实用！只要是经常使用Excel的人士，均可通过本课程轻松掌握VBA。 课程大小：13.3G
全民一起VBA实战篇 专题4 第四回 位运算处理零一变换，属性值识别文件类型
09-15 709
相关知识点： GetAttr 函数，文件或文件夹的名字，返回一个数字，代表该文件的各种属性。 位运算（逻辑尺）：and（按位与，位乘），将判断的属性值与属性返回的数值and，计算结果为判断的属性值，则此文件夹具备此属性，否则不具备。 例1得到子文件夹的名字(返回不仅是文件夹的名字还有文件的名字) Sub dirdemo() Dim fname as ...
全民一起VBA实战篇 专题2 第五回 多键排序无非多次循环，独特功能还需独自开发
06-26 363
相关知识点： 多关键字排序原理：现对次要的列排序，再排序优先的倒序（从最次要开始）进行依次排序，就能实现 Worksheets.Sort 工作表排序，自学 例1 足球赛积分表排序，四个排序列 本来的优先级是总积分、获胜次数、净胜球、进球数 实现排序就得倒序进球数、净胜球、获胜次数、总积分按照这个顺序排序，最关键的最后排 Sub demo2() ...
全民一起VBA实战篇第四课：文本内容的处理技巧
qq_43568982的博客
02-04 583
题目一 按照要求设置输出格式 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 ...
全民一起VBA实战篇第二课：表格数据处理的实用技巧
qq_43568982的博客
01-28 767
Find方法 官方文档 https://docs.microsoft.com/zh-TW/office/vba/api/excel.range.find 内容可使用通配符 符号 含义 ? 一个任意字符，比如?a? * 任意多个任意字符，a ~ 转义符，把通配符改为普通字符串 题目一 题目要求： （1） 找到第一个内容为“程序员”的单元格，并用Msgbox显示其单元格地...
全民一起VBA实战篇第七课：实战篇小结
qq_43568982的博客
02-27 689
实战篇一共学习了六个专题 在第一个专题里学习了表格格式操作与Excel功能调用 包括 文件打印的方法以及设置打印细节 定时器的应用 跨range的处理 操作窗体、图表等Shape对象 在第二个专题里学习了文本的查找定位和替换 包括 Find方法的使用 Findnext的使用 定位最后一行的技巧 各种情况 Usedrange或SpecialCells End属性 Find方法 倒序循...
全民一起VBA实战篇第三课：文本内容的实用技巧
qq_43568982的博客
02-01 528
题目要求： 要求大家编写程序自动在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提高篇 第17回
bestyuuzh的博客
03-29 373
第十七回 三原则优化录制代码，一属性玩转合并表格 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提高篇第六课：事件编程
qq_43568982的博客
01-15 645
事件编程 事件编程要写在事件的发生地，放在事件编码中 Private Sub Workbook_Open() '对应子过程名写好 Dim i As Integer Randomize i = Rnd() '如果随机数i在0到0.5之间，则随机生成一个1到3之间的中奖号码 If i < 0.5 Then Range("c7").Value = Int(Rnd() * 3)...
全民一起VBA提高篇 课时1 愿上层楼骋远目，勿在浮沙筑高台
06-11 520
相关知识点 基础篇快速上手，速成法，基础不牢，注意数据类型 更多的实用技术，处理技巧 完善编程技巧 例1 a+b两列相加结果出现字符串相加问题(个别单元格不是数字是字符串) Sub cal() Dim k,a,b, For k=3 to 10 a=cells(k,2) b=cells(k,3) ...
全民一起VBA提高篇 专题1 第二回 变体终非万全策，数字要分长短型
06-11 492
相关知识点 变体类型还有一个缺点就是总是猜数据，有时数据类型是文本显示的是数字 如第一堂所示 VBA相加时“+”，如果两边都是字符串就等同于“&”，执行连接操作 自动类型转换：Dim a As Integer a=”23”转换为数字23，a=”你好”无法转换，报错 +不可以取代& 相同：“12”&”34”=”1234”， “12”+”34”=”...
全民一起VBA提高篇 第二十一回 事件函数伺机而动，时机成熟一触即发
05-30 312
相关知识点 事件处理程序 模块里写的宏，标准宏；事件处理程序必须写在程序发生地；工作簿事件写在Thisworkbook里 workbook_open() 工作簿打开运行程序 workbook_beforeclose(cancel as boolean) 括号内参数是执行完本程序，是否取消关闭工作簿的操作，cancel=Ture,就无法关闭 workbook_newsheet 新建工作...
学习日志 全民一起VBA提高篇 第六回 GOTO语句不走寻常路，EXIT跳出轮回圈
海豚
02-10 792
学习日志 全民一起VBA提高篇 第六回 GOTO语句不走寻常路，EXIT跳出轮回圈 相关知识点 'exit do ; exit for ; exit sub ; exit function 'exit 只能跳出它所在的那一层循环 'goto 可以跳转到同一过程（函数）内的任意一行 退出循环 exit Option Explicit '用逻辑变量控制流程 Sub...
Android项目开发实战：3D冰球休闲游戏详解【PDF教程】
市面上流行的休闲游戏有很多，比如《全民学画画》、《英雄难过棍子关》和《疯狂保龄球》等，其中《疯狂保龄球》就是一款3D休闲游戏。这些游戏在玩法上各具特色，吸引了大量玩家的关注和参与。借鉴这些成功案例，作者...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

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

抵扣说明：

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

余额充值