我想在 Excel 中為用戶定義的選擇著色，然后在選擇的最后一個單元格中添加一個文本條目。
到目前為止，我有選擇但排序但在文本輸入上掙扎。
Dim Cell As Object
Sheets("Jobs").Activate
For Each Cell In Selection
Cell.Interior.Color = RGB(255, 192, 0)
Next Cell
uj5u.com熱心網友回復：
您可以在每個回圈上設定一個范圍物件，該物件將在完成時成為最后一個...
Dim Cell As Range, objLastCell As Range
Sheets("Jobs").Activate
For Each Cell In Selection
Cell.Interior.Color = RGB(255, 192, 0)
Set objLastCell = Cell
Next Cell
objLastCell.Value = InputBox("Enter some text and I'll throw it in cell " & objLastCell.Address & " ...", "Enter Text")
……反正是這樣的。
此外，這假定最后一個單元格是最后一個選定的單元格，而不是選擇中的最后一個（即右下角）單元格。
轉載請註明出處，本文鏈接：https://www.uj5u.com/qiye/422136.html
標籤：
上一篇：如何在Excel中按特定年份使用日期范圍（年份）的下拉串列
下一篇：Excel：求和公式