返回列表 上一主題 發帖

製值之後的下面儲存格皆為""

製值之後的下面儲存格皆為""

各位前輩你們好!
         前輩!問題如附檔說明
         請知道的前輩,不吝賜教謝謝再三!!

Leov46.rar (56.95 KB)

回復 2# hugh0620
hugh0620 前輩你好!
      前輩謝謝!!果然厲害喔!這段程式
         Cells(x, 7) = 11 * J    '每增一列增加11
         小第不解為何每增一列要用11來加呢?
         還有以範例來說32列是最後一列
         所以當按J32時因為後面是""所以程式
         無法停止  Next....
         另一方面是當J欄的儲存格=""時是
         不能執行程式前輩忘記考慮到
         原程式有說( If Target(1) <> "" Then nn )
         不好意思請再辛苦修改看看,謝謝再三!!

TOP

回復 4# Hsieh
hsieh前輩你好!
       偶像前輩!謝謝!!程式精簡有力贊!贊!
       辛苦囉!謝謝再三!!

TOP

回復 5# hugh0620
hugh0620 前輩你好!
      前輩謝謝!!G欄的數字是隨意下拉的結果
         造成你的誤解可見前輩觀察入微實在是真殆勢!
         當J欄的儲存格=""時,執行程式是無意義的
         如偶像前輩程式裡的這一段相同的意思
         If..... And Target(1) <> "" Then
         是小弟不會表達不好意思好像猜燈謎喔!殆勢!
         辛苦囉!謝謝再三!!

TOP

        靜思自在 : 為人處世要小心細心,但不要「小心眼」。
返回列表 上一主題