麻辣家族討論版版 » Excel程式區 » VBA 變數讀取部分中文字變問號

返回列表下一主題上一主題發帖

[發問] VBA 變數讀取部分中文字變問號

　暱稱: 豪

高中生 Rank: 3 Rank: 3

帖子: 471
主題: 121
精華: 0
積分: 579
點名: 0
作業系統: WIN10
軟體版本: OFFICE2019
閱讀權限: 50
性別: 男
註冊時間: 2015-4-16
最後登錄: 2023-1-17

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2018-11-30 18:51 | 只看該作者

[發問] VBA 變數讀取部分中文字變問號

例如......
儲存格 A1 放伃

用 a = range("A1") 變數視窗呈現 "?"
請問這有解嗎?

要執行刪除檔案的功能,但變成問號就會無法找到所該刪除的檔案

中文變問號.rar (10.3 KB)

樓主熱帖

收藏

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-25

2^#

發表於 2018-12-1 11:38 | 只看該作者

Sub 刪除()
Dim T$, xObj, xFL
T = Range("A1")
Set xObj = CreateObject("Scripting.FileSystemObject")
Set xFL = xObj.GetFile("D:\" & T)
xFL.Delete
End Sub

　暱稱: 豪

高中生 Rank: 3 Rank: 3

帖子: 471
主題: 121
精華: 0
積分: 579
點名: 0
作業系統: WIN10
軟體版本: OFFICE2019
閱讀權限: 50
性別: 男
註冊時間: 2015-4-16
最後登錄: 2023-1-17

3^#

發表於 2018-12-1 21:14 | 只看該作者

回復 2# 准提部林

感恩！

靜思自在 : 多做多得。少做多失。

返回列表下一主題上一主題