วิธีกราเพิ่มสมาชิกในarray ด้วยข้อมูลในcell ของexcel !!
ในการเพิ่มสมาชิกไปยังอาร์เรย์ใน VBA จากเซลล์เราสามารถใช้ขั้นตอนต่อไปนี้ในการจัดการข้อมูล
ประกาศอาร์เรย์และกำหนดขนาดของอาร์เรย์ ตัวอย่างเช่น:
Dim myArray(5) As String
นี่เป็นการประกาศอาร์เรย์ที่มีองค์ประกอบ 6 รายการ (ดัชนี 0 ถึง 5) ที่สามารถเก็บค่าสตริงได้
กำหนดค่าของเซลล์ให้กับตัวแปร ตัวอย่างเช่น:
Dim cellValue As String
cellValue = Range("A1").Value
สิ่งนี้กำหนดค่าของเซลล์ A1 ให้กับcellValueตัวแปร
เพิ่มค่าให้กับอาร์เรย์ เพื่อความสะดวกสามารถใช้UBoundฟังก์ชันเพื่อกำหนดดัชนีสุดท้ายของอาร์เรย์ จากนั้นเพิ่มค่าลงในดัชนีถัดไปที่มีอยู่ ตัวอย่างเช่น:
myArray(UBound(myArray)) = cellValue
สิ่งนี้จะเพิ่มค่าของcellValueไปยังดัชนีสุดท้ายmyArrayของ
รหัสที่สมบูรณ์จะมีลักษณะดังนี้:
Dim myArray(5) As String
Dim cellValue As String
cellValue = Range("A1").Value
myArray(UBound(myArray)) = cellValue
สามารถปรับเปลี่ยนช่วงและขนาดอาร์เรย์ให้เหมาะกับความต้องการเฉพาะได้ตามต้องการ
ดูเพิ่มเติมในซีรีส์
โฆษณา
- ดาวน์โหลดแอปพลิเคชัน
- © 2024 Blockdit
