VBA的層級關(guān)系,程序、工作表、工作薄、單元格

1、VBA的層級關(guān)系，程序、工作表、工作薄、單元格好多朋友由于是初級學(xué)習(xí)階段，盡管小編每次推送都力求言簡意賅，通俗明了，但是還是有很多朋友不明所以，so，明天開始，小編將以視頻的形式把以前的文章為大家講解，希望大家喜歡！今天由于有幾個程序要寫，所以今天的文章就隨便找點基本的入門知識給那些初學(xué)的朋友們，很簡單，但是一定要弄明白！Excel的層次構(gòu)架，在一般圖書或者論壇來說，講完宏和VBE之后應(yīng)該講解數(shù)組和變量之類的東西了，但是我認(rèn)為那些都是在后續(xù)慢慢實踐過程中自然懂會的東西，所以對于變量我會以輕描淡寫的方式帶過，明白變量是何東西、怎么用就好了，所以不做長篇論述。從本篇我們著手vba的核心-appli

2、ction、workbook、worksheet、range（cell）。表示單元格的有很多種方法，本人只擅長使用這兩個，所以只著重講解這兩個。那么什么是在講解這些東西之前，我們先來看看一張圖，這里的appliction是Excel的最高級別，就是Excel程序。Workbook是由appliction創(chuàng)建的一個工作簿，在Excel系統(tǒng)里第二層。Worksheet是workbook里面的一張表單，一般新建的工作簿內(nèi)含三張表單，分別為sheet1/sheet2/sheet3。Range和cell就是表單里面的任意一個單元格，在Excel的最底層，也是由千萬個這樣的單元格組成的workbook。如

3、果看不懂沒有關(guān)系，我們換另外一種理解方法。Appliction就可以看做中國的某一個省，workbook就是appliction省中的一個縣，注意這個workbook只屬于appliction省，如果同時有兩個工作簿打開，就會有兩個appliction省，新學(xué)習(xí)這里很容易混肴,一定要注意區(qū)分開來。接著worksheet就是workbook縣里面的一個鄉(xiāng)鎮(zhèn)了，同樣這個鄉(xiāng)鎮(zhèn)只屬于workbook縣，當(dāng)然鄉(xiāng)鎮(zhèn)肯定會有很多個村子了，就是Range和cell了。上面我們在提到Range時還會連上cell,有人會問，省和縣以及鄉(xiāng)鎮(zhèn)都是一個，為什么這里會有兩個？不用著急，我在這里之所以把他們兩個放在一起說，

4、是因為鄉(xiāng)鎮(zhèn)下面的村子也可以用Range表75,也可以用cell表示，只是用法不同，下面我們就對這兩個“村子”進(jìn)行細(xì)致的講解。（這里我采取的是逆順講解，也就是先從最頂層講解，呵呵，這也是我學(xué)習(xí)的時候的方法，希望大家也能接受）RangeRange對象可能是VBA代碼中最常用的對象，Range對象可以是某一單元格、某一單元格區(qū)域、某一行、某一列、或者是多個連續(xù)或非連續(xù)的區(qū)域組成的區(qū)域。下面介紹Range對象的一些屬性和方法。其用法相當(dāng)簡單，就是（）里面加上需要引用的單元格位置，比如，引用單元格A1，則寫成Range（'a1'）即可。下面是range的一些屬性以及方法，不是很全的，不過

5、在平時使用中不是每個屬性都要使用的，所以我們著重幾個重點的屬性和方法進(jìn)行講解。了解了這些之后，我們就可以使用它來編寫簡單的程序了。設(shè)置引用單元格為指定文字：利用上次創(chuàng)建的按鈕，雙擊然后編寫代碼：PrivateSubCommandButton1_Click()Range('A1').Value='我在學(xué)習(xí)VBA'EndSub我們可以看到，有按鈕的的工作表的A1單元格里出現(xiàn)了“我在學(xué)習(xí)VBA”字符，這里我們使用的是range的value屬性，value屬性可以使引用單元格表示任意字符！其實按我當(dāng)初的理解，value屬性就是“值”的意思，注意，在引用單元格設(shè)置屬性的時

6、候文字必須要用單引號引起來，如果是數(shù)字則不用！在這個按鈕旁邊再新建一個按鈕，代碼如下：PrivateSubCommandButton2_Click()Range('A1').Font.Name='仿宋'Range('A1').Font.Size=24EndSub可以看到，剛剛在單元格的字體變成了宋體，字號增大到了24，這里使用的是font屬性，可以改變字體和字體大小還有下劃線等，反正只要關(guān)于字體的都能設(shè)置！由于篇幅有限，下面列舉一些常用的有關(guān)range的方法和屬性。單元格顏色：PrivateSubCommandButton2_Click()Cel

7、ls(1,1).Font.ColorIndex=3'字的顏色號為3紅色Cells(1,1).Interior.ColorIndex=3'背景的顏色為3紅色EndSub引用單元格位置：PrivateSubCommandButton2_Click()Range('a2').Value='單元格A1的位置是:行'&Range（'a1'）.Row&'，'&'列'&Range（'a1'）.ColumnEndSub這里使用的是range的Row和Column屬性，也就是單元格所在的行和列，需要說明的是，column屬性顯示出來的是數(shù)字，并不是我們常見的A列；B列；C列數(shù)字1代表的是A，2代表B，3代表C如下圖：range不僅可以代表某一個單一的單元格，也可以代表某一個區(qū)域，比如，你想引用A1到D17的區(qū)域，代碼可以寫成range（a1：d17），如下圖：如果你想清除單元格里