1. 在vba中實現(xiàn)定時功能的是什么
通過VBA實現(xiàn)自動填充，公式隨單元格而變化：
Private Sub Worksheet_Change(ByVal Target As Range)On Error Resume NextIf Target.Column = 4 And Target <> "" Then Range("c4").Copy Target.Offset(0, -1)End Sub如果不能滿意，請按照自己的意愿拓展！
2. excel打開vba編輯器快捷鍵
方法如下：
1.打開所需要的excel工作簿,ALT+F11打開 visual basic 編輯器2.在visual basic 編輯器里,點 "視圖"-"工程資源管理器"(快捷鍵Ctrl+R),雙擊左側(cè)的"Thisworkbook",粘貼上代碼 Private Sub Workbook_Open() MsgBox "歡迎光臨" End Sub保存后關(guān)閉,重新打開就行了
3. vba編輯器快捷鍵
1、打開編寫VBA代碼的窗口
編寫VBA的窗口叫VBE編輯器，有好幾種打開的方法。
在工作表標(biāo)簽上右鍵 - 查看代碼
按Alt+F11
開發(fā)工具 - 點Visual Basic圖標(biāo)
2、創(chuàng)建寫VBA代碼的地方
在哪編寫代碼呢？有好幾種方式，今天先學(xué)最常用的：插入 - 模塊。新建一個模塊用來存放編寫的代碼。
3、開始寫代碼
插入（或雙擊）模塊后，在右側(cè)的空白位置就是編寫代碼的地方。
可以執(zhí)行的VBA代碼(宏程序)，結(jié)構(gòu)是這樣的：
Sub程序名(參數(shù))
可以執(zhí)行任務(wù)的代碼
End Sub
輸入Sub 程序名()然后回車，End Sub就會自動輸入。
在開始和結(jié)束語句之間輸入代碼，執(zhí)行 在單元格A1中輸入數(shù)字123
Range("A1")= 123
注：在VBA中，Range("單元格地址")來表示單元格，又如Range("A1:B100")表示A1:B100單元格區(qū)域。在單元格中輸入值，直接用=值即可(字符串兩邊要加雙引用)，如果清空則=""
4. vba 定時
vb會自動識別，默認(rèn)為月日年，年月日，日月年的順序，如#10/11/12#vb識別為2012年10月12日；如果第一個數(shù)超過12，如#13/11/12#vb則識別為2013年11月12日；如果第一個數(shù)超過12，且最后一位超過31，如#13-11-32#vb則識別為1932年11月13日。其他值則為錯誤
5. vba 自定義菜單 快捷鍵
excel 通過函數(shù)公式和VBA來實現(xiàn)excel單元格內(nèi)換行的具體方法
excel單元格內(nèi)換行的方法，比如通過alt+enter組合鍵等等方法。
注：如果使用alt+enter組合鍵使用excel單元格內(nèi)換行之后，應(yīng)該再重新調(diào)整行高（雙擊行與行之間間隔快速調(diào)整為合適高度）。
本文介紹一些特殊的excel單元格內(nèi)換行的實例。
excel單元格內(nèi)換行實例一：
如何用VBA實現(xiàn)15位數(shù)值以每5個數(shù)字自動換行。
按ALT+F11，打開VBE窗口，單擊插入——模塊，復(fù)制下面代碼，按F5鍵運行即可自動實現(xiàn)excel單元格內(nèi)換行。Sub 單元格內(nèi)換行()For x = 1 To Range("A" & Range("A:A").Count).End(3).RowCells(x, 1) = Left(Cells(x, 1), 5) & Chr(10) & Mid(Cells(x, 1), 6, 5) & Chr(10) & Right(Cells(x, 1), 5)Next xEnd Sub
excel單元格內(nèi)換行實例二：
excel一個單元格內(nèi)換行內(nèi)容，如A1所示，如何自動將A1自動換行的內(nèi)容轉(zhuǎn)換為多個單元格，如A3：A5的效果。
按ALT+F11，打開VBE窗口，單擊插入——模塊，復(fù)制下面代碼，按F5鍵運行即可自動實現(xiàn)excel單元格內(nèi)換行。
Sub 單元格內(nèi)換行() v = Split(Cells(1, 1).Value, Chr(10)) Cells(3, 1).Resize(UBound(v) + 1, 1).Value = Application.Transpose(v)End Sub
excel單元格內(nèi)換行實例三：
Excel工作表中以分號隔開的數(shù)據(jù)，如何操作可以實現(xiàn)這些信息在Excel單元格內(nèi)換行？
將A1單元格處實現(xiàn)單元格內(nèi)換行。在B1單元格輸入公式： B1=SUBSTITUTE(A1,";",CHAR(10))，然后調(diào)整B1單元格的列寬和行高。
6. vba編輯窗口快捷鍵
系統(tǒng)默認(rèn)的組合鍵沒有找到 "^/"用法。若是自定義熱鍵，請分別open和beforeclose事件中進(jìn)行定義和釋放，并且保存關(guān)閉后重新打開。例：Private Sub Workbook_BeforeClose(Cancel As Boolean)Application.OnKey "^57xxfpb"恢復(fù)系統(tǒng)對^d的默認(rèn)設(shè)置End SubPrivate Sub Workbook_Open()Application.OnKey "^hjhf5pr", "UserSubName"定義^d熱鍵執(zhí)行用戶自定義的函數(shù)End Sub
