当前位置：网站首页 > IT知识 > 正文

excel 如何取得小数位数(函数+VBA)

liuian 2025-06-13 14:49 5 浏览

excel要完成以上任务，有网友提供以下公式解法：

C列公式	MAX(LEN(A2)-LEN(INT(A2))-1,)
D列公式	LEN(A2)-FIND(".",A2)
E列公式	IFERROR(LEN(A2)-FIND(".",A2),)
F列公式	LEN(MID(A2,FIND(".",A2)+1,999))
G列公式	MAX(LEN(A2)-LEN(INT(A2))-1,)
H列公式	tt(A2)
I列公式	dd(A2)
J列公式	tt(A2)

从表格第7行开始：D列和F列的公式，出现异常。

原因是无法处理整数，因为没有小数点。

第9行出现新问题，0.200000，这个数据如何处理小数点。

以上所有公式不能正常执行。使用VBA来完成任务：

Function tt(rng As Range)
    s = Trim(rng.Text)
    k = InStr(s, ".")
    If k <= 0 Then
        tt = 0
    Else
        tt = Len(s) - k
    End If
End Function

重点是使用了instr函数来判断有无小数点。

如果没找到结果tt=0;如果找到tt = Len(s) - k

另外还有一种方案是通过split来切分。

Function dd(rng As Range)
 s = Trim(rng.Text)
 kk = Split(s, ".")
 If UBound(kk) = 0 Then
    dd = 0
 Else
    dd = Len(kk(1))
 End If
End Function

以上两种vba方案都能正常处理上述所有问题。

vba int

上一篇：如何重新执行Excel表中的计算公式，这个方法不能错过
下一篇：VBA布尔矩阵筛选在财会场景的六大高阶应用

相关推荐

办公小技巧:定时提醒不慌张 Excel制作智能提醒器: 平时工作或学习中总有许多事情需要提醒，比如参加高考的日子、女友的生日、每周例会等。我们可以利用Excel的函数制作实用的智能提醒器，就不用担心忽略这些重要的日子了。每周例会轻松提醒公司规定每个月的最后...

使用vba将Excel 文件转成 CSV 文件: 使用vba将Excel中的内容写入文本文件，保存为txt或csv格式。方法一：SubtoCSV()DimshtAsWorksheetDimiAsInteger,j...

用Excel编写俄罗斯方块（vb做俄罗斯方块）: 看到这个题目，想必你一定会感到非常惊讶，什么，Excel居然能开发游戏？没错，Excel的强大取决于使用者，遇强则强，遇弱则弱。但我这篇文章并不是为了展示Excel使用过程中的奇技淫巧，而是主要写给那...

该死的手抄滚开（该死的手抄滚开表情包）: 碰到形式主义惯犯或硬拔存在感的，顶不住要手抄怎么办？电脑时代这一切都不是问题，除了纸张背面少点中性笔划下的凸痕。网络上有大量的手写体，比较大众化（就是丑）的有李国夫手写体、陈静的字体、萌妹子等，我们也...

Excel二维表转换一维表，三种方法一网打尽!: 今天高顿网校小编向大家分享二维表格转一维表的三种方法，分别用到函数、数据透视表和VBA代码。三种方法各有利弊，表亲可以自行选择。如下图，A1:E5是数据源，A7:C22是最终要实现的结果样式：一起动手...

PMC用到的所有函数，大咖总结，实用干货，PMC必备神器!: PMC用到的所有函数你和PMC大咖之间的差异，就是这些Excel函数！1.PMC日常用到的所有函数如下，大咖总结，实用干货，PMC必备神器！每个函数都有实例讲解，不怕你不会。序号PMC工作需求EXCE...

Excel VBA应用-13:统计业务员业绩，目标完成率分析表: 在评价业务员销售业绩时，往往会给业务员设定销售目标，根据实际业务计算业务员的目标完成率。报表格式如下图：要计算目标完成率，首先要有销售目标的数据，可以在Excel表中建立一个销售目标表，这种方式的好处...

VBA高级应用30例应用2实现在列表框内及列表框间实现数据拖动: 《VBA高级应用30例》（版权10178985），是我推出的第十套教程，教程是专门针对高级学员在学习VBA过程中提高路途上的案例展开，这套教程案例与理论结合，紧贴“实战”，并做“战术总结”，以便大家能...

技术分析:一款流行的VBA宏病毒（vba宏是什么）: 1.通过邮件传播的宏病毒近期流行的一个宏病毒通过邮件进行传播,捕捉到的一个样本，其邮件头如下：邮件的内容是这样子的(为节省篇幅,省略号处省略部分内容)：YourbillsummaryAccount...

Excel规划求解怎么用?最简单的3*3不同数字填充技...: Excel有什么样的功能，它到底有多强大？Excel表格中有函数公式、图表、操作技巧、vba操作等不同类型的使用方法，但还有一种更加重要的用法就是数据分析，需要用到的就是我们的Excel规划求解。规划...

excel vba vb.net考勤时间处理通用方法(2): 接上期：excelvbavb.net考勤时间处理通用方法（1）DimstartTicksAsIntegerstartTicks=My.Computer.Clock.Ti...

aardio + VBA ( Excel ) 快速开发，3 分钟可入门: aardio很小，下载就可以使用，没有任何复杂步骤。aardio与ExcelVBA（兼容WPSJSA）可以相互调用函数，不需要任何复杂的封装。3分钟够用，下面开始：一、aardio...

VBA+SQL实战:根据时间智能匹配比赛场次，获取最近3场比赛数据: “每天有大量比赛数据，如何快速判断某时间属于哪一场比赛，并自动获取最近3场记录？”本文介绍VBA和SQL双方案，实现：自动匹配时间所属场次（如“第一场/第二场/第三场”）智能返回最近3场比赛数据（跨...

Excel VBA 每天一段代码:自定义分页函数: 3月12日视频《ExcelVBA网友答疑：ActiveX控件实现数据分页、翻页》中，我自定义了函数窗体数据查询（），现将代码公布如下：参数说明：1、ItemNum每页显示的数据数量（由复合框下...

VBA布尔矩阵筛选在财会场景的六大高阶应用: 基于内存位运算与矩阵预编译技术，布尔矩阵可大幅提升财务数据处理效率。以下是针对2025年财务自动化需求的创新实践案例，覆盖审计、税务、合并报表等核心场景：1.多维度税务异常检测场景：在500万条交易...

一周热门

最近发表

首页
收录
顶部