Hello!大家好,很高興又到了周五。
工作中在單元格内輸入總結性文字時,如何突出部分關鍵字段呢?這是我遇到的一個問題。
表格本身并不具備這種功能,唯一可以實現的是對單元格内的所有内容調整格式。所以,我隻能把文字寫在不同的單元格,這樣很麻煩。怎樣實現一鍵操作,成了我的研究目标。
上面展示的效果是通過宏代碼實現的,選擇需要修改的單元格,點擊宏執行按鈕。
操作方式如下:
第一步:将文章下方的宏代碼複制粘貼到開發工具(Visual Basic)裡的Thisworkbook内。
第二步:點擊開發工具插入按鈕,選擇相應的宏名稱。
第三步:選擇需要調整的單元格,點擊按鈕執行即可。
注意需要突出的文字位置必須在選擇單元格的右側,且字段間用“/”分隔。
如有疑問,歡迎留言!
點擊關注,獲取更多内容。
Sub Talk數據()
For Each rg In Selection
Wstr = Trim(rg.Offset(0, 1))
Fstr = Trim(rg)
For Each W In Split(Wstr, "/")
strIndex = 1
Do
WIndex = InStr(strIndex, Fstr, W)
If WIndex > 0 Then
With rg.Characters(Start:=WIndex, Length:=Len(W)).Font
.ColorIndex = 3
.Bold = True
.Size = 14
End With
strIndex = WIndex Len(W)
End If
Loop Until WIndex = 0
Next
Next
End Sub
,更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!