Vba: วิธีอ่านค่าของเซลล์ในตัวแปร

คุณสามารถใช้ไวยากรณ์ต่อไปนี้ใน VBA เพื่ออ่านค่าของเซลล์ลงในตัวแปร:

 Sub ReadCellValueIntoVar()

Dim CellVal As String
CellVal = Range(" A1 ")

MsgBox CellVal

End Sub

มาโครเฉพาะนี้สร้างตัวแปรสตริงที่เรียกว่า CellVal จากนั้นอ่านค่าของเซลล์ A1 ของแผ่นงานที่ใช้งานอยู่ในปัจจุบันลงในตัวแปร

สุดท้ายนี้ เราใช้ MsgBox เพื่อแสดงค่าของตัวแปรนี้ในกล่องข้อความ

ตัวอย่างต่อไปนี้แสดงวิธีใช้ไวยากรณ์นี้ในทางปฏิบัติ

ตัวอย่าง: วิธีอ่านค่าของเซลล์ในตัวแปรใน VBA

สมมติว่าเรามีแผ่นงาน Excel ที่มีค่า 500 ในเซลล์ A1 :

เราสามารถสร้างแมโครต่อไปนี้เพื่ออ่านค่าของเซลล์นี้เป็นตัวแปรแล้วแสดงค่าในกล่องข้อความ:

 Sub ReadCellValueIntoVar()

Dim CellVal As String
CellVal = Range(" A1 ")

MsgBox CellVal

End Sub

เมื่อเราเรียกใช้แมโครนี้ เราได้รับผลลัพธ์ต่อไปนี้:

มาโครจะแสดงค่าของตัวแปร ซึ่งมีค่า 500 จากเซลล์ A1

โปรดทราบว่าเรายังสามารถทำการคำนวณที่ซับซ้อนมากขึ้นโดยใช้ตัวแปรได้หากต้องการ

ตัวอย่างเช่น เราสามารถสร้างแมโครต่อไปนี้เพื่ออ่านค่าของเซลล์ A1 ลงในตัวแปร จากนั้นสร้างกล่องข้อความที่แสดงค่านั้นคูณด้วย 5:

 Sub ReadCellValueIntoVar()

Dim CellVal As String
CellVal = Range(" A1 ")

MsgBox CellVal * 5

End Sub

เมื่อเราเรียกใช้แมโครนี้ เราได้รับผลลัพธ์ต่อไปนี้:

มาโครจะแสดงค่าของตัวแปรคูณด้วย 5 ซึ่งกลายเป็น 500 * 5 = 2500

แหล่งข้อมูลเพิ่มเติม

บทช่วยสอนต่อไปนี้จะอธิบายวิธีดำเนินการทั่วไปอื่นๆ ใน VBA:

VBA: วิธีตั้งค่าของเซลล์ในแผ่นงานอื่น
VBA: วิธีรับค่าของเซลล์จากแผ่นงานอื่น
VBA: วิธีเลือกช่วงในเซลล์ที่ใช้งานอยู่