回覆列表
  • 1 # 茶花女北島靜待

    方法/步驟

    首先我們要有自己的excel資料,並且我們需要的是microsoftexcel,wps沒有這些負責的功能。比如我下面舉例的,我自己有205頁的資料需要合併,如圖所示。

    看到這麼多資料頁要合併,如果是複製貼上的話,工作量就很大了。我們現在開始合併,首先要在最前頁新建一個工作表。如圖:

    在新建的sheet表中“右鍵”,找到“檢視程式碼”,然後看到宏計算介面。如圖所示:

    看到宏計算介面,我們就只需要把下面的程式碼複製進去,程式碼如下,效果如下:

    sub合併當前工作簿下的所有工作表()

    application.screenupdating=false

    forj=1tosheets.count

    ifsheets(j).nameactivesheet.namethen

    x=range("a65536").end(xlup).row+1

    sheets(j).usedrange.copycells(x,1)

    endif

    next

    range("b1").select

    application.screenupdating=true

    msgbox"當前工作簿下的全部工作表已經合併完畢!",vbinformation,"提示"

    endsub

    合併後的效果

  • 中秋節和大豐收的關聯?
  • 怎麼樣才算是抑鬱症?