PTT數位生活區 / Office

[算表] 巨集按鈕又一問

看板Office作者 (阿銀)時間12年前 (2014/01/17 16:35), 編輯推噓1(1推 0噓 12→)
留言13則, 2人參與, 最新討論串1/1
昨天感謝runaway580大大替我解決問題，可是今天又有新問題了... (小弟昨天跟今天問問題前都有上網估狗，可是都無法解決，抱歉問題這麼多...) A1 B1 A2 B2 昨天成功在B2=甲乙丙丁四種情況下列印出來，可是想到如果有ㄅㄆㄇㄈ...的情況出現要怎麼辦? 於是找到用else下條件 當B2=ㄅ時很順利印出sheet5 可是卻變成當B2=甲的時候他也會把B2=ㄅ列印出來，vb碼如下: click buttom1 Select case [B2] B2=甲，print sheet1,2 Select case[B2] B2=乙，print sheet3,4 . . . Select case[B2] Case Else print sheet5 End select 請問哪裡需要修改嗎？ ----- Sent from JPTT on my HTC Butterfly. -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 42.75.224.15
→
01/17 18:11, , 1F
Select Case [B2]
01/17 18:11, 1F
→
01/17 18:11, , 2F
Case "甲"
01/17 18:11, 2F
→
01/17 18:12, , 3F
print sheet1,2
01/17 18:12, 3F
→
01/17 18:12, , 4F
Case "乙"
01/17 18:12, 4F
→
01/17 18:13, , 5F
print sheet3,4
01/17 18:13, 5F
→
01/17 18:13, , 6F
Case Else
01/17 18:13, 6F
→
01/17 18:13, , 7F
print sheet5
01/17 18:13, 7F
→
01/17 18:13, , 8F
End select
01/17 18:13, 8F
→
01/17 18:30, , 9F
先問原po的內容是類似上面這樣吧 因為原po所po的似乎有點誤
01/17 18:30, 9F
→
01/17 18:37, , 10F
我猜原po是否是分開寫呢?
01/17 18:37, 10F
→
01/17 18:38, , 11F
就是一個判斷就寫一組select case ...end select
01/17 18:38, 11F
太感謝SOYOSO大了!! 真的是因為我在每段case後面都加一個End select，剛才刪掉就可以了 感謝這兩天解救我的runaway580大跟soyoso大~~~~ ※ 編輯: billabcddog 來自: 42.75.224.15 (01/17 19:23)
→
01/17 19:51, , 12F
謝謝您的紅包^^
01/17 19:51, 12F
推
01/19 00:34, , 13F
拍謝 沒打"最"後一行XD
01/19 00:34, 13F
‣ 更多 billabcddog 的文章
文章代碼(AID): #1IsEjj-- (Office)
Office 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 billabcddog 的文章
文章代碼(AID): #1IsEjj-- (Office)