- 博客(7)
- 资源 (9)
- 收藏
- 关注
RSS订阅原创 从 Excel 导出 联系人名片文件（.vcf）安卓
If MsgBox(“导出成功，是否打开文件路径?”, vbYesNo + vbQuestion, “打开文件资源管理器”) = vbYes Then。.SaveToFile ChooseFolder & “” & FileName & “.vcf”, 2 '保存文件。FileName = Application.InputBox(“请输入导出文件名：”, “输入 vcf 文件名”)WriteStream.CopyTo BinStream '数据复制。Sub 另存为vcf()Sub 数据转换()
2023-08-10 16:45:23
243
1
原创 ppt随机中奖或点名程序
arrRM = Split(Me.TextBox1, " ", -1, 1) '如果有需要你可以替换这里的空格，改为你需要的分隔符： 如个为英文分号 Split(Me.TextBox1, “;'输入名单到: TextBox1 采用单个空格分隔，最前和最后一个数据后不要留空格（否则可能部分元素抽出为空）If Me.CommandButton1.Caption = “停” Then。Me.CommandButton1.Caption = “开始”Me.CommandButton1.Caption = “停”
2023-08-07 16:12:35
963
原创 统计WORD页码字数
m = Application.GetOpenFilename(Title:=“打开文件”, MultiSelect:=True, filefilter:=“WORD文件(If InStr(1, xlsFile, “操作表”) = 0 Then。MsgBox “done”, , “统计完毕”Sub WORD文件统计()Sub 列出所有文件名()MsgBox “完成”MsgBox “完成”Sub 文件改名()
2023-08-07 15:49:23
140
原创 Excel自动输入数字转换大写方法
公式：=IF(INT(SZ)=0,“”,TEXT(INT(SZ),“[dbnum2]g/通用格式”)&“元”)&IF((INT(SZ。第三步，输入函数公式：如“图三”所示，选中B2单元格，用“粘贴”命令将剪贴板中的公式复制到“编辑栏”中，按回车键完成。第一步，将B1单元格命名为“SZ”：如“图二”所示，选中B1单元格，在“名称框”中输入“SZ”，按回车键完成。10,“[dbnum2]g/通用格式”)&“角”)&IF((INT(SZ。10)=0,“零”,“”)))&IF((INT(SZ。
2023-08-01 15:35:19
432
1
原创 excel宏-提取文件夹中所有文件及文件夹名称
ActiveSheet.Hyperlinks.Add Anchor:=Cells(lngLastRow, 3), Address:=strFilePath, ScreenTip:=strFilePath '增加超链接。Cells(lngLastRow, 2) = Left(strFilePath, intNum - 1) '获取文件夹绝对地址。Range(“a1:b1”) = Array(“文件夹”, “文件名及超链接”)’ Cells(lngLastRow, 3) = “文件链接”
2023-07-30 08:05:16
1488
1
原创 制作EXCEL抽奖的代码
主界面图]](https://img-blog.csdnimg.cn/4a9932ffbd3b40eda676ddc7f7fd7067.png#pic_center)jiasudu = .Range(“C4”).Value '加速度，另一个过程触发加速。mrgdsudu = .Range(“C3”).Value '默认滚动速度。arr_renyuan = .Range(“A1:A” & rs) '人员名单。rs = .Range(“C2”).Value '人数。
2023-07-29 16:15:26
319
从 Excel 导出 联系人名片文件（.vcf）安卓
2023-08-10
按WORD模板r把EXCEL表生成单个WORD文档
2023-08-10
统计WORD页码字数,统计WORD页码字数
2023-08-09
PPT转PPTX, PPT转PPTX PPT转PPTX
2023-08-09
PPTX转PPT.PPTX转PPT
2023-08-09
批量获取PPT文件名, 批量获取PPT文件名
2023-08-09
ppt随机抽号(点名）程序ppt随机抽号(点名）程序ppt随机抽号(点名）程序ppt随机抽号(点名）程序ppt随机抽号(点名）程
2023-08-07
批量删除选中的相同图片
2023-08-07
批量设置WORD格式模板
2023-08-07
EXCEL合并工具模板
2023-08-07
EXCEL统计WORD页码字数
2023-08-07
学校报账登记系统模板(v8.8通用版
2023-08-02
学校报账登记系统模板(v8.8通用版）
2023-08-02
(电脑打开）学校报账登记情况模板，(电脑打开）学校报账登记情况模板(电脑打开）学校报账登记情况模板
2023-08-01
宏-提取文件夹中所有文件及文件夹名称
2023-07-30
excel抽奖随机工具
2023-07-30
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人