代碼刪除該文件夾中

下面是我的代碼...代碼刪除該文件夾中

dim ws as worksheet, rng As Range, filetodelete As String, cmb As ComboBox 

Set ws = Sheets("Sheet1") 
Set rng = ws.Range("B11") '(Storage Location of File: E:\ABC) 
Set cmb = Me.ComboBox1 
filetodelete = rng & "\" & cmb.Text & ".pdf" 

Kill filetodelete

的代碼與用戶窗體條命令按鈕關聯。命令按鈕將刪除存儲位置中的文件，使用組合框檢查文件名。運行代碼時，顯示運行時錯誤文件未找到。

請注意。

感謝薩爾曼

來源

2016-12-20 Salman Khan

使用

cmb.Caption

不

cmb.Text

這應該修復它。

來源

2016-12-20 12:25:33

錯誤：對象不支持此屬性或方法。 –

如何只

cmb

或

cmb.Value

來源

2016-12-20 12:40:31 Rdster

兩者都嘗試過，但仍然錯誤「文件未找到」 –

使用立即窗口確保文件指針實際上是您認爲的那個 – Rdster

沒有在即時窗口中顯示 –

代碼刪除該文件夾中

回答

相關問題