excel vba中 range.text和range.value的区别

时间:2013.11.15 发布人:mzvpar

excel vba中 range.text和range.value的区别

已解决问题

谷歌mzvpar用户在2013.11.15提交了关于“歌诗图excel vba中 range.text和range.value的区别”的提问,欢迎大家涌跃发表自己的观点。目前共有1个回答,最后更新于2024-12-28T04:45:28。我知道text和value的区别,但是我编辑的下列代码让我很模糊。我有一个窗体,上面一个ComboBox和一个CommandButton,首先在ComboBox里录入值,通过单击按钮,判断sheet3表中A列从上往下是否为空,如果为空,则将ComboBox的值赋到该单元格内并放弃继续向下查找,如果不为空,则判断该单元格的值是否与ComboBox值相同,相同则放弃向A列录入,如果不相同,则继续在A列向下判断单元格是否为空。以1000行为例,重复在ComboBox中录入”111“然后多次点击按钮的两种代码如下:
代码1:
Fora=1To1000
IfSheet3.Range("A"&a).Value=""ThenSheet3.Range("A"&a).Value=ComboBox1.Value:ExitForElseIfSheet3.Range("A"&a).value=ComboBox1.valueThenExitForEndIfEndIfNext
代码2:Fora=1To1000IfSheet3.Range("A"&a).Value=""ThenSheet3.Range("A"&a).Value=ComboBox1.Value:ExitForElseIfSheet3.Range("A"&a).Text=ComboBox1.TextThenExitForEndIfEndIfNext
代码2只是将代码1中间的那个if中的value换成了text,就实现了我想要的效果(只有一个单元格赋值为”111“),而代码1则是按一次按钮,就会在A列赋值一个”111“,请问这是为什么,另外如果将代码1或代码2中所有的value都变成text,是否也能实现我想要的效果。请高人来回答一下,多谢了。希望大家能够帮助她。

详细问题描述及疑问:我知道text和value的区别,但是我编辑的下列代码让我很模糊。我有一个窗体,上面一个ComboBox和一个CommandButton,首先在ComboBox里录入值,通过单击按钮,判断sheet3表中A列从上往下是否为空,如果为空,则将ComboBox的值赋到该单元格内并放弃继续向下查找,如果不为空,则判断该单元格的值是否与ComboBox值相同,相同则放弃向A列录入,如果不相同,则继续在A列向下判断单元格是否为空。以1000行为例,重复在ComboBox中录入”111“然后多次点击按钮的两种代码如下:
代码1:
Fora=1To1000
IfSheet3.Range("A"&a).Value=""ThenSheet3.Range("A"&a).Value=ComboBox1.Value:ExitForElseIfSheet3.Range("A"&a).value=ComboBox1.valueThenExitForEndIfEndIfNext
代码2:Fora=1To1000IfSheet3.Range("A"&a).Value=""ThenSheet3.Range("A"&a).Value=ComboBox1.Value:ExitForElseIfSheet3.Range("A"&a).Text=ComboBox1.TextThenExitForEndIfEndIfNext
代码2只是将代码1中间的那个if中的value换成了text,就实现了我想要的效果(只有一个单元格赋值为”111“),而代码1则是按一次按钮,就会在A列赋值一个”111“,请问这是为什么,另外如果将代码1或代码2中所有的value都变成text,是否也能实现我想要的效果。请高人来回答一下,多谢了。期待您的答案,千言万语,表达不了我的感激之情,我已铭记在心 !

希望以下的回答,能够帮助你。

第1个回答

用户名:纳米搜索