返回列表 上一主題 發帖

[發問] 如何讓Sheet2=I3，然後又讓該檔名可以繼續變更?

av8d

帖子
712 
主題
281 
精華
0 
積分
1019 
點名
0  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2011-6-30 
最後登錄
2025-5-22 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2012-10-15 13:32 | 顯示全部帖子

[發問] 如何讓Sheet2=I3，然後又讓該檔名可以繼續變更?

本帖最後由 av8d 於 2012-10-15 13:59 編輯

Sub aa()
Sheets("Sheet2").Name = [I3]
End Sub


Sheet2檔名則會變成I3，我該如何讓I3繼續變更?
收藏 分享

av8d

帖子
712 
主題
281 
精華
0 
積分
1019 
點名
0  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2011-6-30 
最後登錄
2025-5-22 
2#
發表於 2012-10-15 16:24 | 顯示全部帖子

如何"自動篩選"+"存到新工作表"

test.rar (14.73 KB)

自動篩選第二列會消失~其餘正常~

篩選後~將O欄自動加總於下方~

將第二列到加總列複製貼到~新工作表~工作表名稱=I3

若目前有該工作表則覆蓋貼上~
-----------------------------------------------------
目前只研究出Sheet2命名
Sheets("Sheet2").Name = [I3]

TOP

av8d

帖子
712 
主題
281 
精華
0 
積分
1019 
點名
0  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2011-6-30 
最後登錄
2025-5-22 
3#
發表於 2012-10-16 10:53 | 顯示全部帖子
回復 4# GBKEE


    test2.rar (12.75 KB)

套用了一下大大的~想請大大再幫忙一下~謝謝

當資料另存新檔後~Sheet1的資料若有3比~他只會移除1比~是否可以不移除或移除3比

當資料另存新檔後~新資料的金額若要加總該如何做?

我修改了一個~已新增資料表?個~不知道是不是沒寫好~他不會自動增加

TOP

av8d

帖子
712 
主題
281 
精華
0 
積分
1019 
點名
0  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2011-6-30 
最後登錄
2025-5-22 
4#
發表於 2012-10-16 11:23 | 顯示全部帖子
回復 6# c_c_lai


    學習了~謝謝大大的提示~我會加倍努力的!

TOP

av8d

帖子
712 
主題
281 
精華
0 
積分
1019 
點名
0  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2011-6-30 
最後登錄
2025-5-22 
5#
發表於 2012-10-16 13:59 | 顯示全部帖子
回復 8# GBKEE


    學習了，我真的才疏學淺，我要加倍努力!

TOP

        靜思自在 : 好事要提得起，是非要放得下，成就別人即是成就自己。
返回列表 上一主題