Range 變數

帖子: 79
主題: 19
精華: 0
積分: 87
點名: 0
作業系統: win7
軟體版本: 旗艦版
閱讀權限: 20
註冊時間: 2017-3-22
最後登錄: 2024-3-12

論壇贊助勳章

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2019-3-6 17:43 | 只看該作者

Range 變數

抱歉爬了很多文章但這個感覺很簡單的變數頭腦一直打結
麻煩前輩們指點
i=儲存格 D1
想要選取 A1:B & i &
這段程式碼應該怎麼寫

樓主熱帖

帖子: 79
主題: 19
精華: 0
積分: 87
點名: 0
作業系統: win7
軟體版本: 旗艦版
閱讀權限: 20
註冊時間: 2017-3-22
最後登錄: 2024-3-12

論壇贊助勳章

2^#

發表於 2019-3-6 18:04 | 只看該作者

回復 1# eric7765
附個圖
想選取 A1到B 選取的比數參照D1

版主 Rank: 7 Rank: 7 Rank: 7

准提部林

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-26

3^#

發表於 2019-3-6 19:02 | 只看該作者

RANGE("A1:B" & i)
[A1:B1].RESIZE(i)
[A1].RESIZE(i, 2)

帖子: 79
主題: 19
精華: 0
積分: 87
點名: 0
作業系統: win7
軟體版本: 旗艦版
閱讀權限: 20
註冊時間: 2017-3-22
最後登錄: 2024-3-12

論壇贊助勳章

4^#

發表於 2019-3-6 21:47 | 只看該作者

回復 3# 准提部林
准大抱歉小弟實在是太新手了本來想說問完重點自己摸索但都出現物件不支援此屬性或方法

方便教我裡面要如何填寫會讓我按按鈕1時會選取 A1:B? 儲存格D1 像圖片這樣 D1如果是會選取5個 D1 如果是10會選取10個

Sub 按鈕1_Click()
End Sub

複製代碼

版主 Rank: 7 Rank: 7 Rank: 7

ML089

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

5^#

發表於 2019-3-7 09:10 | 只看該作者

回復 4# eric7765

Sub ex()
[A:C].ClearContents

Range("A1:B" & [d1]) = 1
[A11:B11].Resize([d1]) = 2
[A21].Resize([d1], 2) = 3
End Sub

按F8逐條執行查看

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

版主 Rank: 7 Rank: 7 Rank: 7

准提部林

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-26

6^#

發表於 2019-3-7 09:52 | 只看該作者

回復 4# eric7765

RANGE("A1:B" & i).select
[A1:B1].RESIZE(i).select
[A1].RESIZE(i, 2).select

三種都可用~~

帖子: 79
主題: 19
精華: 0
積分: 87
點名: 0
作業系統: win7
軟體版本: 旗艦版
閱讀權限: 20
註冊時間: 2017-3-22
最後登錄: 2024-3-12

論壇贊助勳章

7^#

發表於 2019-3-7 15:18 | 只看該作者

大感謝
兩位版主讓我受益良多