ไปยังเนื้อหาหลัก

วิธีตรวจสอบว่ามีแผ่นงานอยู่ในสมุดงานหรือไม่?

เมื่อคุณมีเวิร์กชีตหลายสิบแผ่นหรือหลายร้อยเวิร์กชีตในเวิร์กบุ๊ก และคุณต้องการค้นหาหรือตรวจสอบว่ามีแผ่นงานอยู่ในเวิร์กบุ๊กนี้ โดยทั่วไปแล้วอาจเป็นงานใหญ่ ตอนนี้ฉันแนะนำโค้ด VBA และเครื่องมือที่สะดวกสำหรับคุณในการตรวจสอบอย่างรวดเร็วว่ามีชีตอยู่ในเวิร์กบุ๊กหรือไม่

ตรวจสอบว่ามีแผ่นงานอยู่ในสมุดงานด้วยVBA .หรือไม่

ตรวจสอบว่ามีแผ่นงานอยู่หรือไม่และเปลี่ยนไปใช้ด้วย Kutools for Excel ความคิดที่ดี 3


ตรวจสอบว่ามีแผ่นงานอยู่ในสมุดงานหรือไม่

โปรดทำตามขั้นตอนด้านล่างเพื่อคัดลอกรหัส VBA และเรียกใช้เพื่อตรวจสอบว่ามีแผ่นงานอยู่ในสมุดงานปัจจุบันหรือไม่

1 กด Alt + F11 เพื่อแสดง Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2. ในหน้าต่างคลิก สิ่งที่ใส่เข้าไป > โมดูล เพื่อแสดงหน้าต่างโมดูลใหม่จากนั้นคัดลอกรหัส VBA ต่อไปนี้ลงในหน้าต่างโมดูล

VBA: ตรวจสอบว่ามีแผ่นงานอยู่ในสมุดงานหรือไม่

Function CheckSheet(pName As String) As Boolean
'Updateby20140617
Dim IsExist As Boolean
IsExist = False
For i = 1 To Application.ActiveWorkbook.Sheets.Count
    If Application.ActiveWorkbook.Sheets(i).Name = pName Then
        IsExist = True
        Exit For
    End If
Next
CheckSheet = IsExist
End Function

3. บันทึกรหัสนี้และกลับไปที่แผ่นงานแล้วเลือกเซลล์ว่างเพื่อพิมพ์สูตรนี้ = CheckSheet (“ Shee1”) (Sheet1 ระบุชื่อแผ่นงานที่คุณต้องการตรวจสอบว่ามีอยู่หรือไม่) กด เข้าสู่ ปุ่ม FALSE บ่งชี้ว่าไม่มีแผ่นงานนี้และ ture ระบุว่ามีอยู่ในสมุดงานปัจจุบัน


ตรวจสอบว่ามีแผ่นงานอยู่หรือไม่และเปลี่ยนไปใช้ Kutools for Excel พร้อมVBA

ด้วยฟังก์ชันที่กำหนดไว้ด้านบนคุณสามารถตรวจสอบได้ว่ามีแผ่นงานอยู่หรือไม่และยังเป็นเรื่องยากเล็กน้อย อย่างไรก็ตามกับ Kutools สำหรับ Excelบานหน้าต่างนำทางจะแสดงชื่อแผ่นงานทั้งหมดสำหรับคุณซึ่งรองรับการเลื่อนเพื่อค้นหาแผ่นงานหรือกรองชื่อแผ่นงานเพื่อค้นหาแผ่นงานและหากต้องการคุณสามารถคลิกชื่อแผ่นงานเพื่อสลับไปยังแผ่นงานได้อย่างรวดเร็วหลังจากพบ

Kutools สำหรับ Excel, ที่มีมากกว่า 300 ฟังก์ชั่นที่มีประโยชน์ทำให้งานของคุณง่ายขึ้น 

หลังจาก ติดตั้งฟรี Kutools สำหรับ Excel โปรดทำดังนี้:

