VBA回调函数作用讲解

905738810 · 发表于 2021-11-27 15:45

本帖最后由 905738810 于 2021-11-27 15:47 编辑

cui26896 发表于 2021-11-27 15:25
对，不仅Split有这个问题，在反复使用同一个数组过程中也会出现这种情况，如例
单元格数组排序
https://c ...

我好像回复过你这篇文章，我再为你多发一个，关注这个贴等后续审核通过

无雨谷 · 发表于 2021-11-27 15:50

学习学习，谢谢分享

905738810 · 发表于 2021-11-27 15:59

单元格数组排序：

关于这个贴，我继续用我写的字符串排序函数来展示一下，回调函数的强大
演示如下：只需要定义一个比较函数，就可以很轻松的实现排序了

单元格数组排序.rar (14.38 KB, 下载次数: 16)

cui26896 · 发表于 2021-11-27 17:13

还是有点懵懂，好象回调函数就是这个
Function 比较函数(值1，值2)
比较函数= Val(值1) > Val(值2)
end Functioon
通过这个函数可以对要比较的两个变量进行调整为数值型比较后返回逻辑值，不知这样理解是否正确？

905738810 · 发表于 2021-11-27 17:31

cui26896 发表于 2021-11-27 17:13
还是有点懵懂，好象回调函数就是这个
Function 比较函数(值1，值2)
比较函数= Val(值1) > Val(值2)

可以，自己写多个回调函数，通过字符串排序函数的第二参数来指定用哪个回调函数，你可以用f8跑一下代码更容易理解

905738810 · 发表于 2021-11-27 17:33

cui26896 发表于 2021-11-27 17:13
还是有点懵懂，好象回调函数就是这个
Function 比较函数(值1，值2)
比较函数= Val(值1) > Val(值2)

我回复你这篇是第四篇了，前几篇刚通过审核，你从头看看，或许就懂咯

准提部林 · 发表于 2021-11-27 18:05

排序自訂函數, 很難有通用的, 大都要根據狀況作整型的!
純數字或純文字, 或文數混合, 都有不同方式!
再則, 可能要考慮"空字符"的問題,
而且, 純用比大小的排序, 若摻有中文字及特殊字時(如全型外文.日文.自造字)
程序的排序與使用工作表排序, 結果會有誤差~~

另, 英數混合的文本, 更難正確排序, 如:AS1,AS12,AS2

dongdonggege · 发表于 2021-11-27 20:18

905738810 发表于 2021-11-27 14:24
继续上篇说，我增加了一个比较函数使排序算法更灵活
但灵活是有限的，在上篇代码中字符串排序函数永远只调 ...

请问老师，数字排序演示程序，
Excel运行的结果21,10,9,8,1，
而PowerPoint运行是10,8,21,9,1。
为什么？

648555205 · 发表于 2021-11-27 20:21

学习，谢谢分享

905738810 · 发表于 2021-11-27 20:53

dongdonggege 发表于 2021-11-27 20:18
请问老师，数字排序演示程序，
Excel运行的结果21,10,9,8,1，
而PowerPoint运行是10,8,21,9,1。

ppt我的工作用不到，从来没研究过

		自动登录	找回密码
密码			免费注册

[原创] VBA回调函数作用讲解