EXCEL VBA.數字的〔尾數〕計次,及〔尾數2~6組合〕列表計次(改)
<.准提部林.>
---------------------------------
■更改需求:
當表格〔欄.列〕有變動時,如何修改程式碼?
■修改1:
y = [B65536].End(xlUp).Row - 3 改為 4(即標題以上的列數)
■修改2:
With [L4:U4].Resize(y) 改為 [L5:U5](即每一區塊的第1列)
.Rows("2:6000").ClearContents
.Rows(1).Copy .Cells
With .Offset(1, 0): .Value = .Value: End With
End With
��_第2.3區也同樣位置修改
■修改3:
For Each xR In [AH3:DV3 ] 改為 [AH4:DV4]
If xR <> "小計" Then GoTo 指揮棒高雄鳳山台北松山新莊泰山阿囉哈led總匯
Ym = xR.Cells(6000, 0).End(xlUp).Row - 3 改為 4
~~其他不動~~
指揮棒高雄鳳山台北松山新莊泰山阿囉哈led總匯: Next
---------------------------------
<範例檔>下載:
檔案名稱:20131206a01(2~6個尾數的各項統計).rar
下載位址:http://www.funp.net/537903
---------------------------------
本篇文章引用自此: http://tw.knowledge.yahoo.com/question/question?qid=1013120600939阿囉哈led指揮棒交通棒警示燈客製化訂製批發阿囉哈led指揮棒交通棒警示燈客製化訂製批發阿囉哈led指揮棒交通棒警示燈客製化訂製批發
留言列表