我正在嘗試在 Excel 中撰寫一個宏,我可以在其中動態格式化作業表。1 個宏,沒有硬編碼的作業表名稱。
如果宏指向另一張紙,我不知道如何提取 Application.Selection 的整個值(我需要在另一張紙上進行)
Sub GetRangeToModify()
Dim RangeOfA1, RangeOfA2 As range
Set RangeOfA1 = Application.Selection
Set RangeOfA2 = Application.InputBox("Select the loaded CSV's sheet' A1 field", "Select A1 cell", RangeOfA1, Type:=8)
MsgBox RangeOfA2.Address
End Sub
使用此代碼段,您可以獲得單元格的位置,但作業表的名稱不可見(例如 $K$16;而不是 Sheet1!$K$16)
計劃是:從選擇中獲取完整字串(例如:Sheet2!$L 19 美元),使用提取的作業表名稱激活另一個作業表,然后在那里執行操作(插入新列等)
有沒有辦法正確地做到這一點?
uj5u.com熱心網友回復:
嘗試:
Dim RangeOfA1 as Range, RangeOfA2 As range 'must assign explicit data type for each declaration; otherwise, data type is Variant by default.
Dim strWS as String 'worksheet name
Set RangeOfA1 = Application.Selection
Set RangeOfA2 = Application.InputBox("Select the loaded CSV's sheet' A1 field", "Select A1 cell", RangeOfA1, Type:=8)
strWS = RangeOfA2.Worksheet.Name
MsgBox "'" & strWS & "'!" & RangeOfA2.Address
轉載請註明出處,本文鏈接:https://www.uj5u.com/caozuo/380753.html
