วิธีตรวจสอบว่ามีรูปร่างหรือรูปภาพอยู่ในแผ่นงานที่ใช้งานอยู่หรือไม่?
ตัวอย่างเช่นมีการเพิ่มรูปร่างหรือรูปภาพหลายสิบรูปในแผ่นงานที่ใช้งานอยู่แล้วและตอนนี้คุณต้องการตรวจสอบว่ามีรูปร่างหรือรูปภาพที่เฉพาะเจาะจงอยู่ในแผ่นงานที่ใช้งานอยู่หรือไม่คุณจะจัดการงานนี้อย่างรวดเร็วได้อย่างไรโดยไม่ต้องตรวจสอบรูปร่างหรือ ทีละภาพ? ใน Excel ไม่มีฟังก์ชันในตัวที่ช่วยคุณได้ แต่ในบทความนี้ฉันแนะนำรหัส VBA เพื่อค้นหาว่ามีรูปร่างหรือรูปภาพอยู่ในแผ่นงานที่ใช้งานอยู่
ตรวจสอบว่ามีรูปร่างหรือรูปภาพอยู่ในแผ่นงานที่ใช้งานอยู่หรือไม่
ตรวจสอบว่ามีรูปร่างหรือรูปภาพอยู่ในแผ่นงานที่ใช้งานอยู่หรือไม่
โปรดใช้รหัสมาโครด้านล่างเพื่อตรวจสอบว่ามีภาพใดอยู่ในแผ่นงานที่ใช้งานอยู่หรือไม่
1 กด Alt + F11 คีย์เพื่อเปิดใช้งาน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2 คลิก สิ่งที่ใส่เข้าไป > โมดูล และวางโค้ดด้านล่างลงในสคริปต์
VBA: ตรวจสอบว่ามีรูปร่างหรือรูปภาพอยู่หรือไม่
Sub CheckImage () 'UpdatebyExtendoffice20170927 Dim xChar As Picture Dim xFlag As Boolean Dim xCharName As String On Error Resume Next Application.ScreenUpdating = False xCharName = "cat" xFlag = False สำหรับแต่ละ xChar ใน ActiveSheet.Pictures Debug.Print xChar.Name ถ้า xChar.Name = xCharName แล้ว MsgBox "The Image is on the Active Sheet", vbInformation, "KuTools For Excel" xFlag = True Exit For End If Next If Not xFlag then MsgBox "The Image is Not on the Active Sheet", vbInformation, "KuTools For Excel" End ถ้า Application.ScreenUpdating = True End Sub
3 กด F5 เพื่อเรียกใช้โค้ดกล่องโต้ตอบจะปรากฏขึ้นเพื่อเตือนคุณว่ามีภาพอยู่ในแผ่นงานที่ใช้งานอยู่หรือไม่
ปลาย: ในโค้ดมาโครคุณสามารถเปลี่ยนชื่อรูปภาพในรูปแบบ xCharName = "แมว" เพื่อตอบสนองความต้องการของคุณ
บทความญาติ:
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!