設(shè)為首頁收藏本站Access中國

Office中國論壇/Access中國論壇

 找回密碼
 注冊

QQ登錄

只需一步,快速開始

返回列表 發(fā)新帖
查看: 3552|回復(fù): 1
打印 上一主題 下一主題

求教版主我寫的VBA掃描文件內(nèi)所有加粗的單詞!

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
1#
發(fā)表于 2008-5-21 11:41:30 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
Dim strWord As String With Selection.Find .Text = "?" .MatchWildcards = True End With Do While Selection <> "`" Selection.Find.Execute If Selection.Font.Bold = True Then strWord = strWord & Selection Else If Len(Trim(strWord)) <> 0 Then MsgBox strWord End If strWord = "" End If Loop 問題:我現(xiàn)在在文件內(nèi)寫用"`"這個字符注明文檔結(jié)束,可不可以不標(biāo)?
分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享分享 分享淘帖 訂閱訂閱
2#
發(fā)表于 2010-7-19 15:33:29 | 只看該作者
樓主是要選中所有加粗的文字?題意不清,不知道意圖是什么
您需要登錄后才可以回帖 登錄 | 注冊

本版積分規(guī)則

QQ|站長郵箱|小黑屋|手機版|Office中國/Access中國 ( 粵ICP備10043721號-1 )  

GMT+8, 2025-7-17 00:44 , Processed in 0.088692 second(s), 25 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回復(fù) 返回頂部 返回列表