请教一个vba的判断语句，谢谢

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

trim(ThisWorkbook.Sheets("sheet2").Cells(2, 1).Value)
结果为字符串a

a = trim(ThisWorkbook.Sheets("sheet2").Cells(2, 1).Value)
结果为false

结果应该是true呀，上面的判断相等判断是否有问题，感觉写错了，但不知道缺个什么符号，谢谢了

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：VBA workbook sheets sheet Cells 字符串 false

你这个是赋值吧，比较运算符的等于是==

这两个是字符串，还用==?

如果trim(ThisWorkbook.Sheets("sheet2").Cells(2, 1).Value)字符串是"hello world"

那么，那么下列语句应该是True：
"hello world" = trim(ThisWorkbook.Sheets("sheet2").Cells(2, 1).Value)

为了更好说明问题，举例：

sub TestStr()
ThisWorkbook.Sheets("sheet2").Cells(2, 1).Value="hello world"
if "hello world" = trim(ThisWorkbook.Sheets("sheet2").Cells(2, 1).Value) then msgbox "good"
dim a as string
a="hello world"
if a = trim(ThisWorkbook.Sheets("sheet2").Cells(2, 1).Value) then msgbox "good again"
end sub

那么（你的WORKBOOK中需要存在Sheet2）该程序运行就是，出现两个的对话框显示："good", "good again"。

a要用双引号