回覆列表
  • 1 # 西崗吳彥祖

    方法非常簡單,請你一定仔細,按照下面的步驟開始神奇之旅~~~

    第一步、開啟你的EXCEL工作薄,最好關閉其它無關的EXCEL檔案,按ALT+F11

    這一步就只按一個鍵,就是按住ALT不放,按以下F11,然後立即放開,三秒之內完成

    這個步驟成功的標誌:新開啟一個視窗,標題是:Microsoft Visual Basic for Application

    第二步、在上面開啟的VBA窗口裡面,按CTRL+R

    是的,就這麼簡單,這一步也就是一個熱鍵

    這個步驟成功的標誌,在VBA窗口裡面的左邊出現一個小視窗,標題是“工程-VBAProject”,裡面有你開啟的所有工作薄、工作表

    第三步、先緊張你一下,這一步沒有前面兩步那麼簡單,操作稍微複雜一點,請一定仔細

    在工程窗口裡面,雙擊你需要自動新增備註的工作表,一定雙擊,不怕多,最好多擊幾次,注意你擊的時候,會新開一個類似記事本的視窗,視窗標題前面部分是你的EXCEL檔案、工作表名稱,後面部分是“(程式碼)”

    第四步、在程式碼視窗貼上以下內容(以下所有的程式碼行,直到第五步結束):

    Private Sub Worksheet_Change(ByVal Target As Range)

    Dim s

    s = Date & " " & Time & ":" &

    Target.Value

    If Not

    Target.Comment

    Is Nothing Then

    s =

    Target.Comment.Text

    & Chr(10) & s

    Target.ClearComments

    End If

    Target.AddComment

    s

    End Sub

    第五步、這個步驟其實沒有什麼需要做的,你現在隨便去修改這個表,備註立即會新增

    這是個驗證步驟,如果結果滿意,你可以關閉EXCEL、儲存所有修改,再次開啟,因為太多的視窗怕引起你心煩。

    說明,再次開啟的時候可能會提示檔案有宏,你要點允許執行,如果根本不提示,說明你的宏安全性設定得太高,需要在選項裡面降低安全性到“中”

  • 中秋節和大豐收的關聯?
  • theshy十天內連玩45把大亂鬥,在MSI之前不打韓服排位是不是不誤正業呢?