- 博客(6)
- 资源 (2)
- 收藏
- 关注
RSS订阅原创 因系统区域设置造成VBE不能输入中文和中文乱码的教训
停止录制宏，打开VBE，发现宏名称为“？”，录输入中文不行，其它的标示也有中文乱码，搞了1个多小时才发现问题。原来是windows系统的区域设置里。了 Beta版：使用Unicode UTF-8提供全球语言支持（U），用Excel录制宏提示 不能记录提示， 确定后，还是能录制的。
2024-01-27 12:27:17
198
原创 用VBA 进行经纬度转梅登黑德网格 的函数 Latitude and longitude to Madenhead grid
【代码】VBA 经纬度 梅登黑德网格 Latitude and longitude to Madenhead grid。
2023-02-02 00:17:43
310
原创 制作在Excel中以选中单元格为原点的十字线
当Excel中的数据占据整个屏幕时，在核对数据时，确定选定单元格的地址，眼睛的劳动强度非常大，有没有做了象AutoCAD软件中的十字光标呢？'用工作簿的SheetSelectionChange事件，就不用在工作表中的SelectionChange事件中写代码了。Target.EntireColumn.Interior.ColorIndex =15 '选中单元格的列，填充背景色。Target.EntireRow.Interior.ColorIndex =15 '选中单元格的列，充背景色。
2022-12-16 07:22:00
783
原创 用VBA获取毫秒级时间值的办法
系统自带的now() 、Timer()函数只能获取到秒级的时间值，使用Windows API的winmm.dll中的timeGetTime 就可以获得毫秒级的数值，这个值是从开机到现在的毫秒数。32位的操作系统在VBA代码的最前面输入下面的代码。Private Declare Function timeGetTime Lib “winmm.dll” () As Long '32位系统64位的操作系统在VBA代码的最前面输入下面的代码。Private Declare PtrSafe Function time
2022-09-09 23:11:53
1083
原创 Power Query 中用自定义函数实现 中文日期显示
Power Query 中用自定义函数实现 中文日期显示(MyDate as date, optional k as number)=>let // 获得年份，并转换成 文本类型 y= Text.From(Date.Year(MyDate)), //转换年份 MyYear=Text.Combine(List.Transform({0..3},each Text.Middle("〇一二三四五六七八九", Value.FromText(Text.Midd
2021-05-19 04:00:32
1543
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人