因此，我正在嘗試將作業表的名稱添加到同一作業簿內的新作業表中。
例如，我將有一個輸入框，允許用戶選擇一個單元格。我希望將他們選擇的單元格中的作業表名稱保存到變數中。
然后將在另一個作業表上呼叫該變數，將作業表的名稱輸入到一個空單元格中。
Sub sheets()
Dim myCell As Range
Dim current As Worksheet
Set myCell = Application.InputBox( _
prompt:="Select a cell", Type:=8)
current = ActiveSheet
MsgBox current
End Sub
從上面的代碼中，我有一個輸入框，當用戶選擇單元格時，我試圖將一個變數“current”分配給活動表，然后我運行一個 msgbox 來檢查變數是否已正確分配。它運行“未設定物件變數”錯誤。請問有誰知道我能做些什么來解決這個問題？
uj5u.com熱心網友回復：
由于current是 Worksheet 物件，因此需要為其分配Set：
Set current = ActiveSheet
但是，由于它是一個物件，因此下一行將失敗并且還需要更改：
MsgBox current.Name
如果您只想保存名稱，則需要將型別current從 Worksheet 更改為 String 并將其分配為ActiveSheet.Name.
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/484136.html