- 帖子
- 58
- 主題
- 9
- 精華
- 0
- 積分
- 117
- 點名
- 0
- 作業系統
- XP
- 軟體版本
- 2003
- 閱讀權限
- 20
- 註冊時間
- 2017-12-2
- 最後登錄
- 2021-12-16
|
VBA 更改選中儲存格之數值
版本：excel 2003
需求：將選中的儲存格加粗上色，並更改內文
目前用的是這個錄製的，但只能一次改一格
原本只要加粗上色的時候多格同時處理是沒問題，但加上要改內文就不行了。
(選中的儲存格可能不連貫)
- Sub 加粗上色()
- '
- ' Macro1 Macro
- ' wei9133 在 2019/11/7 錄製的巨集
- '
- ' 快速鍵: Ctrl+e
- '加粗上色
- Selection.Font.Bold = True
- Selection.Font.ColorIndex = 3
- '獲取當前儲存格位置
- i = ActiveCell.Row
- j = ActiveCell.Column
- 'MsgBox i & "/" & j
- '將選中的儲存格資料改為W
- ActiveSheet.Cells(i, j) = "W"
- End Sub
例如：
MsgBox "目前被選取儲存格" & Selection.Address
但我不會把上面的程式，改成把目前選中儲存格全部加粗上色&更改內文
還是能夠把Selection.Address得到的位置全部拆出來
再一個一個去改過來? |
|
發表於 2019-11-15 01:49
| 
發表於 2019-11-15 09:26
| 