วัตถุช่วง Excel VBA

คน ช่วงวัตถุ ซึ่งเป็นส่วนตัวแทนของห้องขัง(หรือเซล)ของแผ่นงานที่สำคัญที่สุดของวัตถุ Excel VBA ได้ บบทนี้ทำให้ภาพรวมของคุณสมบัติของและวิธีการของช่วงวัตถุนี้ คุณสมบัติของเป็นบางอย่างซึ่งเป็นสิ่งมี(พวกเขาอธิบายวัตถุ)ระหว่างที่วิธีการทำบางอย่าง(พวกเขาแสดงอกการกระทำกับวัตถุ)ย

ตัวอย่างช่วง

วางปุ่มคำสั่งในแผ่นงานของคุณและเพิ่มบรรทัดรหัสต่อไปนี้:

Range("B3").Value = 2

ผลลัพธ์เมื่อคุณคลิกปุ่มคำสั่งบนแผ่นงาน:

รหัส:

Range("A1:A4").Value = 5

ผล:

รหัส:

Range("A1:A2,B3:C4").Value = 10

ผล:

ข้อควรจำ:จะมีการอ้างเป็นที่ชื่ออยู่ในช่วงของคุณ Excel VBA รหัสการใช้รหัสเหมือนนี้:

Range("Prices").Value = 15

เซลล์

แทนที่จะเป็นช่วง,คุณยังสามารถใช้ห้องขังของตัวเอง การใช้เซลล์เป็นค่อยมีประโยชน์ตอนที่คุณอยากจะเล่นผ่านช่วงนะ

รหัส:

Cells(3, 2).Value = 2

ผล:

คำอธิบาย:Excel VBA เข้าค่า 2 เข้าไปในห้องขังกลางสี่แยกของแถว 3 และ 2 คอลัมน์นี้

รหัส:

Range(Cells(1, 1), Cells(4, 1)).Value = 5

ผล:

ประกาศเกี่ยวกับ Range Object

คุณสามารถประกาศเป็นช่วงวัตถุได้โดยใช้คำค้นจ้างและเรียบร้อย

รหัส:

Dim example As Range
Set example = Range("A1:C4")

example.Value = 8

ผล:

เลือก

ที่สำคัญวิธีการของช่วงวัตถุเป็นคนเลือกวิธีการ. กาเลือกวิธีการง่ายเลือกเป็นโอกาสสุดท้ายแล้ว

รหัส:

Dim example As Range
Set example = Range("A1:C4")

example.Select

ผล:

ข้อควรทราบ:เพื่อเลือกเซลล์อยู่บนต่างกันแผ่นงานคุณต้องเปิดใช้งานนี้แผ่นงานก่อน ด้วยตัวอย่างเช่นตามกฎเส้นเลือมือถือ B7 คนที่สามองแผ่นงานจากทางซ้าย

Worksheets(3).Activate
Worksheets(3).Range("B7").Select

แถว

คนแถวบ้านทำให้การเข้าถึงต้องเฉพาะเรื่องแถวของผมสามารถบอกได้นะ

รหัส:

Dim example As Range
Set example = Range("A1:C4")

example.Rows(3).Select

ผล:

หมายเหตุ: ขอบสำหรับภาพประกอบเท่านั้น

คอลัมน์

คุณสมบัติคอลัมน์ให้การเข้าถึงคอลัมน์เฉพาะของช่วง

รหัส:

Dim example As Range
Set example = Range("A1:C4")

example.Columns(2).Select

ผล:

หมายเหตุ: ขอบสำหรับภาพประกอบเท่านั้น

คัดลอกวาง

วิธีการคัดลอกและวางจะใช้เพื่อคัดลอกช่วงและวางไว้ที่อื่นบนแผ่นงาน

รหัส:

Range("A1:A2").Select
Selection.Copy

Range("C3").Select
ActiveSheet.Paste

ผล:

แม้ว่าสิ่งนี้จะได้รับอนุญาตใน Excel VBA แต่จะดีกว่ามากถ้าใช้รหัสบรรทัดด้านล่าง

Range("C3:C4").Value = Range("A1:A2").Value

ชัดเจน

เพื่อล้างเนื้อหาของช่วง Excel คุณสามารถใช้วิธีการ

Range("A1").ClearContents

หรือเพียงใช้:

Range("A1").Value = ""

หมายเหตุ: ใช้วิธีการล้างข้อมูลเพื่อล้างเนื้อหาและรูปแบบของช่วง ใช้เมธอด ClearFormats เพื่อล้างรูปแบบเท่านั้น

นับ

ด้วยคุณสมบัติ Count คุณสามารถนับจำนวนเซลล์แถวและคอลัมน์ของช่วง

หมายเหตุ: ขอบสำหรับภาพประกอบเท่านั้น

รหัส:

Dim example As Range
Set example = Range("A1:C4")

MsgBox example.Count

ผล:

รหัส:

Dim example As Range
Set example = Range("A1:C4")

MsgBox example.Rows.Count

ผล:

หมายเหตุ: ในทำนองเดียวกันคุณสามารถนับจำนวนคอลัมน์ของช่วง