vba中find查找表格中不為空的最大矩形區域,按下面代碼:
Sub 查看區域()
Dim a%, b%, m%, n%
a = Cells.Find("*", , , 1, 1, 1).row
b = Cells.Find("*", , , 1, 2, 1).column
m = Cells.Find("*", , , 1, 1, 2).row
n = Cells.Find("*", , , 1, 2, 2).column
Range(Cells(a, b), Cells(m, n)).Select
End Sub
但是COM中Find的宣告如下:
LPDISPATCH Find(const VARIANT& What, const VARIANT& After, const VARIANT& LookIn, const VARIANT& LookAt, const VARIANT& SearchOrder, long SearchDirection, const VARIANT& MatchCase, const VARIANT& MatchByte, const VARIANT& SearchFormat);
要實作上面VBA的效果 應該怎樣編碼?
以下各引數都代表什么意義?應如何傳參?
這么問吧:
After 引數作用是啥
LookIn, 這是向哪里查找?
LookAt, 這是向哪里查找?
SearchOrder, 指定什么查找順序?
long SearchDirection, 指定什么查找方向?
MatchCase, 這是在匹配什么?
MatchByte,這是在匹配什么?全字符匹配嗎
SearchFormat 查找的格式應該怎么設定
請高手指點!多謝!!
uj5u.com熱心網友回復:
打開excle程式,進入VBA編輯界面(錄制一個宏,然后編輯宏)點擊幫助,搜索即可。
Range.Find 方法
在區域中查找特定資訊。
語法
運算式.Find(What, After, LookIn, LookAt, SearchOrder, SearchDirection, MatchCase, MatchByte, SearchFormat)
運算式 一個代表 Range 物件的變數。
引數
名稱 必選/可選 資料型別 說明
What 必選 Variant 要搜索的資料。可為字串或任意 Microsoft Excel 資料型別。
After 可選 Variant 表示搜索程序將從其之后開始進行的單元格。此單元格對應于從用戶界面搜索時的活動單元格的位置。請注意:After 必須是區域中的單個單元格。要記住搜索是從該單元格之后開始的;直到此方法繞回到此單元格時,才對其進行搜索。如果不指定該引數,搜索將從區域的左上角的單元格之后開始。
LookIn 可選 Variant 資訊型別。
LookAt 可選 Variant 可為以下 XlLookAt 常量之一:xlWhole 或 xlPart。
SearchOrder 可選 Variant 可為以下 XlSearchOrder 常量之一:xlByRows 或 xlByColumns。
SearchDirection 可選 XlSearchDirection 搜索的方向。
MatchCase 可選 Variant 如果為 True,則搜索區分大小寫。默認值為 False。
MatchByte 可選 Variant 只在已經選擇或安裝了雙位元組語言支持時適用。如果為 True,則雙位元組字符只與雙位元組字符匹配。如果為 False,則雙位元組字符可與其對等的單位元組字符匹配。
SearchFormat 可選 Variant 搜索的格式。
uj5u.com熱心網友回復:
#import 的方式引入 Excel, 剩下的和VBA的宏代碼很接近轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/45375.html
標籤:數據庫
