新用戶掃碼下載
掃碼下載APP
及時(shí)接收最新考試資訊及
備考信息
可以自動(dòng)縮放的Excel表格來(lái)了！讓領(lǐng)導(dǎo)看傻！
做數(shù)據(jù)分析工作時(shí)，在公司分析會(huì)上經(jīng)常會(huì)遇到一個(gè)尷尬的問(wèn)題。投影屏上演示分析數(shù)據(jù)時(shí)，由于很多領(lǐng)導(dǎo)和同事眼近視，屏幕上的字太小看不清，比如下面的表格，離屏的稍遠(yuǎn)一些字就看不清了：
（當(dāng)然你可以把表格比例放大，但你要不停的放大縮小放大縮，太麻煩）
下面用VBA做了一個(gè)小功能，完美解決這個(gè)難題，快來(lái)學(xué)習(xí)吧！
在H1單元格中輸入數(shù)字1，然后再選表格時(shí)，就會(huì)自動(dòng)放大字體，顏色變?yōu)榧t色。刪除H1中的數(shù)字1后，取消放大功能。
在開(kāi)會(huì)時(shí)演示這個(gè)表格，老板瞇著眼都可以看清表中的數(shù)字，是不是比較帥？！想在你的表格中也有這樣的功能嗎？快來(lái)一起學(xué)習(xí)如何操作吧！
操作步驟：
1、 添加代碼
在工作表標(biāo)簽上右鍵 - 查看代碼打開(kāi)VBE窗口- 把下面的代碼粘貼右側(cè)的代碼框空白處，關(guān)于彈出的VBE窗口
Dim xrow As Long, Xcolor As Byte, xsize As Byte
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
If [h1] <> 1 Or Target.Row = 1 Then
Rows(xrow).Font.Size = xsize
Rows(xrow).Font.ColorIndex = Xcolor
Exit Sub
End If
If xrow > 1 Then
Rows(xrow).Font.Size = xsize
Rows(xrow).Font.ColorIndex = Xcolor
End If
xrow = Target.Row
xsize = Target.Font.Size
Xcolor = Target.Font.ColorIndex
Rows(xrow).Font.Size = 24
Rows(xrow).Font.ColorIndex = 3
End Sub
注：本例中是把H1單元格作為是否啟用放大字體的開(kāi)關(guān)，你可以自定義位置，比如你把H1改為A1,那么當(dāng)在A1輸入1時(shí)就會(huì)啟用字體放大功能。
2、 另存文件
文件 - 另存為啟用宏的工作簿格式
設(shè)置完成！值得注意的是，添加代碼后，當(dāng)前工作表中將右鍵粘貼功能將失效，你可以打開(kāi)剪粘板進(jìn)行復(fù)制粘貼。如果想徹底取消，把代碼刪除即可。
互聯(lián)網(wǎng)時(shí)代，Excel早已成為了財(cái)務(wù)人員職場(chǎng)必備技能，就像珠算之于賬房先生、點(diǎn)鈔之于收銀員、方向盤操控之于司機(jī)一樣，Excel的熟練程度，不僅決定了一個(gè)人能否勝任工作，更決定了職場(chǎng)人的工作效率，決定了一個(gè)人在職場(chǎng)上是否能夠脫穎而出。如果你想提升自己的工作效率，請(qǐng)關(guān)注正保會(huì)計(jì)網(wǎng)校胡雪飛老師的《財(cái)務(wù)人玩轉(zhuǎn)Excel的25節(jié)實(shí)操課》吧。
本課程帶你從基礎(chǔ)鞏固到實(shí)戰(zhàn)應(yīng)用全面提升，三大階段、二十五講，操作真實(shí)的財(cái)務(wù)數(shù)據(jù)來(lái)訓(xùn)練你的excel快捷操作、公式、函數(shù)、圖表的應(yīng)用，提升你的數(shù)據(jù)處理和分析思維，培養(yǎng)職場(chǎng)競(jìng)爭(zhēng)優(yōu)勢(shì)，點(diǎn)擊報(bào)名>>
學(xué)習(xí)更多財(cái)稅資訊、財(cái)經(jīng)法規(guī)、專家問(wèn)答、能力測(cè)評(píng)、免費(fèi)直播，可以查看正保會(huì)計(jì)網(wǎng)校會(huì)計(jì)實(shí)務(wù)頻道，點(diǎn)擊進(jìn)入>>。
推薦閱讀
相關(guān)資訊
實(shí)務(wù)學(xué)習(xí)指南
距6月報(bào)稅結(jié)束還有天
新用戶掃碼下載
京公網(wǎng)安備 11010802044457號(hào)