UI设计自制日历窗体（无需注册MSCOMCTL.OCX）

mythqiu

prome3 发表于 2024-5-29 13:30
多谢支持！

遇到一个问题：


office 2021 64,win 11

mythqiu

prome3 发表于 2023-12-24 13:01
已写好，请见附件。运行效果如下（这窗体界面随便画的，仅作示例，将就一下）：

直接用此案例，卡死掉。
win11 家庭版本64，office 2021 64家庭版本

prome3

mythqiu 发表于 2024-5-29 14:13
直接用此案例，卡死掉。
win11 家庭版本64，office 2021 64家庭版本

其实，那个文件下载后直接运行必然会导致Excel崩溃。
在我自己的电脑上也会这样。
除非先重置VBA工程，然后本地编译一遍，再运行，才能成功：


直接运行会崩溃的原因是VBA的缓存机制。具体细节解释起来有点麻烦，有兴趣可以自己搜。

以至于后来我在后面的楼层直接只给源码，不给工作簿文件了，这样用户会先自行本地编译一遍：


最后，如果要运行代码，最好找最新版。本来这篇帖子是不打算更新了，但是还有好多人下载1楼的文件（拦都拦不住），以至于我不得不重写、重新测试代码置顶，为的就是减少旧版代码隐藏的bug给用户带来的不便：

mythqiu

prome3 发表于 2024-5-29 17:58
其实，那个文件下载后直接运行必然会导致Excel崩溃。
在我自己的电脑上也会这样。
除非先重置VBA工程， ...

我用的最新的1.26

prome3

mythqiu 发表于 2024-5-30 11:09
我用的最新的1.26

我回复的是这个楼层，这个楼层对应的文件并不是1.2.6。

而81楼的才是1.2.6：


81楼和81楼都有评论，我得分先后，对应新旧文件版本，一个一个回复。

方便的话可否上传一下测试文件，我看看你是怎么调用的。我这边也好调试排查原因。

mythqiu

prome3 发表于 2024-5-30 12:19
我回复的是这个楼层，这个楼层对应的文件并不是1.2.6。

而81楼的才是1.2.6：

改了下代码，给了个实列

mythqiu

prome3 发表于 2024-5-30 12:19
我回复的是这个楼层，这个楼层对应的文件并不是1.2.6。

而81楼的才是1.2.6：

已经找到问题原因，变为XLam加载宏不正常。我将：
改下面正常。建议您也改下，ThisWorkboook
Set win = ActiveWorkbook.Windows(1)

mythqiu

prome3 发表于 2024-5-30 12:19
我回复的是这个楼层，这个楼层对应的文件并不是1.2.6。

而81楼的才是1.2.6：

再请教：如果单元格调用，点击另外的单元格，前面调用的可否自动消失？一调用，焦点不在excel单元格了，改RestData为 public，也无法调用（无法点击下一个单元格）

mythqiu

这条如何改回？这个在单元格最大的一个应用场景：
在单元格为日期格式情况下，自动弹出，插入日期消失，或者点击下个日期单元格前面的消失，后面的再弹出。

判断是否日期格式，由调用的程序判断后决定是否调用（非您的程序来判断）。

prome3

mythqiu 发表于 2024-5-30 12:31
改了下代码，给了个实列

呐，这不就行了嘛
虽然没看出来改了哪里