วิธีระบุอักขระแท็บโดยใช้ vba (พร้อมตัวอย่าง)
มีสองวิธีในการระบุอักขระแท็บโดยใช้ VBA:
- vbTab
- CH(9)
ค่าคงที่ทั้งสองนี้แสดงถึงอักขระแท็บใน VBA
ตัวอย่างต่อไปนี้แสดงวิธีการใช้ค่าคงที่แต่ละรายการในทางปฏิบัติ
ตัวอย่าง: วิธีระบุอักขระแท็บโดยใช้ VBA
สมมติว่าเรามีรายการชื่อและนามสกุลต่อไปนี้ใน Excel:
สมมติว่าเราต้องการใช้ VBA เพื่อสร้างกล่องข้อความที่แสดงชื่อและนามสกุลแต่ละรายการโดยมีแท็บคั่นกลาง
เราสามารถสร้างมาโครต่อไปนี้เพื่อทำสิ่งนี้:
SubUseTab ()
Dim i As Integer
Dim AllNames As String
For i = 2 To 11
AllNames = AllNames & Range("A" & i).Value & vbTab & Range("B" & i).Value & vbNewLine
Next i
MsgBox AllNames
End Sub
เมื่อเราเรียกใช้แมโครนี้ เราได้รับกล่องข้อความต่อไปนี้เป็นผลลัพธ์:
โปรดทราบว่าเราใช้ vbTab เพื่อเชื่อมชื่อและนามสกุลในแต่ละแถวเข้ากับแท็บ
จากนั้นเราใช้ค่าคงที่ vbNewLine เพื่อเพิ่มชื่อใหม่แต่ละชื่อลงในบรรทัดใหม่ในกล่องข้อความ
หากเราต้องการ เราสามารถใช้ chr(9) เพื่อระบุอักขระแท็บได้เช่นกัน:
SubUseTab ()
Dim i As Integer
Dim AllNames As String
For i = 2 To 11
AllNames = AllNames & Range("A" & i).Value & chr(9) & Range("B" & i).Value & vbNewLine
Next i
MsgBox AllNames
End Sub
เมื่อเราเรียกใช้แมโครนี้ เราได้รับกล่องข้อความต่อไปนี้เป็นผลลัพธ์:
โปรดทราบว่าทั้ง vbTab และ chr(9) ให้ผลลัพธ์ที่เหมือนกัน
แหล่งข้อมูลเพิ่มเติม
บทช่วยสอนต่อไปนี้จะอธิบายวิธีการทำงานทั่วไปอื่นๆ ใน VBA:
วิธีแปลงสตริงเป็น int ใน VBA
วิธีแปลงสตริงเป็นสองเท่าใน VBA
วิธีตรวจสอบว่าสตริงมีสตริงอื่นใน VBA หรือไม่