[原创]逐步提示的输入(2006.1.7更新，增加注释)

noodlesyu

真的很不错，加分。

zyqhack

不错，很喜欢

sihao

真是千古之绝唱，相见很晚啊！！！

sihao

QUOTE:

以下是引用rylane在2006-1-7 9:44:00的发言：

逐步提示的输入(2006.1.7更新并增加注释)

重新上传了，代码略做修改，增加代码注释：
这两个功能是一样的，方法两样，里面都有注释，给大家作为参考

不知大家发现没有，那个“分项报价表333.xls”，添加的新品名不能在输入框搜索出。在点刷新按钮后，输入框就失效了。而“分项报价表2.xls”正常

另给rylane高手一个建议，设个快捷键调出那个输入框，或在鼠标点击单元格时光标自动跳到输入框，输完拼音回车，光标自动跳到下面的品名选择框，用方向键选择后回车则输入单元格。

不知道用过炒股软件没有，哈哈，像吧！还像什么，哈哈，又成了工作薄自带的拼音输入软件，强！不如就叫rylane拼音输入法

等待rylane的大作

[此贴子已经被作者于2007-9-7 20:12:48编辑过]

zhzgl

[em02][em03][em03]

laosanjie

这还是 rylane楼主 2004-9-17 发表的，到今天快3年了！！！对我等新进论坛的菜鸟来说，无疑是又发现了一个“宝藏”！这么好的帖子一定要再顶上去，让更多的“后来人”受益！！！

好为人师

不错，就是似乎并不很实用                                ·

feldspar

where is the 61st storey

babyglock

你好,

我在網上用了一晚上才找到在EXCEL裡如何逐字觸發事的方法(之前完成沒有想到用TEXTBOX,只在愁WORKSHEET沒有KEYUP...)

妳的範本給我莫大的提示,但在應用過程中出現了一個問題,就是在SELECTIONCHANGE事件中,用戶必須自己按一下TEXTBOX才可以,因為沒有USERFORM,TEXTBOX不可以SETFOCUS.我再找了一下,原來只要在SELECTIONCHANGE事件中呼叫一下ACTIVATE就可以

因為ACTIVATE一定要放在外部模組的,所以如果在同一個WORKBOOK就可以用以下方式.

Sub ActivateScoreInput(SheetName As String)

    Sheets(SheetName).OLEObjects("TextBox1").Activate
  
End Sub

再次感謝你的範本

lindos

QUOTE:

以下是引用rylane在2004-9-17 11:29:00的发言：

在这里看到一个朋友关于要求在输入过程中的逐步提示的求助，觉得有挑战，很用心的做了一个。
允许中英文、大小写混合输入。

输入过程中，自动在总表中查找符合项，并在列表框中列出。见下图：

最后的更新在61楼。代码稍做了修改，增加了注释

值得学习,谢谢.

另外请教一下, 这么多汉字在代码里,做成文本文件调用或者单独放在同一个工作薄的一个sheet中读取不好吗?

还有, 读取或调用时把汉字放在dictionary中不更好吗, 字典不就是用来存放字的吗?

支持支持支持支持支持支持支持支持支持支持█████████持支持支持
支持支持支持支持支持支持支持支██████████████████持支持 
支持支持支持支持支持支████████████████持支持支持支持支持 
支持支持支持支持██████████支持支█████支持支持支持支持支持 
支持支持█████████持支持支持支持████支持支持支持支持支持支持 
支  ███████████持支持支持支持███████████持支持支持 
支持██████████支持支持支██████持支持███████持支持 
支持支持支持支持████支持支持支████持支持支持支█████支持支持 
支持支持支持支持████支持支持████支持██支持支█████支持支持 
支持支持支持支持████支持支持████支持████支█████支持支持 
支持支持支持支持████支持支持████支持████支█████支持支持 
支持支持支持支持████支持支持████支持███持支█████支持支持 
支持支持支持支持████支持支持████支████持支█████支持支持 
支持支持支持支持████支持支持████支████持支█████支持支持 
支持支持支持支持████支持支持████支████持支█████支持支持 
支持支持支持支持████支持支持███持支████持支█████支持支持 
支持██支持支█████支持支持███持支███支持支█████支持支持 
支持██████████支持支持支██持支██持支持支█████支持支持 
支持支█████████支持支持支持支持███持支持支持████支持支持 
支持支持支███████支持支持支持支持███持████支持支持支持支持 
支持支持支持██████支持支持支持支████持支█████支持支持支持 
支持支持支持支持支███支持支持支持████ 持支持███████持支持 
支持支持支持支持支持支持支持支持█████ 支持支持支 █████持支持