1樓:匿名使用者
剛研究了一下,用巨集可能解決:
sub insertrow()
dim i as integer
dim n as integer
dim m as integer
m = 0
for i = 2 to 100 '假設從2至100行是有資料,沒有也無所謂,中間有空資料就不執行了
i = i + m
cells(i, 1).select
if cells(i, 1) <> "" thenm = cells(i, 1).value - cells(i - 1, 1).value
if m > 1 then
for n = 1 to m
selection.entirerow.insertnext n
else
m = 1
end if
else
exit for
end if
next i
end sub
2樓:匿名使用者
1、選擇3以下的2行,右擊插入。
2、選擇8以下的7行,右擊插入。
(注意選擇時要選擇前面的行號)
3樓:
在設定選項中可以解決
excel2007 如何自動按需增加行呢?
其實你這個問題不難做,一樓的已經說了,方法也對,如果你的表頭都是一樣的,進入頁面布局 頁面設定 工作表 頂端標題行 點小箭頭,選擇你要在每一頁顯示的行即可 你預覽一下,不滿意可以再調整。關於自動求和的問題,設計好最後一列為合計,並設定上醒目的顏色,以後輸入內容在合計之上插入行,要多少插入多少,下面的...
Excel中如何自動增加年齡等
督青芬雀汝 假如出生日期在a1單元格,日期格式為 1985 5 22那麼可以在b1單元格中輸入公式 datedif a1,today y 就可以得到年齡。 設a1是身份證號 年齡 datedif text mid a1,7,len a1 2.2 0000 00 00 today y 設b1是出獄日期...
EXCEL替換文字的時候怎麼加行
第一行 char 10 第二行 單元格的格式應該設定為 對齊 自動換行 所有這些要替換單元格的內容都是一樣的嗎?如果是一樣的,那就簡單多了 查詢替換,輕鬆搞定。也可以完乙個以後,按ctrl 回車。如果內容不一樣 比如說有第2行第3行等等 可以在word中迂迴處理。因為這裡的兩個行是不一樣的,第1個之...