Re: [算表] (關於剪貼)多個工作表複製貼上--VBA
請教w大大
因為我有類似的情況
不過我想在同一個檔裡有工作表
就是有1x個資料來源(格式相同,都有數百列)
併到單一sheet (先取名為data)
然後以data為主去做運算樞紐
請問可以怎麼改呢…
vba對我是外星文呀 >"<
謝謝您
※ 引述《windknife18 (windknife18)》之銘言:
: 使用 VBA 的方法,請參閱以前的文章
: 假設資料都在前三列,以下程式是將所有資料集中到Sheet1
: 其他位置可以參考自行修改之 ...
: Sub marco1()
: Dim index As Integer, start As Integer
: 'Sheet1 一開始的列
: start = 4
: For index = 2 To ThisWorkbook.Sheets.Count
: With ThisWorkbook.Sheets(index)
: '從第1列到第3列
: .Range(.Cells(1, 1), .Cells(3, .Columns.Count)).EntireRow.Copy _
: Destination:=ThisWorkbook.Sheets(1).Range("A" & start)
: End With
: start = start + 3
: Next index
: End Sub
: ※ 引述《wengho (wengho)》之銘言:
: : 軟體:EXCEL
: : 版本:2003
: : 我有一個檔案,有很多的SHEET,
: : 每個SHEET的欄位是固定有3列(橫)
: : 但需要把每個SHEET集中到一個SHEET裡面
: : 雖然一直剪貼就可以了
: : 可是資料確有500-600個SHEET
: : 請問有沒有辦法可以一次剪貼累積下去呢?
: : 感謝網友協助^^
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 203.187.88.253
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 3 之 4 篇):
Office 近期熱門文章
PTT數位生活區 即時熱門文章