随笔 - 750  文章 - 1  评论 - 107  阅读 - 34万

VBA文本型数字变成数值

 

sub test()
with activesheet
  .usedrange.numberformatlocal=""
  .usedrange=.usedrange.value
end with
end sub
一般运行一次就可以将全部文本型数字变成数值型了

复制代码
 1             Excel.Application excel = new Excel.Application();
 2             //excel.Visible = true;
 3             Excel.Workbook book = excel.Workbooks.Open(path + "\\" + fileName
 4                                 , Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);
 5             Excel.Workbook book1 = excel.Workbooks.Open(path + "\\Convert"
 6                 , Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);
 7             string macroname = "Convert!Convert";
 8             excel.Run(macroname
 9                 , Missing.Value
10                 , Missing.Value
11                 , Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value
12                 , Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value
13                 , Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);
14             book1.Close(false
15                 , Missing.Value, Missing.Value);
16             Marshal.ReleaseComObject(book1);
17             book.Close(true
18                 , Missing.Value, Missing.Value);
19             Marshal.ReleaseComObject(book);
20             excel.Quit();
21             Marshal.ReleaseComObject(excel);
复制代码

本文来自 http://club.excelhome.net/thread-648740-1-1.html

 

posted on   z5337  阅读(7178)  评论(0编辑  收藏  举报
编辑推荐:
· Linux系列:如何用heaptrack跟踪.NET程序的非托管内存泄露
· 开发者必知的日志记录最佳实践
· SQL Server 2025 AI相关能力初探
· Linux系列:如何用 C#调用 C方法造成内存泄露
· AI与.NET技术实操系列(二):开始使用ML.NET
阅读排行:
· 被坑几百块钱后,我竟然真的恢复了删除的微信聊天记录!
· 没有Manus邀请码?试试免邀请码的MGX或者开源的OpenManus吧
· 【自荐】一款简洁、开源的在线白板工具 Drawnix
· 园子的第一款AI主题卫衣上架——"HELLO! HOW CAN I ASSIST YOU TODAY
· Docker 太简单,K8s 太复杂?w7panel 让容器管理更轻松!
< 2025年3月 >
23 24 25 26 27 28 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 31 1 2 3 4 5

点击右上角即可分享
微信分享提示