วิธีตรวจสอบว่ามีชื่อช่วงที่แน่นอนใน Excel หรือไม่?
ก่อนที่จะรันสคริปต์ VBA คุณอาจต้องตรวจสอบว่ามีช่วงที่ตั้งชื่ออยู่ในสมุดงานปัจจุบันหรือไม่ รหัส VBA ที่ให้ไว้ในบทความนี้สามารถช่วยให้คุณตรวจสอบได้อย่างรวดเร็วว่ามีชื่อช่วงใดใน Excel หรือไม่
ตรวจสอบว่ามีชื่อช่วงที่ระบุด้วยรหัส VBA หรือไม่
ตรวจสอบว่ามีชื่อช่วงที่ระบุด้วยรหัส VBA หรือไม่
คุณสามารถเรียกใช้รหัส VBA ด้านล่างเพื่อตรวจสอบได้อย่างรวดเร็วว่ามีชื่อช่วงที่แน่นอนอยู่ในสมุดงานปัจจุบันหรือไม่
1 กด อื่น ๆ + F11 พร้อมกันเพื่อเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคลิก สิ่งที่ใส่เข้าไป > โมดูล. จากนั้นคัดลอกและวางโค้ด VBA ด้านล่างลงในหน้าต่าง
รหัส VBA: ตรวจสอบว่ามีบางช่วงอยู่ใน Excel หรือไม่
Sub CheckRanges()
Dim chkRange As Range
Dim areasName(2) As String
Dim chkCnt As Long
Dim i As Integer
areasName(0) = "new"
areasName(1) = "MyRange"
areasName(2) = "Range2"
Application.ScreenUpdating = False
For i = 0 To 2
On Error Resume Next
chkCnt = Len(ThisWorkbook.Names(areasName(i)).Name)
On Error GoTo 0
If chkCnt <> 0 Then
Set chkRange = Range(areasName(i))
MsgBox "This Range: '" & areasName(i) & "' DOES exist!", vbInformation, "Kutools for Excel"
chkCnt = 0
Else
MsgBox "This Range: '" & areasName(i) & "' does NOT exist!", vbInformation, "Kutools for Excel"
End If
Next i
Application.ScreenUpdating = True
End Subหมายเหตุ / รายละเอียดเพิ่มเติม:
3 กด F5 กุญแจสำคัญในการเรียกใช้รหัส จากนั้น Kutools สำหรับ Excel กล่องโต้ตอบจะปรากฏขึ้นเพื่อบอกคุณว่ามีชื่อช่วงที่ระบุอยู่หรือไม่โปรดคลิกที่ OK ปุ่มต่างๆตามลำดับเพื่อปิดกล่องโต้ตอบ ดูภาพหน้าจอ:
บทความที่เกี่ยวข้อง:
- วิธีตรวจสอบว่าอักขระตัวแรกในเซลล์เป็นตัวอักษรหรือตัวเลขใน Excel หรือไม่?
- วิธีตรวจสอบว่าค่าของเซลล์อยู่ระหว่างสองค่าใน Excel หรือไม่?
- วิธีตรวจสอบว่าเซลล์เริ่มต้นหรือลงท้ายด้วยอักขระเฉพาะใน Excel หรือไม่?
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
