ด้านล่างเราจะดูโปรแกรมใน Excel VBA นั่น ไฮไลท์แถวและคอลัมน์ของ Active Cell (เซลล์ที่เลือก) โปรแกรมนี้จะสร้างความประทับใจให้เจ้านายของคุณ
สถานการณ์:
ทุกครั้งที่เราเปลี่ยน Active Cell บน Sheet1 จะต้องดำเนินการมาโคร คุณสามารถทำได้โดยการสร้าง Worksheet SelectionChange Event
วิธีรวมชื่อใน excel ด้วยลูกน้ำ
1. เปิด โปรแกรมแก้ไข Visual Basic .
2. ดับเบิลคลิกที่ Sheet1 (Sheet1) ใน Project Explorer
3. เลือก แผ่นงาน จากรายการดรอปดาวน์ด้านซ้าย เลือก SelectionChange จากรายการดรอปดาวน์ด้านขวา
เพิ่มบรรทัดรหัสต่อไปนี้ในเหตุการณ์ Select Change Change:
4. เราประกาศตัวแปรสี่ตัวประเภท Integer หนึ่งชื่อ rowNumberValue หนึ่งชื่อ columnNumberValue หนึ่งชื่อ i และอีกอันหนึ่งชื่อ j
ไม่มีrowNumberValueเนื่องจาก จำนวนเต็ม, columnNumberValueเนื่องจาก จำนวนเต็ม, ผมเนื่องจาก จำนวนเต็ม, NSเนื่องจาก จำนวนเต็ม5. ขั้นแรก เราเพิ่มบรรทัดที่เปลี่ยนสีพื้นหลังของเซลล์ทั้งหมดเป็น 'ไม่เติม'
วิธีหาเศษเหลือใน excelCells.Interior.ColorIndex = 0
6. เราเริ่มต้นตัวแปร rowNumberValue ด้วยหมายเลขแถวของ Active Cell และตัวแปร columnNumberValue ด้วยหมายเลขคอลัมน์ของ Active Cell
rowNumberValue = ActiveCell.rowcolumnNumberValue = ActiveCell.column
7. เราเน้นคอลัมน์สีน้ำเงิน นั่นคือ: เซลล์ทั้งหมดที่มีหมายเลขแถวเล็กกว่าหรือเท่ากับ rowNumberValue และหมายเลขคอลัมน์เท่ากับ columnNumberValue
สำหรับผม = 1ถึงrowNumberValueเซลล์ (i, columnNumberValue).Interior.ColorIndex = 37
ต่อไปผม
คำอธิบาย: สำหรับตัวอย่างนี้ (ดูภาพด้านบน) rowNumberValue เท่ากับ 12 และ columnNumberValue เท่ากับ 8 บรรทัดโค้ดระหว่าง For และ Next จะถูกดำเนินการสิบสองครั้ง สำหรับ i = 1 Excel VBA จะกำหนดสีเซลล์ที่จุดตัดของแถวที่ 1 และคอลัมน์ที่ 8 สำหรับ i = 2 Excel VBA จะกำหนดสีเซลล์ที่จุดตัดของแถวที่ 2 และคอลัมน์ที่ 8 เป็นต้น
หมายเหตุ: แทนที่จะใช้ ColorIndex หมายเลข 37 (สีน้ำเงิน) คุณสามารถใช้หมายเลข ColorIndex ใดก็ได้
8. ในทำนองเดียวกัน เราเน้นแถวสีน้ำเงิน นั่นคือ: เซลล์ทั้งหมดที่มีหมายเลขแถวเท่ากับ rowNumberValue และหมายเลขคอลัมน์เล็กกว่าหรือเท่ากับ columnNumberValue
สำหรับเจ = 1ถึงคอลัมน์NumberValueเซลล์ (rowNumberValue, j).Interior.ColorIndex = 37
ต่อไปNS
9. ตอนนี้ได้เวลาทดสอบโปรแกรมแล้ว ดาวน์โหลดไฟล์ Excel และดูว่ามีการเน้นแถวและคอลัมน์ของเซลล์ที่ใช้งานอยู่ในแต่ละครั้งที่คุณเปลี่ยน Active Cell อย่างไร
ไปที่บทถัดไป: Array