返回列表 上一主題 發帖

[發問] 請問如何自動新增工作表,並將名稱改成文字(今天日期),在貼上某檔案並且不含公式

[發問] 請問如何自動新增工作表,並將名稱改成文字(今天日期),在貼上某檔案並且不含公式

請問如何利用自動生成新的工作表,並將工作表名稱改為統計值(今天日期)<==例如:統計值(20110525),如果當天已經有統計過則在日期後面加-1..-2..-3以此類推,例如:統計值(20110525-1),且將M1到Q12(黃色部分)的表格及值貼上(但是不含公式),請問此巨集該如何寫? TEST.rar (8.75 KB)

請問如何讓滑鼠點擊A1後,複製R2~T2,製另一個工作表貼上?

請問如何利用自動點擊A1~A12,並將R2~T2的值貼到總表上(不加公式),請問此巨集該如何寫?程序:點擊A1-->複製R2~T2-->貼製總表B1~D1,:
點擊A2-->複製R2~T2-->貼製總表B2~D2……依直到點擊A12-->複製R2~T2-->貼製總表B12~D12
TEST2.rar (13.53 KB)

TOP

本帖最後由 棋語鳥鳴 於 2011-5-26 20:19 編輯

回復 3# GBKEE


謝謝妳ㄉ回覆~我了解了!!
請問要更如更改成,自動點擊A2~A12呢?

TOP

本帖最後由 棋語鳥鳴 於 2011-5-27 08:03 編輯

回復 5# GBKEE


    這個我知道!我想問說!如果想讓他"自動連續點擊"
                                                      A2
                                                      A3
                                                      A4
                                                      A5.....一直到A12
就像:Range("A2").Select
       Range("A3").Select
                   .   
                   .   
                   .   
                   .   
      依直到Range("A12").Select
要怎麼改寫進去~或者簡化??

TOP

回復 7# Hsieh


    沒錯這就是我要的答案,而且2個問題都答了!謝謝您的回覆!想在請問一下!
如果將Q2:T2改成了R1:R4(變成直式的),那要如何使值轉置(變成橫式的)??檔案如附件! TEST2-2.rar (19.69 KB)

TOP

回復 8# GBKEE
謝謝您的回覆!雖然這不是我要的答案!但是我卻可以用到另一的是地方,所以還是很謝謝您!

TOP

        靜思自在 : 口說一句好話,如口出蓮花;口說一句壞話如口吐毒蛇。
返回列表 上一主題