最强大的智能提示表格模板 新增多项贴心设计 便于移植

托尼Ex

hao6880 发表于 2019-10-16 18:47
打不开是什么原因？

64位的Office，改成这样就行了

1. #If Win64 Then
   
2.     Public Declare PtrSafe Function ActivateKeyboardLayout Lib "user32 " _
   
3.         (ByVal hkl As Long, ByVal flags As Long) As Long                                 '指定输入法的顺序。可把指定的输入法调到第1位，成为活动输入法
   
4.         
   
5.     Public Declare PtrSafe Function GetKeyboardLayout Lib "user32 " (ByVal dwLayout As Long) As Long '获得指定线程的活动键盘布局代号。当前线程标识符为0
   
6.     Public Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
   
7. #Else
   
8.     Public Declare Function ActivateKeyboardLayout Lib "user32 " _
   
9.         (ByVal hkl As Long, ByVal flags As Long) As Long                                 '指定输入法的顺序。可把指定的输入法调到第1位，成为活动输入法
   
10.         
    
11.     Public Declare Function GetKeyboardLayout Lib "user32 " (ByVal dwLayout As Long) As Long '获得指定线程的活动键盘布局代号。当前线程标识符为0
    
12.     Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
    
13. #End If

复制代码

托尼Ex

wishrollance 发表于 2019-8-11 19:40
我是64位的电脑，运行不了大神的代码

可以运行的

托尼Ex

企鹅先森 发表于 2020-8-20 00:36
老师您好！
您看下  为什么会出现这个呢？您指点一下

搞定了，你要取开发工具里面添加2个Active控件，Textbox和Listbox

ping200030

感谢，学习了

gateun

ggmmlol 发表于 2018-1-9 10:31
这是为论坛会员imecco的求助贴做的应用实例。套用本模板，只需修改几个参数，充分说明了本模板确实是非常便 ...

两个工作表以上如何移植？

hhrt321

老师你好，我复制代码到别的文档里，只要一点击录入表单元格就出错，提示：【用户定义类型未定义】

附件已上传，请帮改改，多谢！能不能在弹出列表里中文搜索....

xkzb

两个工作表以上如何移植？

gaolzhen

.感谢分享！！！！！
学习新知识
好东西 收藏了  

xkzb

64位的Office，运行不了

honghuyuren

无意中看到帖子，学习中