วิธีตรวจสอบว่ามีไฟล์หรือโฟลเดอร์อยู่ในคอมพิวเตอร์ของคุณด้วย Excel VBA หรือไม่

บทช่วยสอนการทำงานอัตโนมัติของ Office วันนี้เน้นการเรียนรู้วิธีตรวจสอบว่ามีไฟล์อยู่ในไดเรกทอรีคอมพิวเตอร์ของคุณ

การตระเตรียม

หากคุณยังใหม่กับการเขียนโค้ด ตรวจสอบให้แน่ใจว่าได้เปิดใช้งานแท็บการพัฒนา Microsoft Office Excel และคุณคุ้นเคยกับ Excel VBA พื้นฐานบางอย่าง

ตรวจสอบว่ามีไฟล์ด้วย Excel VBA . หรือไม่

รหัสต่อไปนี้ใช้ประโยชน์จากช่องใส่เพื่อจับเส้นทางไปยังไฟล์รวมถึงชื่อไฟล์จากผู้ใช้

จากนั้นจะใช้ประโยชน์จาก วิธีการ Dirเพื่อตรวจสอบว่ามีเส้นทางของไฟล์อยู่หรือไม่

สุดท้ายจะแสดงกล่องข้อความถึงผู้ใช้พร้อมผลการตรวจสอบ

Sub Check_file_exists()

Dim NameDir As String
Dim NameFile As String

'Capture the file path and name from the users
NameDir = InputBox("Enter file directory")
NameFile = InputBox("Enter file name")

'Check whether the file exists
If (Dir(NameDir & NameFile)) = "" Then
    MsgBox ("File doesn't exist")

    Else
    
    MsgBox ("File exists")
    End If
End Sub

ตรวจสอบว่ามีโฟลเดอร์อยู่หรือไม่

ในลักษณะที่คล้ายคลึงกัน คุณสามารถตรวจสอบว่ามีโฟลเดอร์เฉพาะอยู่ในระบบปฏิบัติการของคุณหรือไม่ นอกจากนี้ เราใช้ประโยชน์จาก วิธีการ Dirแต่ด้วยพารามิเตอร์vbDirectory

Sub Check_folder_exists()

Dim NameDir As String

NameDir = InputBox("Enter file directory")


If (Dir(NameDir, vbDirectory)) = "" Then
    MsgBox ("Folder doesn't exist")

    Else
    
    MsgBox ("Folder exists")
    End If
End Sub

การใช้รหัส

  • เปิด Microsoft Excel และไปที่เวิร์กบุ๊กของคุณ
  • ตี Developer แล้วกด Visual Basic
  • คัดลอกและวางโค้ดจากด้านบนเป็นรูทีนย่อยในชีตเฉพาะของโมดูล VBA ของคุณ
  • เรียกใช้ (F5) รหัส
  • บันทึกสมุดงานของคุณ

นามสกุลที่เป็นไปได้

รหัสแผ่นหม้อต้มด้านบน a ถูกขยายสำหรับกรณีการใช้งานต่อไปนี้:

  • สร้างโฟลเดอร์ / ไฟล์หากยังไม่มี
  • ลบไฟล์ของโฟลเดอร์ที่มีให้ในไดเร็กทอรีไฟล์ระบบปฏิบัติการของคุณ
  • ค้นหาไฟล์/โฟลเดอร์โดยใช้สัญลักษณ์แทน

ขิง 2.7.53.0

ขิง 2.7.53.0

Ginger เป็นตัวตรวจสอบการสะกดและไวยากรณ์ฟรี

บล็อก

บล็อก

Blocks เป็นเกมทางปัญญาสำหรับนักเรียนชั้นประถมศึกษาปีที่ 3 เพื่อฝึกฝนทักษะการตรวจจับและการมองเห็น และรวมอยู่ในโปรแกรมสนับสนุนการสอนด้านไอทีโดยครู

พรีซี่ 6.26

พรีซี่ 6.26

Prezi เป็นแอปพลิเคชั่นฟรีที่ให้คุณสร้างงานนำเสนอดิจิทัลทั้งออนไลน์และออฟไลน์

แมทเวย์

แมทเวย์

Mathway เป็นแอปที่มีประโยชน์มาก ๆ ที่สามารถช่วยคุณแก้ปัญหาทางคณิตศาสตร์ที่ต้องใช้เครื่องมือที่ซับซ้อนมากกว่าเครื่องคิดเลขในอุปกรณ์ของคุณ

อะโดบี พรีเซนเตอร์

อะโดบี พรีเซนเตอร์

Adobe Presenter เป็นซอฟต์แวร์อีเลิร์นนิงที่เผยแพร่โดย Adobe Systems บนแพลตฟอร์ม Microsoft Windows ในรูปแบบปลั๊กอิน Microsoft PowerPoint

ทูแคน 2.3.0

ทูแคน 2.3.0

Toucan เป็นแพลตฟอร์มเทคโนโลยีการศึกษา ช่วยให้คุณเรียนรู้ภาษาใหม่ในขณะที่ท่องเว็บไซต์ทั่วไปในชีวิตประจำวัน

ENetViet 24.2

ENetViet 24.2

eNetViet เป็นแอปพลิเคชั่นที่ช่วยเชื่อมโยงผู้ปกครองกับโรงเรียนที่บุตรหลานกำลังศึกษาอยู่ เพื่อให้พวกเขาสามารถเข้าใจสถานการณ์การเรียนรู้ในปัจจุบันของบุตรหลานได้อย่างชัดเจน

การพิมพ์อย่างรวดเร็ว

การพิมพ์อย่างรวดเร็ว

RapidTyping เป็นเครื่องมือฝึกแป้นพิมพ์ที่สะดวกและใช้งานง่าย ซึ่งจะช่วยให้คุณปรับปรุงความเร็วในการพิมพ์และลดข้อผิดพลาดในการสะกดคำ ด้วยบทเรียนที่จัดไว้สำหรับหลายระดับ RapidTyping จะสอนวิธีพิมพ์หรือพัฒนาทักษะที่มีอยู่

ประเภทคณิตศาสตร์ 7.4.10.53

ประเภทคณิตศาสตร์ 7.4.10.53

MathType เป็นซอฟต์แวร์สมการเชิงโต้ตอบจากนักพัฒนา Design Science (Dessci) ซึ่งช่วยให้คุณสร้างและใส่คำอธิบายประกอบทางคณิตศาสตร์สำหรับการประมวลผลคำ การนำเสนอ eLearning ฯลฯ ตัวแก้ไขนี้ยังใช้ในการสร้างเอกสาร TeX, LaTeX และ MathML อีกด้วย

ไวยากรณ์

ไวยากรณ์

แอปที่ขับเคลื่อนด้วย AI ของ Grammarly ช่วยให้ผู้คนสื่อสารได้อย่างมีประสิทธิภาพมากขึ้น ผู้ใช้หลายล้านคนพึ่งพา Grammarly ทุกวันเพื่อทำให้ข้อความ เอกสาร และโพสต์บนโซเชียลมีเดียมีความชัดเจน ปราศจากข้อผิดพลาด และเป็นมืออาชีพมากขึ้น