想在Excel中自動插入空白行,並且自動延續上一行的函數公式,該怎樣設置呢?

得寸則寸得尺則尺


用 "超級表功能"


在Excel中有一種特別的表格,也通常稱之為“超級表”,就是包括標準行列存儲數據的單元格區域,它最首要的功用就是能夠使一些常用函數和命令變得非常簡單,快跟著小編一起學一下吧。

操作步驟:單擊或全選單元格,插入-表格-確定,即完成le超級表的創立。

超級表究竟超級在哪裡呢?接下來就是見奇蹟的時刻。

1、隨意替換表格樣式

將一般區域轉化為“表格”後,會在功用區中顯現“表格”專用的【表格工具】,能夠對錶格進行各種排版設計,具有表格樣式(感覺和透視表有點類似,就是可以整體切換佈局)。

2、快速篩選,而且篩選後依然能保持間隔上色的視覺效果.普通篩選就很難做到了!

正常情況下,在標題行中“表格”的所有列啟用篩選功用,可快速篩選。

3、標題行隨時可見

假如“表格”中包括活動的單元格,那麼當向下滾動sheet表並使標題行消失時,“表格”A、B、C……等列稱號會被列標題稱號代替。

簡單點說就是你會發現你的ABCD會變成你第一行的表頭文字,這樣省去了凍結首行的操作

4、支持列計算

能夠一鍵顯示彙總行,並且能夠通過單元格公式下拉菜單挑選核算方式。

5、Tab鍵尾列自動跳轉到下一行狩獵

在一般區域中運用Tab鍵,單元格向右,在“表格”中運用Tab鍵,能夠主動跳轉到“表格”區域內的下一個單元格。

假如有新的數據需求錄入,需將光標定位在表格數據的最右下角,按“Tab”鍵,完成表格的擴充。

6、公式結構化引用並自動複製

“表格”中公式能夠運用“表格”的列標題,而不是運用單元格引用,相當於自動給每列做了一個自定義名稱,這樣寫公式的含義就會非常清楚了。

在輸入第一個公式後,其他單元格公式會自動向下填充。省去了手動填充的麻煩,也不會出現忘記填充公式了

當添加新的數據行時,上一行的公式會主動仿製當前行。

7、數據透視表的數據源增加減少後可自動更新

一般區域中假如添加了新的數據行,數據透視表不能完成主動更新。

用“表格”作為數據源創建數據透視表,當表格中新增記錄後,數據透視表右鍵刷新即可重新計算最新數據

PS:如果想查看我歷史文章視頻,可在頭條搜索中直接搜索 ""Excel880 關鍵字"\

Excel880實例教學


以#獎教獎學情況彙總表#為例來說明需要增減老師人數這個應用場景如何一鍵雙擊自動增加或刪除一行的設置:

第一部分:應用場景

1、雙擊姓名所在B列的單元格時,在單元格下方插入一行;

2、插入行自動延續上一行的函數公式;

3、雙擊序號所在A列的單元格時,刪除雙擊單元格所在行;

第二部分:應用設置

第一步,打開原來模板;

第二步,原來模板公式預覽;

第三步,也是最關鍵的一步,考錄代碼;(有關宏設置及打開代碼窗口請參照我之前的圖文或問答,不再重複)


代碼文本如下:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) '工作表雙擊事件

Cancel = True '取消雙擊單元格進入編輯狀態

If Target.Row > 3 And Target.Column = 2 And Target.Value <> "" Then

'限定在B列而且大於第三行而且內容不能為空的單元格中,雙擊單元格時插入一行

Rows(Target.Row + 1).Insert Shift:=xlDown

'在下方自動插入一行

Range("A" & Target.Row & ":O" & Target.Row).AutoFill Destination:=Range("A" & Target.Row & ":O" & Target.Row + 1), Type:=xlFillDefault

'複製雙擊行的公式到插入行中

ElseIf Target.Row > 3 And Target.Column = 1 Then

'限定在A列而且大於第三行而且內容不能為空的單元格中,雙擊單元格時刪除一行

Rows(Target.Row).Delete Shift:=xlUp

'刪除雙擊單元格所在行

End If

End Sub

第四步,結果預覽;

最後,如用於其他應用場景只需修改代碼變量即可。

謝謝您的閱讀!我是#Excel財務VBA#,懂會計的程序員,Excel&VBA精通。上面回答如果對您有幫助,或有不清楚的問題,或需要更多自動化財務表單模板下載,或瞭解更多實戰技巧分享,請記得點贊、分享、關注我的頭條號“Excel財務VBA”哦!也可私信


Excel財務VBA


用IF函數判斷下。如果當前ROW是偶數,如何如何;如果當前ROW是奇數,如何如何。

判斷酒,用MOD函數。

=IF(MOD(ROW()),2)=0,偶數行,奇數行)

沒事學點兒Excel


Ctrl+T轉成表,就可以自動延展,自動填充公式


分享到:


相關文章: