精彩實用的十則VBA語句賞析

今天將繼續給大家分享VBA中的一些常用語句,希望有學習VBA的朋友要仔細的理解掌握,對於自己的工作會幫助很大,這些語句是我從眾多的VBA代碼中篩選出來,最為一些特定的通用語句來講解的,當然,以後還會陸續的給大家講。

1 Range("A65536").End(xlUp).Row 單元格的選擇

語句說明:返回A列最後一行(即記錄的總條數)。

備註:等於A65535單元格向上,最後一個非空的單元格的行號。A65535單元格是03版本的EXCEL的最後一行單元格,從此單元格向上查找到非空的單元格,相當於:CTRL+向上的箭頭。

2 ActiveCell.Row 行號的求出

語句說明:活動單元格所在的行號,ActiveCell.Column為活動單元格所在的列數,在寫語句的時候經常會用到"活動""當前",如活動單元格,當前單元格,活動工作表,當前工作表等,其實基本是一個意思,就是當前進行操作的工作表和單元格,主要用到ACTIVE。

3 ActiveWindow.ScrollRow = 2 滾輪的應用

語句說明:將當前工作表窗口滾動到第2行

備註:ActiveWindow是指文檔的活動窗口。 ScrollRow是指活動窗口滾動條滾動到的位置,row是指行,Column 是指列。

4 ActiveWindow.ScrollColumn = 5 滾輪的應用

語句說明:將當前工作表窗口滾動到第5列

備註:ActiveWindow是指文檔的活動窗口。 ScrollRow是指活動窗口滾動條滾動到的位置,row是指行,Column 是指列。

5 ActiveSheet.Cells(1, 1).Font.Bold = TRUE 字體的設置

語句說明:Bold屬性用於設置字體是否為加粗, Size屬性設置字體大小, ColorIndex屬性設置字體顏色(其值為顏色索引號), Italic屬性設置字型是否為傾斜, Name屬性設置字體名稱

備註:單元格的屬性有很多種,我們可以從代碼窗口中獲得,如下截圖:

精彩實用的十則VBA語句賞析

當我們錄入RAGNE.後系統會自動的彈出屬性窗口,再次錄入"FO"後會彈出以FO為開頭的屬性。讀者可以自己試試。

6 ActiveSheet.Cells(1, 1).Interior.ColorIndex = 3 顏色的設置

語句說明:將單元格的背景色設置為紅色

備註:Interior.ColorIndex是單元格的顏色屬性,這個值在我前面的文章中已經講過了,這裡不再多說。

7 IsEmpty (ActiveCell.Value) 單元格的判斷

語句說明:判斷活動單元格中是否有值

備註:Excel VBA中,IsEmpty函數是判斷單元格是否為空的最好的方法,使用方法為IsEmpty(Cells(Row,Col)),當單元格為空時,返回True,否則返回False。需要注意的是IS函數在VBA中和EXCEL中是不同的。

8 ActiveCell.Value = UCase(ActiveCell.Value) 大小寫的轉換

語句說明:將當前單元格中的字符轉換成大寫

備註:Ucase()是VB中的一個函數,函數作用是將一個字符串中的小寫字母轉化為大寫字母,而不對其中的數字,大寫字母進行處理,其中的字母U是英文單詞Uppercase(中文意思為大寫字母)的第一個字母。

9 ActiveCell.Value = StrConv(ActiveCell.Value, vbLowerCase) 大小寫的轉換

語句說明:將活動單元格中的字符串轉換成小寫

備註:

StrConv 函數,返回一個variant 類型的值(字符串)轉換為指定。

語法StrConv(字符串,轉換,LCID )

StrConv函數語法具有下面這些命名參數:vbUpperCase 將字符串轉換為大寫字符; vbLowerCase 將字符串轉換為小寫字符;vbProperCase ;將字符串中每個詞的第一個字母轉換為大寫; vbWide 將字符串中的窄(單字節)字符轉換為寬(雙字節)字符;vbNarrow 將字符串中的寬(雙字節)字符轉換為窄(單字節)字符。

10 Range("A1:D8").Copy Range("H1") 單元格的複製

語句說明:將指定單元格區域複製到從H1開始的區域中,用Cut方法可以實現剪切操作

備註:單元格的複製粘貼方法。

今日內容迴向:

1 單元格的屬性有哪些?

2 活動單元格的意義是什麼?

3 用單元格的屬性如何設置字體的顏色?


分享到:


相關文章: