麻辣家族討論版版 » Excel程式區 » 判斷選取某列或某欄儲存格的欄或列?(已解答，感謝眾多資深大大的解說)

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

[發問] 判斷選取某列或某欄儲存格的欄或列?(已解答，感謝眾多資深大大的解說)

大學生 Rank: 4

帖子: 703
主題: 276
精華: 0
積分: 1005
點名: 1
作業系統: Windows 10
軟體版本: Office 2019
閱讀權限: 50
性別: 男
註冊時間: 2011-6-30
最後登錄: 2024-5-29

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2011-8-18 11:55 | 只看該作者

[發問] 判斷選取某列或某欄儲存格的欄或列?(已解答，感謝眾多資深大大的解說)

本帖最後由 av8d 於 2011-8-19 23:20 編輯

如何判斷選取某列或某欄儲存格的時候~去選取整欄或整列?

共有兩個需求"欄"和"列"
1.以欄來說
我會先下個IF判斷式去判斷目前選取了哪一欄~例如我選取了D4~所以我系統是否可以幫我判斷我選取的欄位是D欄~然後VBA下指令去選取D欄一整欄
2.以列來說
呈上題D4為例~我選取了D4~所以系統是否可以幫我判斷我選取了第4列~然後VBA下指令去選取第4列一整列

以上不知道我表達的清不清楚~煩請各位資深大大了~謝謝!

樓主熱帖

收藏

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

2^#

發表於 2011-8-18 13:41 | 只看該作者

Range("D4").EntireColumn.Select
Range("D4").EntireRow.Select

大學生 Rank: 4

帖子: 703
主題: 276
精華: 0
積分: 1005
點名: 1
作業系統: Windows 10
軟體版本: Office 2019
閱讀權限: 50
性別: 男
註冊時間: 2011-6-30
最後登錄: 2024-5-29

3^#

發表於 2011-8-18 15:57 | 只看該作者

回復 2# oobird

大大不好意思~這個是選取D4欄和列的~指定是D4

但是我如果要先判斷我目前儲存格是在哪~該如何判斷呢?

簡化來說就是~我想要選取目前儲存所選的欄或列~

例如我今天點一下F5
~然後我放兩個按鈕~第一個點下去~會自動選擇F欄
第二個點下去~會自動選擇第5列

超級版主 Rank: 8 Rank: 8

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 253
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2024-11-22

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

4^#

發表於 2011-8-18 16:10 | 只看該作者

回復 3# av8d

ActiveCell=作用中儲存格
或使用Selection=選取範圍

學海無涯_不恥下問

大學生 Rank: 4

帖子: 703
主題: 276
精華: 0
積分: 1005
點名: 1
作業系統: Windows 10
軟體版本: Office 2019
閱讀權限: 50
性別: 男
註冊時間: 2011-6-30
最後登錄: 2024-5-29

5^#

發表於 2011-8-18 20:57 | 只看該作者

請問作用中的儲存格向右一格是不是
ActiveCell.Column + 1

可是他會把+自動刪除

執行的時候就無法執行

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

6^#

發表於 2011-8-18 21:18 | 只看該作者

為什麼會自動刪除？
試試運行：MsgBox ActiveCell.Column + 1

大學生 Rank: 4

帖子: 703
主題: 276
精華: 0
積分: 1005
點名: 1
作業系統: Windows 10
軟體版本: Office 2019
閱讀權限: 50
性別: 男
註冊時間: 2011-6-30
最後登錄: 2024-5-29

7^#

發表於 2011-8-18 21:44 | 只看該作者

回復 6# oobird

MsgBox ActiveCell.Column + 1

執行後跳出一個視窗~可是數值不太正確

不是該欄位+1後的數值

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

8^#

發表於 2011-8-19 15:05 | 只看該作者

回復 5# av8d
請問作用中的儲存格向右一格是不是 ActiveCell.Column + 1
MsgBox ActiveCell.Offset(0,1).Address 作用中儲存格向右一格的位置

大學生 Rank: 4

帖子: 703
主題: 276
精華: 0
積分: 1005
點名: 1
作業系統: Windows 10
軟體版本: Office 2019
閱讀權限: 50
性別: 男
註冊時間: 2011-6-30
最後登錄: 2024-5-29

9^#

發表於 2011-8-19 23:19 | 只看該作者

我成功了~作用中儲存格該列如下
ActiveCell.EntireRow.Select

謝謝各位大大指導~終於領悟了~受益良多!

靜思自在 : 君子如水，隨方就圓，無處不自在。

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