EXCEL大師您好:
請教大師, 由於公司褔委會要開辦旅遊活動, 要求各個部門分別填回報名人數及參加人員資料, 請問可以在EXCEL之中依照各個部門分別開設部門頁面(財務, 業務......), 然後將EXCEL共用分享之後, 讓各部門分別異動該部門資料, 然後我同時開立一張總表頁面來匯總各部門頁面資料,我了解可以利用參照的方式來構成資料的連動,及合併函數, 但是當部門人員新增某一列時, 總表就不能連動新增了, 請問這是不是一定要寫VBA來完成呢, 還是可以用EXCEL內建函數就能解決了嗎?又要怎麼寫呢?
感謝您的協助.
Google 到的
參考看看
<pre class="c" name="code">
Sub Combine()
Dim J As Integer
On Error Resume Next
Sheets(1).Select
Worksheets.Add
Sheets(1).Name = "Combined"
Sheets(2).Activate
Range("A1").EntireRow.Select
Selection.Copy Destination:=Sheets(1).Range("A1")
For J = 2 To Sheets.Count
Sheets(J).Activate
Range("A1").Select
Selection.CurrentRegion.Select
Selection.Offset(1, 0).Resize(Selection.Rows.Count - 1).Select
Selection.Copy Destination:=Sheets(1).Range("A65536").End(xlUp)(2)
Next
End Sub