返回列表 上一主題 發帖

[發問] 請教 if 判斷式太長 ，怎麼換行？

ji12345678

帖子
28 
主題
17 
精華
0 
積分
79 
點名
0  
作業系統
XP 
軟體版本
SP2 
閱讀權限
20 
性別
女 
註冊時間
2012-5-4 
最後登錄
2016-9-29 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2014-5-13 01:40 | 只看該作者

[發問] 請教 if 判斷式太長 ，怎麼換行？

請教 if 判斷式太長 ，怎麼換行？
if Cells(x_step, 15) = 20  or Cells(x_step, 15) = 235 or Cells(x_step, 15) = 25 or Cells(x_step, 15) = 207  then
  
Else

End if


Cells(x_step, 15) = 20  or Cells(x_step, 15) = 235 or _  ===========>寫成兩行，要怎麼寫丫。
Cells(x_step, 15) = 25 or Cells(x_step, 15) = 207 then

感恩~~~。謝謝。
收藏 分享

jewayy

帖子
36 
主題
9 
精華
0 
積分
51 
點名
0  
作業系統
Win7 
軟體版本
Office2003 
閱讀權限
20 
性別
男 
註冊時間
2011-10-30 
最後登錄
2015-1-31 
4#
發表於 2014-5-15 21:56 | 只看該作者
多加個  _   符號就可以接下行了！
Hi~

TOP

sunnyso

帖子
605 
主題
92 
精華
0 
積分
648 
點名
0  
作業系統
windows 
軟體版本
7 
閱讀權限
50 
性別
男 
來自
macau 
註冊時間
2013-4-5 
最後登錄
2019-2-10 

熱烈參與勳章好學求知勳章
3#
發表於 2014-5-15 10:39 | 只看該作者
回復 1# ji12345678
  1. num2lookup = ",20,235,25,207,"
  2. if UBound(Split(num2lookup, "," & Cells(x_step, 15) & ",")) >0 then
  3. ......
  4. end if
  5.    
複製代碼
ss

TOP

smart3135

帖子
96 
主題
18 
精華
0 
積分
125 
點名
0  
作業系統
Windows 7 
軟體版本
Office 2007 
閱讀權限
20 
性別
男 
註冊時間
2014-3-23 
最後登錄
2022-8-2 
2#
發表於 2014-5-13 05:14 | 只看該作者
回復 1# ji12345678
參考看看
  1. Sub test()
  2. If Cells(x_step, 15) = 20 Or Cells(x_step, 15) = 235 Or _
  3. Cells(x_step, 15) = 25 Or Cells(x_step, 15) = 207 Then
  4. End If
  5. End Sub
複製代碼

TOP

        靜思自在 : 難行能行，難捨能捨，難為能為，才能昇華自我的人格。
返回列表 上一主題