如何檢查文件夾中是否存在文件然后在Excel中刪除它？
如何檢查文件夾中是否存在文件然后在Excel中刪除它？
在本教程中，您將學(xué)習(xí)一個(gè) VBA 腳本來(lái)檢查指定文件夾中是否存在某個(gè)文件，如果存在，則將其從 Excel 中的文件夾中刪除。
檢查文件夾中是否存在文件，然后使用 VBA 代碼在 Excel 中將其刪除以下 VBA 腳本有助于檢查某個(gè)文件是否存在于文件夾中，如果存在則將其刪除。 請(qǐng)按如下方式操作。
1. 在打開的 Excel 工作簿中，按 其他 + F11 鍵打開 Microsoft Visual Basic應(yīng)用程序 窗口。
2.在 Microsoft Visual Basic應(yīng)用程序 窗口中，單擊 插頁(yè) > 模塊, 然后將下面的 VBA 腳本復(fù)制到 模塊（代碼） 窗口。
VBA代碼：檢查指定文件夾中是否存在文件然后將其刪除
Sub CheckFileThenDelete()
Updated by Extendoffice 20221024
Dim FilePath As String
FilePath = "C:\Users\Win10x64Test\Desktop\save attachments\aaa.xlsx"
If Dir(FilePath) <> "" Then
MsgBox "The file exists in the folder, click the OK button to delete it.", vbInformation, "Kutools for Excel"
Kill FilePath
Else
If Dir(FilePath) = "" Then
MsgBox "The file does not exist.", vbInformation, "Kutools for Excel"
End If
End If
End Sub
Copy
備注: 在 VBA 代碼中， C:\Users\Win10x64Test\Desktop\保存附件\aaa.xlsx 是要檢查它是否存在的文件的路徑。 在這個(gè)例子中，我想檢查一個(gè)名為“AAA”存在于名為“保存附件”在桌面上。 您可以更改文件路徑和文件擴(kuò)展名以滿足您的需要。
3。 按 F5 鍵來(lái)運(yùn)行代碼。
4.如果文件存在，你會(huì)得到一個(gè) Kutools for Excel 對(duì)話框如下圖所示。 點(diǎn)擊 OK 按鈕從文件夾中刪除該文件。
如果文件夾中不存在該文件，則另一個(gè) Kutools for Excel 對(duì)話框也會(huì)彈出提醒您。
最佳辦公生產(chǎn)力工具
將小時(shí)轉(zhuǎn)化為分鐘 Kutools for Excel!
準(zhǔn)備好增強(qiáng)您的 Excel 任務(wù)了嗎？ 利用的力量 Kutools for Excel - 您終極的節(jié)省時(shí)間的工具。 簡(jiǎn)化復(fù)雜的任務(wù)并像專業(yè)人士一樣瀏覽數(shù)據(jù)。 以閃電般的速度體驗(yàn) Excel！
為什么需要 Kutools for Excel
??? 超過(guò) 300 項(xiàng)強(qiáng)大功能: Kutools 包含 300 多項(xiàng)高級(jí)功能，可簡(jiǎn)化您在 1500 多種場(chǎng)景中的工作。
?? 卓越的數(shù)據(jù)處理能力：合并單元格、刪除重復(fù)項(xiàng)并執(zhí)行高級(jí)數(shù)據(jù)轉(zhuǎn)換 - 所有這些都不費(fèi)吹灰之力！
?? 高效的批量操作：當(dāng)你可以聰明地工作時(shí)，為什么還要付出額外的努力呢？ 輕松批量導(dǎo)入、導(dǎo)出、組合和調(diào)整數(shù)據(jù)。
?? 可定制的圖表和報(bào)告：訪問(wèn)各種附加圖表并生成富有洞察力的報(bào)告。
??? 強(qiáng)大的導(dǎo)航窗格：通過(guò)強(qiáng)大的列管理器、工作表管理器和自定義收藏夾獲得優(yōu)勢(shì)。
?? 七種類型的下拉列表：通過(guò)各種功能和類型的下拉列表使數(shù)據(jù)輸入變得輕而易舉。
?? 用戶友好：對(duì)于初學(xué)者來(lái)說(shuō)輕而易舉，對(duì)于專家來(lái)說(shuō)是一個(gè)強(qiáng)大的工具。
立即下載，與 Excel 一起穿越時(shí)空！
閱讀更多
免費(fèi)下載... 采購(gòu)...
Office Tab 為 Office 帶來(lái)選項(xiàng)卡式界面，讓您的工作更輕松
在Word，Excel，PowerPoint中啟用選項(xiàng)卡式編輯和閱讀，發(fā)布者，Access，Visio和Project。
在同一窗口的新選項(xiàng)卡中而不是在新窗口中打開并創(chuàng)建多個(gè)文檔。
每天將您的工作效率提高50％，并減少數(shù)百次鼠標(biāo)單擊！
閱讀更多
免費(fèi)下載... 采購(gòu)...
版權(quán)聲明：本文內(nèi)容由網(wǎng)絡(luò)用戶投稿，版權(quán)歸原作者所有，本站不擁有其著作權(quán)，亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實(shí)的內(nèi)容，請(qǐng)聯(lián)系我們jiasou666@gmail.com 處理，核實(shí)后本網(wǎng)站將在24小時(shí)內(nèi)刪除侵權(quán)內(nèi)容。
相關(guān)文章
