Vba: วิธีใช้ istext เพื่อตรวจสอบว่าเซลล์เป็นข้อความหรือไม่

คุณสามารถใช้เมธอด IsText ใน VBA เพื่อตรวจสอบว่าเซลล์ที่ระบุมีข้อความหรือไม่

ฟังก์ชันนี้จะส่งกลับ ค่า True หากค่าของเซลล์ที่ระบุถูกรับรู้เป็นข้อความ

มิฉะนั้นฟังก์ชันจะส่งกลับ False

นี่เป็นวิธีทั่วไปในการใช้ฟังก์ชันนี้ในทางปฏิบัติ:

 SubCheckText ()
    
    Dim i As Integer

    For i = 1 To 9
    
        If IsText(Range(" A " & i)) = True Then
            Range(" B " & i) = " Cell is Text "
        Else
            Range(" B " & i) = " Cell is Not Text "
        End If
    Next i
    
End Sub

มาโครนี้จะตรวจสอบว่าแต่ละเซลล์ในช่วง A1:A9 เป็นข้อความหรือไม่

หากเซลล์เป็นข้อความ “เซลล์เป็นข้อความ” จะถูกส่งกลับในเซลล์ที่เกี่ยวข้องในช่วง B1:B9

หากเซลล์ไม่ใช่ข้อความ ระบบจะส่งกลับ “เซลล์ไม่ใช่ข้อความ” แทน

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

ตัวอย่าง: วิธีใช้ IsText ใน VBA

สมมติว่าเรามีคอลัมน์ค่าต่อไปนี้ใน Excel:

สมมติว่าเราต้องการตรวจสอบว่าแต่ละเซลล์ในคอลัมน์ A เป็นข้อความหรือไม่

เราสามารถสร้างมาโครต่อไปนี้เพื่อทำสิ่งนี้:

 SubCheckText ()
    
    Dim i As Integer

    For i = 1 To 9
    
        If IsText(Range(" A " & i)) = True Then
            Range(" B " & i) = " Cell is Text "
        Else
            Range(" B " & i) = " Cell is Not Text "
        End If
    Next i
    
End Sub

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

คอลัมน์ B แสดงผลลัพธ์ที่แจ้งให้เราทราบว่าแต่ละเซลล์ที่ตรงกันในคอลัมน์ A ได้รับการยอมรับว่าเป็นข้อความหรือไม่

โปรดทราบว่าเซลล์ที่มีทั้งข้อความและตัวเลขจะรับรู้เป็นข้อความ

เพื่อให้เซลล์ถูกจดจำเป็นตัวเลข เซลล์นั้นจะต้องมีเฉพาะตัวเลขเท่านั้น

หมายเหตุ : คุณสามารถดูเอกสารฉบับเต็มสำหรับฟังก์ชัน VBA IsText ได้ที่นี่

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

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

วิธีแปลงสตริงเป็น int ใน VBA
วิธีแปลงสตริงเป็นสองเท่าใน VBA
วิธีตรวจสอบว่าสตริงมีสตริงอื่นใน VBA หรือไม่