怎么用Get.Cell宏表函數(shù)獲取單元格內(nèi)的字體格式信息
?
作者:E圖表述來源:部落窩教育發(fā)布時間:2021-05-18 11:06:21點(diǎn)擊:2296
編按:
在日常EXCEL工作中,EXCEL宏表函數(shù)是常常被忽略的存在,但是如果你一直和EXCEL打交道,那么你一定有一天需要用到它!當(dāng)你一切手段都解決不了問題的時候,EXCEL宏表函數(shù)或許是你最后的希望。它比VBA簡單,比大多數(shù)函數(shù)都簡單。比如,只需要掌握Get.Cell函數(shù)技巧,就能輕松實(shí)現(xiàn)各種單元格信息的獲取……
這是前不久一個網(wǎng)友問筆者的一道題,說實(shí)話,當(dāng)時確實(shí)也把筆者難住了,但在查閱一些資料后還是得到了圓滿的解答。不敢藏私,拿出來和大家分享一下,也能夠讓大家都GET到一點(diǎn)新知識。雖不至九塔浮屠,猶勝在贈花留香。
她的問題是這樣的,如下圖:
問題描述:
A列是字段,其中字體的格式中有“加粗”、“下劃線”、“斜體”,而且三種格式有“混用”情況;B列是對應(yīng)的數(shù)值?,F(xiàn)在要求分別計算出這些字體對應(yīng)數(shù)值的合計值,如果是混用的字體則可以重復(fù)計算數(shù)值。
問題分析:
其實(shí)從題意來說還是比較好理解的,大家是要判斷A列的字體是否為加粗、斜體、下劃線,如果是就可以使用SUMIF函數(shù)來處理。其中的難點(diǎn)是如何判斷,相信大家此時是無從下手的。
筆者初看此題的第一反應(yīng)就是使用VBA來判斷,簡寫如下:
Sub 判斷字體()
If Worksheets("sheet1").Range("A1").Font.Bold = True Then
a = "加粗 "
Else
a = ""
End If
If Worksheets("sheet1").Range("A1").Font.Italic = True Then
b = "斜體 "
Else
b = ""
End If
If Worksheets("sheet1").Range("A1").Font.Underline > 0 Then
c = "下劃線 "
Else
c = ""
End If
MsgBox a & b & c
End Sub
但是許多小伙伴說,VBA不好掌握,有沒有函數(shù)的方法呢?
宏表函數(shù)解題:
答案是肯定的,大家可以使用宏表函數(shù)來做此題。
STEP1:
使用CTRL+F3快捷鍵,打開名稱管理器。
按“新建”按鈕,在名稱處輸入“加粗”,在引用位置輸入內(nèi)容“=Get.Cell(20,Sheet1!$A2)”,然后用鼠標(biāo)點(diǎn)擊確定。
STEP2:
按照下面的方法,再建立兩個名稱,分別為“斜體”和“下劃線”。
STEP3:
設(shè)置完名稱,回到工作表中,在C2單元格輸入“=加粗”,把鼠標(biāo)放在單元格右下角的小黑點(diǎn)上,按住鼠標(biāo)左鍵,下拉至末行填充。
↑↑↑ 筆者為了便于同學(xué)們觀看,加了條件格式
同理,在D2單元格輸入“=斜體”,然后下拉至末行填充。;在E2單元格輸入“=下劃線”,同樣下拉至末行。至此大家就得到了對于A列字體的“判斷輔助列”,如下圖:
STEP4:
接下來的數(shù)值統(tǒng)計,對于許多小伙伴來說應(yīng)該都不是難事了。
在H4單元格輸入函數(shù):=SUMIF(C2:C15,TRUE,B2:B15)
在H5單元格輸入函數(shù):=SUMIF(D2:D15,TRUE,B2:B15)
在H6單元格輸入函數(shù):=SUMIF(E2:E15,TRUE,B2:B15)
STEP5:
雖然得到了最后的結(jié)果,但是還有不得不說的話,因為大家使用的是“宏表函數(shù)”,所以當(dāng)保存這個工作薄的時候,EXCEL會提示大家:
不要猶豫,點(diǎn)“否”!??!
用鼠標(biāo)點(diǎn)擊“否”以后會彈出“另存為”窗口,將文件保存為“啟用宏的工作薄”,即后綴為.XLSM的文件格式。這樣才能保存此次的宏表函數(shù)(或者VBA代碼),下次打開的時候才可以使用,切記,切記!!
【編后語】
對于宏表函數(shù)來說,還有很多好用的功能,比如說按“單元格填充顏色匯總數(shù)值”,筆者之前也介紹過用宏表函數(shù)“打印設(shè)置信息”、“批量制作分表”的功能。而且它的功能更方便,確實(shí)要比VBA代碼簡單很多。
雖然用了函數(shù)解決,但是依然還是離不開“宏”的概念,宏永遠(yuǎn)是EXCEL不可分割的一部分,所以真心建議大家有時間還是接觸一下這些內(nèi)容,如果你的工作離不開EXCEL,早晚你會遇到用“宏”才能解決的問題。
本文配套的練習(xí)課件請加入QQ群:902294808下載。
做Excel高手,快速提升工作效率,部落窩教育《一周Excel直通車》視頻和《Excel極速貫通班》直播課全心為你!
掃下方二維碼關(guān)注公眾號,可隨時隨地學(xué)習(xí)Excel:
相關(guān)推薦:
宏表函數(shù)的兩個新用法:批量建立分表和輔助打印設(shè)置
用GET.WORKBOOK函數(shù)實(shí)現(xiàn)excel批量生成帶超鏈接目錄且自動更新
excel代碼生成方式視頻:錄制宏或vba編碼拆分表格到工作薄
excel宏的錄制應(yīng)用視頻:調(diào)用開發(fā)工具錄制篩選操作添加宏運(yùn)行按鈕
版權(quán)申明:
本文作者E圖表述;同時部落窩教育享有專有使用權(quán)。若需轉(zhuǎn)載請聯(lián)系部落窩教育。
最熱教程
- 像綠皮火車一樣長像珠穆拉瑪峰一樣高的Excel表怎么操作才方便?
- Power Query實(shí)戰(zhàn):按指定次數(shù)遞增數(shù)據(jù)
- 2019年全網(wǎng)最全—excel提取身份證信息合集!(建議收藏)-下篇
- 明明沒有重復(fù),Excel卻判定數(shù)據(jù)重復(fù),這是怎么回事?
- 文本格式的求和,及求和中最容易出現(xiàn)的問題解疑
- 致命缺陷:不懂一維表!
- 函數(shù)組合思維,你有嗎?
- 學(xué)會這2個公式,整理考勤數(shù)據(jù)只要一分鐘
- 就算被說是拍馬屁也成,今天你應(yīng)該這樣發(fā)Excel報表……
- 如何計算Excel單元格中的算式,四種求和方法請收好!