☰

在範圍內編寫程式碼

tag-icon • tag-icon microsoft-excel vba microsoft-excel-2016
在範圍內編寫程式碼

我正在編寫一個 Excel 程序，用於追蹤我們工作場所的工具所在位置。我正在嘗試將資料從一頁移動到另一頁。我有 VLookup 來訪問信息，但我希望能夠在找到詳細信息後清除其他頁面的內容。我遇到的問題是在 VBA 程式碼中編寫一個公式（因為這是一個啟動所有內容的按鈕），該公式可以查找該行，然後清除該行的內容。我嘗試將匹配公式放入隨機單元格中以查找該行，並嘗試將其自動輸入到範圍中。有人知道這怎麼可能？這就是我一直在嘗試的。 X1 在該儲存格中有一個符合公式。

工作表（“Running.Sheet”）.Range（“A”Running.Sheet”）.Range（“X1”）.Value）.ClearContents

答案1

差不多了。嘗試

Sheets("Running.Sheet").Range("A" & Sheets("Running.Sheet").Range("X1").Value).ClearContents

您可以透過聲明工作表的變數、將工作表名稱指派給變數然後使用該變數來使程式碼更易於管理。像這樣：

Dim ws As Worksheet
Set ws = Sheets("Running.Sheet")

ws.Range("A" & ws.Range("X1").Value).ClearContents

儘管設定工作量較大，但您需要更頻繁地參考同一張表，從而提高效率。

相關內容