excel怎么利用vba獲取單元格交叉范圍的數(shù)據(jù)?
我要評(píng)論excel中使用vba獲取多個(gè)單元格區(qū)域的交叉范圍
Excel2003綠色版 EXCEL2003精簡(jiǎn)綠色版 (附excel2003綠色工具)
- 類型：辦公軟件
- 大?。?/span>13.3MB
- 語(yǔ)言：簡(jiǎn)體中文
- 時(shí)間：2012-06-19
1、首先我們打開一個(gè)工作樣表作為例子。
2、在工作中，我們常常會(huì)遇到選擇多個(gè)工作表區(qū)域，而兩個(gè)工作表區(qū)域的交叉范圍如果需要我們?cè)偃ミx取的話，需要非常的小心，不然選擇錯(cuò)誤了又得重新來(lái)過。
3、實(shí)際上我們用vba可以方便的對(duì)這個(gè)區(qū)域作出選擇。我們使用alt+f11組合快捷鍵進(jìn)入vbe編輯器，插入一個(gè)新的模塊，并在模塊中輸入以下代碼：
Option Explicit
Sub quyu()
Dim rng1 As Range
Dim rng2 As Range
Dim rng As Range
Set rng1 = Sheets(1).Range("d6:g13")
Set rng2 = Sheets(1).Range("g11:k15")
Set rng = Application.Intersect(rng1, rng2)
'MsgBox rng.Address
rng.Formula = "=rand()"
End Sub
4、先定義一下三個(gè)變量為區(qū)域變量，然后將選擇的兩個(gè)區(qū)域分別賦值給rng1，rng2.這里使用intersect方法來(lái)求取兩個(gè)范圍的交叉區(qū)域。
5、這里使用msgbox來(lái)顯示rng變量，不能直接使用，必須使用rng對(duì)象的address方法才有返回值。
6、但是rng變量可以直接用來(lái)賦值，我們可以直接使用rng.Formula = "=rand()"這樣的方式來(lái)對(duì)交叉范圍進(jìn)行賦值。
相關(guān)推薦：
excel怎么使用vba的close關(guān)閉工作簿?
excel怎么利用vba實(shí)現(xiàn)批量套打快遞單批量打印單據(jù)?
相關(guān)文章
excel怎么使用vba判斷最后一個(gè)單元格是否為空?
excel怎么使用vba判斷最后一個(gè)單元格是否為空？excel中想要知道表格最后一個(gè)單元格有沒有數(shù)據(jù)，該怎么判斷呢？下面我們就來(lái)看看使用vba判斷的教程，需要的朋友可以參考下2016-10-18在excel表格中如何用vba給單元格批量輸入序號(hào)?
Excel最強(qiáng)大的功能就是能夠?qū)?shù)據(jù)進(jìn)行運(yùn)算，這依賴于excel的成百上千的內(nèi)部函數(shù)，更體現(xiàn)在excel的強(qiáng)大的VBA，這樣就讓越來(lái)越多的需要處理數(shù)據(jù)而又不會(huì)編程的人帶來(lái)方便，下2016-10-16- VBA是Excel的底層根本。只有明白使用最底層的東西，使用起來(lái)才能隨心所欲，下面小編就為大家介紹excel如何通過vba代碼關(guān)閉工作薄方法，一起來(lái)看看吧2016-10-16
- 我有一個(gè)excel文檔,里面又有很多個(gè)工作表,每個(gè)工作表里都有很多批注,我現(xiàn)在想把每個(gè)工作表里滿足條件的批注刪掉或者替換成別的，怎么操作呢？下面小編就為大家介紹excel vb2016-10-14
- 今天小編為大家分享excel使用vba選取全部工作表的兩種方法，對(duì)于不知道怎么操作的朋友可以參考本文，希望這篇文章能對(duì)大家有所幫助2016-10-12
- vba單元格引用在學(xué)習(xí)VBA過程中很常用，下面小編就為大家介紹excel vba如何引用單元格值方法，不會(huì)的朋友可以參考本文，一起來(lái)看看吧2016-10-11
excel怎么使用vba的close關(guān)閉工作簿?
excel怎么使用vba的close關(guān)閉工作簿？excel中我們可以使用vba完成很多動(dòng)作，包括關(guān)閉工作薄，今天我們就來(lái)看看close的使用方法，需要的朋友可以參考下2016-10-10- 這篇教程是向腳本之家的朋友分享excel用vba代碼隱藏行的方法，教程比較基礎(chǔ)，適合新手來(lái)學(xué)習(xí)，推薦到腳本之家，喜歡的朋友可以參考本文2016-10-08
- excel怎么使用vba快速重命名未打開的文件？excel想要對(duì)未打開的文件重命名，該怎么操作呢？我們可以使用vba來(lái)實(shí)現(xiàn)，下面我們就來(lái)看看詳細(xì)內(nèi)容，需要的朋友可以參考下2016-09-26
- 這篇教程是向腳本之家的朋友分享在excel表格中使用vba函數(shù)打開工作薄方法，方法很簡(jiǎn)單的，有需要的朋友可以參考本文，來(lái)看看吧2016-09-23