用Excel的VBA實現文字匹配與替換

在工作的過程中，有時候為了批量處理excel，不可避免會寫一些vba小程式，而在規範資料格式方面，經常會用正規表示式：

以下是我自己經常會用到的小程式：

一、文字匹配

function btest(byval s as

string, byval p as
string) as
boolean
dim re
set re = createobject("vbscript.regexp")

re.ignorecase = false
'設定是否匹配大小寫
re.pattern = p
btest = re.test(s)
end function

二、文字替換

function strreplace(s as

string, p as
string, r as
string) as
string
dim re
set re = createobject("vbscript.regexp")

re.ignorecase = true

re.global = true
re.pattern = p
strreplace = re.replace(s, r)
end function

當然，往往在實際的應用中，還要根據具體的情況去修改程式。

初識VBA 用VBA簡單處理excel資料

所有的程式語言都是一樣滴，好喜歡解決問題的工作！雖然現在做的很簡單。開啟excel中使用vba的方法，工具欄 開發工具 vb，這就是個直接可以用的程式設計環境好嘛！然後第一次使用vb語言，用習慣了物件導向語言之後，再用這種過程 括號的語言竟然不習慣了 上學時候學的c語言都還給老師了嘛！悲愴臉 一頓查...

VBA 通過VBA實現EXCEL真正的全屏顯示

說明 通過vba實現真正的全屏顯示excel介面。測試 private sub commandbutton1 click if commandbutton1.caption 全屏顯示 then displayfullscreen true 基本全屏 commandbars 1 enabled fal...

VBA 用類實現陣列擴容

我們知道陣列的長度是固定的，定義了以後不能隨意的增加其長度，但是我們可以用類來實現表面上的擴容 即增加陣列的儲存空間 1.首先我們新增乙個類模組，取名為 myarr 並且在裡面新增一些方法 比如擴容，檢視陣列值等 具體 如下 option explicit private arr as string...