Excel批量修改批注框大小(寬度與高度)的方法,批量修改好批注框的大小以后,可以達到統一尺寸的效果。
假設你的一個工作表,里面有幾百甚至上千個批注,并且他們的大小都不是統一的,如果想將他們都改成統一的大小,該如何操作? 一個一個的去修改?顯然這是不現實的,這里要用到的方法需要用到excel的VBA編輯器。
方法如下:(這里以將excel工作表內所有的批注改為寬度350,高度改為250為例)
1.打開 你的 excel 工作薄,按下 Alt + F11 鍵,調出excel的VBA編輯器;
2. 單擊菜單欄上的“插入”,打開的菜單單擊“模塊”命令,如圖:
3. 將下面的代碼復制到模塊框中,這里以將所有批注的寬度改為350為例:
Sub 批量修改批注框寬度()
Dim Cmt As Comment
For Each Cmt In ActiveSheet.Comments
Cmt.Parent.Comment.Shape.Width = 350
Next Cmt
End Sub
4. 單擊工具欄綠色的“運行”按鈕或直接按F5鍵;
效果如圖:
重復上面兩步,將所有批注高度修改成250,需要將width修改成為Heigh,并將大小改為250,代碼如下:
Sub 批量修改批注框高度()
Dim Cmt As Comment
For Each Cmt In ActiveSheet.Comments
Cmt.Parent.Comment.Shape.Height = 250
Next Cmt
End Sub
5. 點擊右上角關閉按鈕 退出VBA編輯器窗口,現在讓我們來看一下效果圖:
這樣,我們就完成了批量修改所有excel批注框大小的任務了。
這里注意一下,如果你的工作簿里有多個工作表,那么在運行VBA代碼之前,需要先在VBA編輯器的左上方“Microsoft Excel 對象” 這里選擇你需要修改的那個工作表再運行代碼。
今天想到去修改excel批注框大小的原因是 因為平時整理編輯excel的時候 沒注意一些細節,導致有些批注大小出現混亂的情況,有些批注框變得異常的大,有些又變得異常的小,有的甚至就變成了一條線了。尤其是變得異常的大的那些批注框,很容易導致整個excel變得混亂,例如出現在滾動條那里一拉就到幾萬行, 一拉就到底的那種情況。
因此,如果出現這些不和諧的情況,完全可以用這種批量修改excel批注框大小的方法進行修改。