【更新】S工具2.3

懒懒的高贵

   经典图书

感谢楼主分享，很不错！

why2024

楼主太有才了，膜拜中……

why2024

   经典图书

楼主帮忙看看，同样的报错，文件也在同一文件夹，哪里出问题了，在编译运行宏就功能正常了？

why2024

wangyaoqiang 发表于 2025-6-22 09:44
打不开，不知道何原因

友友解决了吗？

鸣沙山

   经典案例图书

感谢楼主分享，很不错！

liyuyin007

活到老学到老！

wangyaoqiang

   经典案例图书

是放在同一个文件夹里，还是运行不了。

shinvis

不能用的友友，只有显示路径，没有文件名，各位请自行断点调试一下为什么文件名没有附值进去。
或者与系统也有关系。也可以自行加入指定名称，路径已经显示出来了

duanjibin88

很不错，顶一下！

shinvis

   经典图书

懒懒的高贵 发表于 2025-6-23 10:36
感谢楼主分享，很不错！

测试了WIN10，也是可以用的，不会出现读不到，但要是单单只调试读文件那个SUB，那名称就没有赋值相当于按钮告诉子程序，我给你什么，你再返回给我什么。单单运行子程序，什么都没给，所以读不出空的东西。
出现一个新的问题，看图。这个自行按什么系统自行更改

sunsu168

谢谢  分享  

sunsu168

请问 为什么 公差数值多了一个0， 比如应该是0.015的 ， 公差那栏显示的数值是00.015

sunsu168

1. 
   
2. Private Sub CommandButton49_Click()
   
3. XWJZ = TextBox6.Text
   
4. ReadSpecificCellFromCSV
   
5. TextBox7.Text = result
   
6. End Sub
   
7. Private Sub CommandButton50_Click()
   
8. XWJZ = TextBox6.Text
   
9. ReadSpecificCellFromCSV
   
10. TextBox7.Text = result
    
11. TextBox3.Text = TextBox7.Text
    
12. End Sub
    
13. 
    
14. Sub DuChui()
    
15. 
    
16. If ZZCR = True Then
    
17. XWJZ = TextBox6.Text
    
18. ReadSpecificCellFromCSV
    
19. 'TextBox7.Text = "0" & result  'win7系统下用
    
20. TextBox7.Text = result   'win10系统下用
    
21. 
    
22. TextBox3.Text = TextBox7.Text
    
23. End If
    
24. 
    
25. End Sub
    

复制代码

  原来30#有答案了， win10系统改这三处就可以了