多工作表Excel文件模版的前處理

2021-06-14 06:52:37 字數 739 閱讀 6963

在向多工作表(幾十上百個)excel文件模版輸入資料時,進行包括清理內容、凍結標題行和定義名稱等前處理操作。

option explicit

sub pretreatment()

'' pretreatment 巨集

' 刪除第

一、二行以外的資料; 凍結首行,即標題欄; 定義a1名稱為當前工作簿名稱;''

dim i as integer

for i = 1 to sheets.count

sheets(i).activate

'刪除第

一、二行以外的資料

rows("3:3").select

range(selection, selection.end(xldown)).select

selection.clearcontents

'凍結首行,即標題欄

' range("a1").select

with activewindow

.splitcolumn = 0

.splitrow = 1

end with

activewindow.freezepanes = true

'定義a1名稱為當前工作簿名稱

range("a1").name = sheets(i).name

range("a1").select

next i

end sub

Excel多工作表頁碼連續設定

列印excel 2002工作表之前需要設定頁碼,如果多張工作表的頁碼必須連續排列,就得採用一些特殊的頁碼設定技巧。假設有名為sheet1 sheet2和sheet3的三張工作表,分別可以列印2 3 5頁,並且列印時每個工作表的內容要連線在一起。可以按以下方法設定頁碼 首先開啟工作表sheet1,單擊...

PHPExcel 多工作表 匯入

引數初始化 filepath if files file error 0 filepath files file tmp name 建立reader物件 this load library phpexcel phpreader new phpexcel reader excel2007 if php...

多工作簿合併計算

public sub quickconsolidatemethod 宣告變數 dim wb as workbook,openwb as workbook dim sht as worksheet,onesht as worksheet dim rng as range,onerng as range...