[問題] 請益程式碼錯誤

[melody99621 (胖虎海鮮)]

(若是和其他不同軟體互動之問題 請記得一併填寫)
軟體:excel

版本:2010

上次我發文後得到版上高手的幫忙寫出了一些端倪，
但在執行後卻發現SS、CS、及R並未成功的導入
再請高手們幫我看看問題在哪
附程式碼
https://i.imgur.com/PkDV5ok.png

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.37.38.199
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1520048754.A.7D7.html
→ soyoso: https://i.imgur.com/DT5bLD1.jpg 類似這樣
→ soyoso: 宣告如要明確以integer的話請個別宣告
→ soyoso: elseif...then後的執行的結果，也不用r =a and ...的邏輯
→ soyoso: 判斷；如要以數值判斷，不用range.text而是以range.value
→ soyoso: 或省略.value
→ melody99621: 我的r.ss.cs依舊是期始值沒改變耶
→ soyoso: 並不清楚原po修改巨集是什麼，也無法給於什麼建議
→ soyoso: 回文內的巨集執行後儲存格h21和i21所寫入ss和cs和初始值
→ soyoso: 380是不同的
→ soyoso: https://youtu.be/De4hvlWCXns 該連結為3/3 12:23回文的測
→ soyoso: 試
→ melody99621: 我知道s大的邏輯我也照著打不知道為什麼依舊是初始
→ melody99621: 值
→ soyoso: 上傳檔案到雲端，貼上連結，再看看問題，應是比較清楚
→ melody99621: https://i.imgur.com/TBsiwwr.jpg
→ melody99621: 我的ss依然是0.25，r 是1
→ soyoso: 判斷區間的話應是cells(a,"k") >=0.09 and cells(a,"k")
→ soyoso: <=0.25
→ soyoso: 連結內打的是<=0.09
→ melody99621: ...對不起我犯蠢材不過還是感謝s大，感謝您