国产91小视频在线观看_日日碰日日操_久久成人免费观看_国产高清自拍一区_久久久人_国产1区在线观看

三個月報表如何合并成季度報表

月下載量10,000+職場必備資料

三個月報表如何合并成季度報表,如果不太了解沒有關系,本文數豆子搜集整理了相關信息,請大家參考。

三個月報表如何合并成季度報表?

:三個月報表合并成季度報表,Excel將可以幫我們完成這一工作任務,如下:

1、從實驗儀器拷貝的大量零散文件需要整合(先用儀器或自帶軟件轉換為excel可讀格式)

2、工作過程中將大家的獨立工作簿,合并為一個工作簿上交(用下一個代碼更合適)

3、需要把工作簿中所有的工作表都要合并進來

Sub 合并工作?。ǎ?/p>

Dim FilesToOpen

Dim x As Integer

On Error GoTo ErrHandler

Application。ScreenUpdating = False

FilesToOpen = Application。GetOpenFilename _

(FileFilter:=“MicroSoft Excel文件(*。xlsx), *。xlsx”, _

MultiSelect:=True, Title:=“要合并的文件”) ‘選擇要合并的文件,上一行兩個。xlsx可以改為目標文件擴展名

If TypeName(FilesToOpen) = “Boolean” Then

MsgBox “沒有選中文件”

GoTo ExitHandler

End If ’防止未選中文件

x = 1

While x 《= UBound(FilesToOpen)

Workbooks。Open Filename:=FilesToOpen(x)

Sheets()。Move After:=ThisWorkbook。Sheets(ThisWorkbook。Sheets。Count)

x = x + 1

Wend ‘循環移動工作表

ExitHandler:

Application。ScreenUpdating = True

Exit Sub

ErrHandler:

MsgBox Err。Description ’描述出現問題

Resume ExitHandler

End Sub

以上就是關于三個月報表如何合并成季度報表的相關內容,希望本文對你有所幫助,更多與報表有關的文章,請繼續關注數豆子。

主站蜘蛛池模板: 国产精品自在线 | 国产超碰人人做人人爽aⅴ 亚州国产 | 国产福利电影网 | 中文字幕在线免费 | 精久久 | 99久久毛片 | 久久久久久久久久一区二区三区 | 999久久久久久久久6666 | 成年人小视频 | 亚洲久久| 国产成人在线视频播放 | 欧洲av不卡 | 韩国三级大全久久网站 | 欧美日韩综合视频 | 91精品国产高清久久久久久久久 | 美日韩一区二区三区 | 亚洲一区二区视频在线 | 中文字幕日韩一区二区 | 日本国产精品视频 | 亚洲免费在线观看视频 | 亚洲一区二区在线观看视频 | 黄网免费| 久久久久久久久久国产精品 | 亚洲精品久久久久久久久久久 | jizzz欧美| 国产日韩精品一区二区 | 视频一区二区三区在线观看 | 操综合| 91久久精品人人做人人爽综合 | 日韩欧美一区二区三区在线视频 | 亚洲精品久久久久久久久久久 | 性爱视频在线播放 | 久久精品视频在线观看 | 黄网站在线免费看 | 亚洲精品热| 久久久久久久一区二区三区 | 国产91九色 | 久久久亚洲精品视频 | 精久久久 | 国产在线不卡视频 | 久久高清 |