返回列表 上一主題 發帖

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

myleoyes

帖子
463 
主題
116 
精華
0 
積分
580 
點名
0  
作業系統
Vista 
軟體版本
2007 
閱讀權限
50 
性別
男 
註冊時間
2010-5-4 
最後登錄
2017-11-13 

論壇贊助勳章論壇榮譽勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2011-2-12 22:12 | 顯示全部帖子

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

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

Leov46.rar (56.95 KB)

收藏 分享

myleoyes

帖子
463 
主題
116 
精華
0 
積分
580 
點名
0  
作業系統
Vista 
軟體版本
2007 
閱讀權限
50 
性別
男 
註冊時間
2010-5-4 
最後登錄
2017-11-13 

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

TOP

myleoyes

帖子
463 
主題
116 
精華
0 
積分
580 
點名
0  
作業系統
Vista 
軟體版本
2007 
閱讀權限
50 
性別
男 
註冊時間
2010-5-4 
最後登錄
2017-11-13 

論壇贊助勳章論壇榮譽勳章
3#
發表於 2011-2-15 21:11 | 顯示全部帖子
回復 4# Hsieh
hsieh前輩你好!
       偶像前輩!謝謝!!程式精簡有力贊!贊!
       辛苦囉!謝謝再三!!

TOP

myleoyes

帖子
463 
主題
116 
精華
0 
積分
580 
點名
0  
作業系統
Vista 
軟體版本
2007 
閱讀權限
50 
性別
男 
註冊時間
2010-5-4 
最後登錄
2017-11-13 

論壇贊助勳章論壇榮譽勳章
4#
發表於 2011-2-15 21:13 | 顯示全部帖子
回復 5# hugh0620
hugh0620 前輩你好!
　　　   前輩謝謝!!G欄的數字是隨意下拉的結果
         造成你的誤解可見前輩觀察入微實在是真殆勢!
         當J欄的儲存格=""時,執行程式是無意義的
         如偶像前輩程式裡的這一段相同的意思
         If..... And Target(1) <> "" Then
         是小弟不會表達不好意思好像猜燈謎喔!殆勢!
         辛苦囉!謝謝再三!!

TOP

        靜思自在 : 【停滯不前，終無所得】人都迷於尋找奇蹟，因而停滯不前；縱使時間再多、路再長，也了無用處，終無所得。
返回列表 上一主題