以万为excel单位改为万元9065400怎么改

来源：蜘蛛抓取(WebSpider) 时间：2015-09-16 11:03 标签： excel 改成万为单位
扫二维码下载作业帮
拍照搜题，秒出答案，一键查看所有搜题记录
下载作业帮安装包
扫二维码下载作业帮
拍照搜题，秒出答案，一键查看所有搜题记录
改写成以“万”为单位的
加油刘忻lC8
扫二维码下载作业帮
拍照搜题，秒出答案，一键查看所有搜题记录
40030.2（万） 肆亿零叁拾万贰仟
为您推荐：
其他类似问题
扫描下载二维码查看: 17701|回复: 16
工作表中的数字怎样改成以“万”为单位？
阅读权限20
在线时间 小时
一个财务数据表里有一堆数据，每个都是1000多万的样子，现在我想把他们都用以“万”为单位的数字来表示，但是不想手动输入，比如一个数值，我想让他变成1023（单元格内数值还是），请问怎么做到？
阅读权限90
在线时间 小时
你那个要求不好办，不过除10000后变成，显示为1023不行吗？
阅读权限95
在线时间 小时
自定义格式 0!.0000万
阅读权限20
在线时间 小时
自定义格式后显示的还是万啊~怎么做到显示1023万啊？
阅读权限95
在线时间 小时
原帖由 yagami512 于
15:16 发表
自定义格式后显示的还是万啊~怎么做到显示1023万啊？
自定义格只能做到这样
[ 本帖最后由 wudixin96 于
15:22 编辑 ]
阅读权限30
在线时间 小时
Sub YWFD()
Dim c As Variant, t As Long, d As Variant, f As Variant
Dim i As Long, j As Long
d = ActiveSheet.UsedRange.Value
Application.ScreenUpdating = False
For i = 1 To UBound(d, 1)
& & For j = 1 To UBound(d, 2)
& && &&&If TypeName(d(i, j)) = &Double& Then
& && && && &d(i, j) = WorksheetFunction.Round(d(i, j) / 10000, 2)
& && && &&&' Else: d(i, j) = &'& & d(i, j)
& && &&&End If
& & Next j
ActiveSheet.UsedRange = d
Application.ScreenUpdating = True
MsgBox (Timer - t)
要不就试试这样的宏代码，把金额直接全部除以10000
阅读权限50
在线时间 小时
=TEXT(A1/10000,0)&&万&，楼主加个辅助列怎么样》
阅读权限20
在线时间 小时
弱弱地问一句，楼上这个宏代码怎么弄到excel里去？本人对宏一窍不通~
阅读权限95
在线时间 小时
原帖由 zealot30 于
15:32 发表
Sub YWFD()
Dim c As Variant, t As Long, d As Variant, f As Variant
Dim i As Long, j As Long
d = ActiveSheet.UsedRange.Value
Application.ScreenUpdating = False
For i = 1 To UBound(d, 1) ...
问题在于楼主有句话“（单元格内数值还是）”，这段代码是改单元格值的。而不只是显示
阅读权限20
在线时间 小时
在空白地方写上10000,然后选择你需要变为万的单元格
“选择性粘贴”—“数值”，“运算部分”选择“除”，就可以了。
不太清楚你的表是怎么样的，如果中间有多处运算部分的话，那么选单元格时就比较麻烦了。
希望对你有帮助~~
[ 本帖最后由 斑斑 于
15:45 编辑 ]
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师

我要回帖

更多关于 excel 改成万为单位 的文章

 

随机推荐