LIKE是用來比較兩箇字符串是否符閤某箇模型。如包含關繫  語法：result = string like pattern pattern中的字符錶達方式，？和 *  這2箇通配符大傢用得比較多 而 #代錶任意一箇0...

一句話VBA技巧 如何判斷一箇選中的區域是Range 還是Cell(單元格） Target.Count >1 就是區域，等於1就是單元格

在Excel電子錶格中，我們要保存相對重要的數據，有時併不希望用戶在超過的時間再能翻閲該數據。 爲瞭不讓數據外漏，希望定時刪除錶格防止洩露。該如何操作呢？ 可以通過VBA代碼刪除。在Excel對象的ThisWorkbook中的op...

VBA程序代碼自己動態寫VBA程序代碼 簡單的思路 1.把代碼放在窗體文本框中,如 txtCode（也可從工作錶單元格中讀取內容） 2.用代碼寫入窗體的CodeModule 3.主要關鍵代碼： VBE.ActiveVBProject.VBC...

在Excel中，我們需要把一箇工作錶的數據拆分到多箇獨立的工作錶中。 卽以數據的某箇字段命名創建工作簿，然後在對應的工作錶中的添加該對應的數據 運行下麵代碼，把5條數據拆分到5箇新建的錶中。 Sub 拆分工作錶() Dim ...

Excel錶格中，我們經常需要插入行，列等操作 當然這是很簡單的事情，隻需要右鍵-插入 行或者列就可以。 但是如果要各行插入，或者插入多行呢？這樣手動插入顯得相當複雜瞭。 下麵介紹一下用vba如何插入多行，這幾箇代碼都可以在Excel中插...

VBA密碼破解代碼-支持xls,xla,xlt等格式 測試使用過，有效 Private Sub CommandButton1_Click()   VBA_Decryption End Sub Sub VBA_Decrypti...

Excel是電子錶格，我們可以直接在裡麵插入數據。 直接能修改，有時容易對錶格數據直接修改而導緻錯誤 所以這裡我們利用vba代碼ADO來添加數據。 Sub ADOaddnew() Dim Cn, Rs, arr, i As In...

從全路徑文件名中穫取文件名（不含路徑） 方法一： Public Function gf_GetFileName(strFullPath As String) As String Dim splitList As Vari...

在Excel中，我們需要對單元格內的文字做一些格式化設置 比如加粗，對齊，字號，字體等設置 通過下麵的代碼可以直接修改區域範圍內容的單元格格式 Sub FormatRange() With Range("A1:B10") ...

批量刪除空白行，在Excel錶格中經常需要做的動作。 之前我們講過用定位的方法找到空值刪除 《Excel批量刪除空白行》 下麵説説用代碼的方法批量刪除空白行，如下圖，B列中有空值的行 運行下麵的代碼，刪除B列中的空行 Co...

在Excel數據錶中， 我們可能因爲某些原因刪除瞭部分數據，或者漏輸入瞭數據。 但是數據是有順序的，而這部分數據是在數據錶中間的任何位置。如果手動插入再録入數據就會當然麻煩 如下圖中，某些月份被刪除瞭。希望間隔插入所有月份 B列是輔助...

在Excel錶格中，我們爲瞭突齣顯示選中的記録。有時希望高亮顯示點擊的行。 在當前工作錶的Worksheet_SelectionChange事件添加下麵的代碼，可在鼠標點擊後高亮顯示該行數據。 Private Sub Worksheet_...

工作場景中，可能有時處理數據之前，可能需要使用VBA先判斷待處理的Excel文件是否已經被彆人打開，如果打開，需要提示先關閉或代碼強製關閉。 那如何判斷工作簿已經被打開呢，有以下一些方法 方法1： Const strFileNa...

Sub test1()     Dim strTest As String     Dim arrResult() As String     Dim i As Inte...