2007-09-21

excel里时间(时,分,秒,百分秒)进

是否有这个函数,我不太清楚,我用VBA自己编写了一个,两种方式,任你选择,第二种方式,可以根据实际情况调整循环的大小、单元格的位置。

如果不用宏,直接用函数tsum()也行

Sub kk() '手工测试

Dim rng1 As Range

Set rng1 = Application。 InputBox("请用鼠标选定求和范围", Type:=8)

ActiveCell = tsum(rng1)

End Sub

Sub kkk() ' 批量处理

Dim rng As Range

For i = 1 To 10

Set rng = Range(Cells(i, 1), Cells(i,...全部

是否有这个函数,我不太清楚,我用VBA自己编写了一个,两种方式,任你选择,第二种方式,可以根据实际情况调整循环的大小、单元格的位置。

如果不用宏,直接用函数tsum()也行

Sub kk() '手工测试

Dim rng1 As Range

Set rng1 = Application。

InputBox("请用鼠标选定求和范围", Type:=8)

ActiveCell = tsum(rng1)

End Sub

Sub kkk() ' 批量处理

Dim rng As Range

For i = 1 To 10

Set rng = Range(Cells(i, 1), Cells(i, 2))

Cells(i, 3) = tsum(rng)

Next

End Sub

Function tsum(rng As Range) '自定义函数

Dim sum1%, sum2%, sum3%, sum4%

Dim sum11$, sum22$, sum33$, sum44$

sum1 = 0: sum2 = 0: sum3 = 0: sum4 = 0

Application。

Volatile

On Error Resume Next

For Each c In rng

a = Split(c, ":")

sum4 = sum4 + Val(a(UBound(a)))

sum3 = sum3 + Val(a(UBound(a) - 1))

sum2 = sum2 + Val(a(UBound(a) - 2))

sum1 = sum1 + Val(a(UBound(a) - 3))

Next

sum44 = Format(sum4 Mod 1000, "000")

sum33 = Format((sum4 \ 1000 + sum3) Mod 60, "00")

sum22 = Format(((sum4 \ 1000 + sum3) \ 60 + sum2) Mod 60, "00")

sum11 = ((sum4 \ 1000 + sum3) \ 60 + sum2) \ 60 + sum1

tsum = sum11 & ":" & sum22 & ":" & sum33 & ":" & sum44

End Function。

收起

两个年月日怎么相减_用EXCEL表格怎么进行年月日的加减??相关推荐

  1. 把EXCEL表格导入到MYSQL中_将EXCEL表格中的数据导入mysql数据库表中(两种方法)...

    今天项目上遇到需要将excel中的数据导入到数据库的classify表中,于是乎拼命上网查阅方法,发现以下两种方法比较可行: 在此之前先说说按照网上的说法我没有试验成功的方法,将excel文件xls保 ...

  2. scanf可以输入负数吗_在excel表格中输入负数应该怎样输

    2019-10-10阅读(103) 1)两者通用在表达提出某种建议的意思「...怎麼样:...好吗?」时,"Howabout"和"Whatabout"是可以互换 ...

  3. java当前月份减一个月_Java对日期Date类进行加减运算、年份加减月份加减、时间差等等...

    实现代码一: import java.text.SimpleDateFormat; import java.util.Calendar; import java.util.Date; public c ...

  4. jsp 如何动态给图片赋值_在Excel表格中你知道如何动态引用图片吗?

    上期文章为朋友们分享了如何将照片快速批量导入导出到Excel表格中,那么如何根据文字匹配对应的图片你知道吗?这篇文章就和朋友们一起学习一下! 一.根据名称批量导入图片: 上期文章为朋友们分享的批量导入 ...

  5. access调整行高和列宽_《excel表格怎么调整行高和列宽》 EXCEL 表格如何导出至WORD 格式...

    EXCEL 表格如何导出至WORD 格式 1.演示使用的软件为word文字处理软件,软件为office家学生版2016. 2.首先打开我档,并在上方栏找到插入菜单,单击后在工具栏中找到文本-对象. 3 ...

  6. bigdecimal 减_市市场监管局多措并举推进高频事项“减时效”

    原标题:市市场监管局多措并举推进高频事项"减时效" 为进一步抓好全市市场监管系统政务服务"一网通办",坚持问题导向,推进高频事项"减时效", ...

  7. python比较excel中两列数据_python入门之对比两份excel表格数据

    今天老大交给我一个任务,对比两个版本的excel数据的异同(增删情况),唉,说多了都是泪,自从学会了python,再也不用担心老大这样的任务了~~~ 好了直接上代码吧,代码中解释 import xlr ...

  8. 键盘的箭头键不能上移和左移_做excel表格时,键盘上的上下左右键不能起到跳格作用,只会在一个格子里移动,为什么呢?...

    展开全部 解决办法: 1.按ALT+F11看看,有没有加载宏 2.是不是键盘右上e68a84e8a2ad3231313335323631343130323136353331333366303062角S ...

  9. aspose.cells 无法读取公式值_隐藏 Excel表格、公式的9种方法

    Excel,站在你面前,你却看不见..... 1.给Excel文件穿上隐身衣 在win10系统中,隐藏文件变得如此容易,选取文件点"隐藏所选项目",再去掉"隐藏的项目&q ...

最新文章

  1. MPB:南农韦中组-​铁载体对根际细菌互作效应的介导作用研究方法
  2. python行与行之间必须对齐_Python行和缩进
  3. MySQL免安装版,遇到MSVCR120.dll文件丢失错误的解决方案
  4. zoj 2709 Lottery 组合数,概率,贪心 (8-F)
  5. RFID采用率迟迟不涨,原因何在?
  6. python互相转换位置坐标(百度坐标、WGS_84、火星坐标)
  7. 【网络编程】之五、异步模型
  8. 小学数学N合一(洛谷P2433题题解,Java语言描述)
  9. ehcache 手动刷新缓存_清空DNS缓存的两个小方法
  10. qdir 类似工具_Qdir中文版|多窗口资源管理器下载_最火软件站
  11. lynx浏览器的使用教程
  12. 计算机发展史上的重要人物和公司,汉字发展史上的重要人物
  13. 区分 J2SE 和 J2EE
  14. LOONGSON派二代 ReWorks系统固化
  15. 人生效率手册:重塑升级版
  16. 推荐系统实践(项亮)读书笔记
  17. WIN10 查看隐藏进程并强制终止进程
  18. Python爬虫入门【19】: B站博人传评论数据抓取 scrapy
  19. 关于使用不同单片机 工程报错总结(STC12C5A60S2)
  20. 杭州SFDC开发者大会精彩片段(前端篇)

热门文章

  1. 计算机学院院长讲话稿,院长致辞
  2. RFC5826中文版 Home Automation RoutingRequirements in Low-Power and Lossy Networks
  3. 其实不然,爱上一座城
  4. 意外get接近完美的黑苹果 (UEFI + GPT)
  5. GitHub神隐藏功能 强推推推推!!
  6. Could not execute menu item (internal error),如何修改端口号
  7. 计算机键盘回车键换行,Win7系统下键盘Enter回车键五大功能介绍
  8. CF 19D, 线段树套set/KD-tree
  9. 骨传导有没有副作用,骨传导耳机可以更好的保护听力吗
  10. PS人像风景摄影后期1 2021-09-28