1. เปิดใช้งานสมุดงานที่คุณต้องการตรวจสอบชื่อแผ่นงานหากมีอยู่แล้วคลิก Kutools > การเดินเรือ. ดูภาพหน้าจอ
:doc ตรวจสอบว่ามีแผ่นงานอยู่หรือไม่ 1

2. จากนั้นในบานหน้าต่าง popping ให้คลิก สมุดงานและแผ่นงาน เพื่อขยายบานหน้าต่างคุณสามารถดูรายการชื่อแผ่นงานทั้งหมดในบานหน้าต่างคุณสามารถเลื่อนเพื่อค้นหาชื่อแผ่นงาน
doc kutools บานหน้าต่างนำทาง 2

3. หรือคุณสามารถตรวจสอบ ตัวกรอง จากนั้นพิมพ์คำสำคัญของชื่อแผ่นงานที่คุณต้องการตรวจสอบจากนั้นชื่อแผ่นงานที่ระบุจะปรากฏขึ้นให้คลิกที่ชื่อแผ่นงานจากนั้นเปลี่ยนเป็นแผ่นงาน
doc kutools บานหน้าต่างนำทาง 3

สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน

🤖 Kutools AI ผู้ช่วย: ปฏิวัติการวิเคราะห์ข้อมูลโดยยึดตาม: การดำเนินการที่ชาญฉลาด   |  สร้างรหัส  |  สร้างสูตรที่กำหนดเอง  |  วิเคราะห์ข้อมูลและสร้างแผนภูมิ  |  เรียกใช้ฟังก์ชัน Kutools...
คุณสมบัติยอดนิยม: ค้นหา เน้น หรือระบุรายการที่ซ้ำกัน   |  ลบแถวว่าง   |  รวมคอลัมน์หรือเซลล์โดยไม่สูญเสียข้อมูล   |   รอบโดยไม่มีสูตร ...
การค้นหาขั้นสูง: VLookup หลายเกณฑ์    VLookup หลายค่า  |   VLookup ข้ามหลายแผ่น   |   การค้นหาที่ไม่ชัดเจน ....
รายการแบบเลื่อนลงขั้นสูง: สร้างรายการแบบหล่นลงอย่างรวดเร็ว   |  รายการแบบหล่นลงขึ้นอยู่กับ   |  เลือกหลายรายการแบบหล่นลง ....
ผู้จัดการคอลัมน์: เพิ่มจำนวนคอลัมน์เฉพาะ  |  ย้ายคอลัมน์  |  สลับสถานะการมองเห็นของคอลัมน์ที่ซ่อนอยู่  |  เปรียบเทียบช่วงและคอลัมน์ ...
คุณสมบัติเด่น: กริดโฟกัส   |  มุมมองการออกแบบ   |   บาร์สูตรใหญ่    สมุดงานและตัวจัดการชีต   |  ห้องสมุดทรัพยากร (ข้อความอัตโนมัติ)   |  เลือกวันที่   |  รวมแผ่นงาน   |  เข้ารหัส/ถอดรหัสเซลล์    ส่งอีเมลตามรายการ   |  ซุปเปอร์ฟิลเตอร์   |   ตัวกรองพิเศษ (กรองตัวหนา/ตัวเอียง/ขีดทับ...) ...
ชุดเครื่องมือ 15 อันดับแรก12 ข้อความ เครื่องมือ (เพิ่มข้อความ, ลบอักขระ, ... )   |   50 + แผนภูมิ ประเภท (แผนภูมิ Gantt, ... )   |   40+ ใช้งานได้จริง สูตร (คำนวณอายุตามวันเกิด, ... )   |   19 การแทรก เครื่องมือ (ใส่ QR Code, แทรกรูปภาพจากเส้นทาง, ... )   |   12 การแปลง เครื่องมือ (ตัวเลขเป็นคำ, การแปลงสกุลเงิน, ... )   |   7 ผสานและแยก เครื่องมือ (แถวรวมขั้นสูง, แยกเซลล์, ... )   |   ... และอื่น ๆ

เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา  คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...

รายละเอียด


แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
In the VBA code, if option explicit is set, then the variable "i" will need to be defined
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations