返回列表下一主題上一主題發帖

參照Y欄找到X欄空白的位置

myleoyes

高中生 Rank: 3 Rank: 3

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

論壇贊助勳章論壇榮譽勳章

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2010-8-14 19:55 | 顯示全部帖子

參照Y欄找到X欄空白的位置

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

Leov26.rar (14.61 KB)

樓主熱帖

myleoyes

高中生 Rank: 3 Rank: 3

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

論壇贊助勳章論壇榮譽勳章

2^#

發表於 2010-8-15 08:23 | 顯示全部帖子

回復 2# kimbal
kimbal前輩你好!
   前輩!謝謝!這樣子找到是Y9的位置
   .Cells(Rows.Count, 1 + Month(Date) * 3).End(xlUp).Offset(1, 0).Select
   若改成
   .Cells(Rows.Count, 1 + Month(Date) * 3).End(xlUp).Offset(1, -1).Select
   才是找到X9的位置是正確,但再按鈕滑鼠應該是在X10的位置,因為Y10是" "
   結果在原位,不好意思小弟的問題沒有說清楚還要連續下去
   若改成
   .Cells(Rows.Count, 3 + (Month(Date) - 1) * 3).End(xlUp)(2, 1).Offset(2, 0).Select
   也不對....所以程式有誤,請不吝賜教謝謝再三!!

TOP

myleoyes