Sub 取代簡易()

Selection.Replace "AAA", "BBB"                                '將選取的欄位 AAA取代成BBB
ActiveSheet.UsedRange.Replace "AAA", "BBB"  '將整個頁面AAA取代成BBB

下列程式碼可以傳回電腦名稱

Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, _
                                                nSize As Long) As Long

Sub Get_Computer_Name()
    Dim Comp_Name_B As String * 255

結算申報結束後，附件上傳的方式讓人覺得很煩惱，所以就決定開發一個簡單的上傳程式，順便介紹結算申報附件上傳。

一、上傳附件介紹

1.進入結算申報系統內，點選附件上傳攻能

2.點選檔案格式及規格，可以看到需要上傳的格式

將學習VBA過程中常用的語句進行了歸納,希望能對Excel愛好者和VBA初學者有所幫助.

定製模塊行為 
(1) Option Explicit '強制對模塊內所有變量進行聲明 
Option Private Module '標記模塊為私有，僅對同一工程中其它模塊有用，在宏對話框中不顯示 

啟動一個錯誤處理常式，且指定此常式在一個程序裏的位置。也可用來停止一個錯誤處理常式。

語法

一、On Error GoTo LLL   '      如果執行錯誤跳到LLL

二、On Error Resume NextOn Error GoTo 0

三、On Error 陳述式的語法可以是下列任何一種形式：

選擇你要取消範圍程式瑪後加上

   Selection.UnMerge

將空白欄，刪除

Sub 刪除空白欄()
'
    Cells(1, ActiveSheet.Columns.Count).Select '選到最左邊

日期函數經常使用通用格式會變成

如何轉檔成數值可以使用TEXT函數 =TEXT(S34,"YYYYMMDD")

這樣就可以從日期函數轉成文字

EXCEL快速選擇性貼上值方法

1.使用CTRL 做不連續選取

2.CTRL+C 之後CTRL + V 貼上的就是值

使用資料表單新增、編輯、尋找及刪除列

範例:

如何使用此功能

新增至功能區的 [表單] 按鈕

一、若要新增至快速存取工具列]的表單] 按鈕  ，執行下列動作：

二、按一下 [快速存取工具列] 旁邊的箭號，然後按一下 [其他命令]OR[不在功能區命令]。

四、選取清單中的 [表單] 按鈕  。