主题：[求助]如何限定某列只能输入汉字

只能输入汉字，不能包含字母、数字、符号等其他字符，能做到吗？

egd文件下载

这个是检验是否是数字，比较简单，我的问题是检验是否为汉字，其他字符或包含其他字符一概不能通过

噢，是我看走眼了。

-=-=-=- 以下内容由 czy 在 2006年09月17日 11:56pm 时添加 -=-=-=-
这种要求恐怕只能用Substitute了。

呵呵，还是自己想出办法了，供大家日后遇到同样问题时借鉴

将列操作设置为：
if(len([当前列])/len(GetPY([当前列]))=2,true,msgbox("本列只能输入汉字",1,4) and SetCellText(grid,rowsel,colsel,""))

呵呵，楼主乐观了点，下面的字无论哪一个输进去都不行：

阪匕匾鬓亳姹婵禅昶丞叱俦徂叨氐娣貂仃噩彷绯霏翡凫匐伽伽尕丐尴睾鬲亘艮觥佝觚卦刿晗昊訇斛浒冱徨叽剞亟暨霁谏姣褯阱刭靓阄觖厥佧剀侃伉轲叩刳邝馗匮剌岚崂羸娌俪雳冽翎浏蠃痲邙扪旻貊貘侔沐鼐褦孬昵廿佞侬驽丕貔姘娉匍岐琪阡倩妾謦嵘卅啬霎讪剡觞佘厍厮夙觫褟婷霆仝佟氽佗娲剜纨莞罔雯刎邬兀骛兮晞冼箫囟貅徇巽闫兖俨恙夭佚驿弈羿胤嬴攸禺竽雩昱毓媛赜蜇峥觯侏竺伫觜訾恣

我晕~~
可以返回词组的拼音缩写,可用于辅助代码设计,但是重音字和生僻字需要用户手工干预。
这些字是GetPY()函数无法辨认的啊，这下麻烦了，再想不出更好的办法了，郁闷。。

其实你们都想复杂了，根据czy 版主的操作公式改作
if(code([只录数字])>127, True,SetCellText(Grid,Row,Col,""))就可以了，不过有一点要注意的是，标点的全角和半角是不一样的，全角是字符算汉字。[只录数字]列要改成字符型。

考没考虑中间有数字的问题？

没用的，code只对第一个字有效。