12
返回列表 上一主題 發帖

執行巨集指令時按鈕卻一直增加(第二次發問)

blueskyneter

帖子
29 
主題
12 
精華
0 
積分
53 
點名
0  
作業系統
windows10 
軟體版本
OFFICE 2010 
閱讀權限
20 
性別
男 
來自
高雄 
註冊時間
2014-11-17 
最後登錄
2023-2-20 
1# 跳轉到 »
發表於 2015-7-6 03:04 | 只看該作者

執行巨集指令時按鈕卻一直增加

請問…
我用的EXCEL是2010版的.
我在一個工作表中，有四個按鈕(表單控制項)，
我錄製了一個巨集，將這工作表整個複製到一個新的檔案，
奇怪的是表格中的資料內容都沒有問題，但是這四個按鈕卻被新的按鈕給覆蓋住了；也就是說在原來按鈕的地方，產生了新的按鈕蓋在上面，按鈕名稱則為”按鈕1”或”按鈕2”等，只要再執行一次這巨集，就會再產生新的按鈕，每次產生四個，因為我原本就有四個按鈕。
還有更奇怪的是，原來的檔案也一樣產生了同樣的按鈕，而且一直加上去；也就是每執行一次就會被覆蓋一次。
以前沒有這現象，這是為什麼呢?
這應該是和系統從WIN 7換成WIN8.1沒有關係吧?因為最近換了新的電腦。
請各位達人解惑了,謝謝.

TOP

starry1314
　暱稱: 豪

高中生Rank: 3Rank: 3

帖子
471 
主題
121 
精華
0 
積分
579 
點名
0  
作業系統
WIN10 
軟體版本
OFFICE2019 
閱讀權限
50 
性別
男 
註冊時間
2015-4-16 
最後登錄
2023-1-17 
2#
發表於 2015-7-6 08:17 | 只看該作者
回復 1# blueskyneter


    會不會是按鈕是放在複製的儲存格的範圍內 ,所以連帶一起複製一份了

TOP

jackyq

帖子
319 
主題
6 
精華
0 
積分
309 
點名
0  
作業系統
xp 
軟體版本
2k 
閱讀權限
20 
性別
男 
註冊時間
2015-6-24 
最後登錄
2024-4-27 
3#
發表於 2015-7-6 08:30 | 只看該作者
回復 2# starry1314


    大大我幫你測試了一下, 我用手動複製貼上, 好像不會自己複製按鈕

TOP

blueskyneter

帖子
29 
主題
12 
精華
0 
積分
53 
點名
0  
作業系統
windows10 
軟體版本
OFFICE 2010 
閱讀權限
20 
性別
男 
來自
高雄 
註冊時間
2014-11-17 
最後登錄
2023-2-20 
4#
發表於 2015-7-6 11:13 | 只看該作者
謝謝樓上兩位的回覆:
TO冰殤：您說的我也想過，可是我先將那些原本的按鈕給先刪除掉，再來錄製巨集之後再來執行這巨集，結果還是一樣，在新的檔案中會產生四個新的按鈕之外，原本的原始檔也一樣又再產生一樣的按鈕啊。

TO jackyq：您說的沒有錯，手動的話是都很正常；例如第一次在錄製巨集時也一樣沒有問題，可是執行巨集的話就出現了這問題。所以才在頭痛不明白原因出來哪裏。

不知道還有什麼可能性？

TOP

jackyq

帖子
319 
主題
6 
精華
0 
積分
309 
點名
0  
作業系統
xp 
軟體版本
2k 
閱讀權限
20 
性別
男 
註冊時間
2015-6-24 
最後登錄
2024-4-27 
5#
發表於 2015-7-6 11:53 | 只看該作者
回復 4# blueskyneter


    沒 code 沒 answer

TOP

blueskyneter

帖子
29 
主題
12 
精華
0 
積分
53 
點名
0  
作業系統
windows10 
軟體版本
OFFICE 2010 
閱讀權限
20 
性別
男 
來自
高雄 
註冊時間
2014-11-17 
最後登錄
2023-2-20 
6#
發表於 2015-7-6 12:11 | 只看該作者
嗯．．我來研究一下看應如何來上傳檔案再請各位高手幫忙．．
謝謝．

TOP

blueskyneter

帖子
29 
主題
12 
精華
0 
積分
53 
點名
0  
作業系統
windows10 
軟體版本
OFFICE 2010 
閱讀權限
20 
性別
男 
來自
高雄 
註冊時間
2014-11-17 
最後登錄
2023-2-20 
7# 倒序看帖
打印
tT
發表於 2015-7-6 12:39 | 只看該作者

執行巨集指令時按鈕卻一直增加(第二次發問)

[版主管理留言]
  • GBKEE(2015/7/7 05:25): 附檔有私人資料,請修改再上傳,先替你刪檔.

本帖最後由 GBKEE 於 2015-7-7 05:26 編輯

實在是不知道如何在之前的問題中插入這問題檔，只好再重開一個發問的問題，請各位見諒。
這有問題的是在這附檔案中"船員薪資請款單 (含第一次用費))"這工作表之中。
執行了"另存請款單"的按鈕就出現了以下的問題。

執行巨集指令時按鈕卻一直增加

請問…
我用的EXCEL是2010版的.
我在一個工作表中，有四個按鈕(表單控制項)，
我錄製了一個巨集，將這工作表整個複製到一個新的檔案，
奇怪的是表格中的資料內容都沒有問題，但是這四個按鈕卻被新的按鈕給覆蓋住了；也就是說在原來按鈕的地方，產生了新的按鈕蓋在上面，按鈕名稱則為”按鈕1”或”按鈕2”等，只要再執行一次這巨集，就會再產生新的按鈕，每次產生四個，因為我原本就有四個按鈕。
還有更奇怪的是，原來的檔案也一樣產生了同樣的按鈕，而且一直加上去；也就是每執行一次就會被覆蓋一次。
以前沒有這現象，這是為什麼呢?
這應該是和系統從WIN 7換成WIN8.1沒有關係吧?因為最近換了新的電腦。
請各位達人解惑了,謝謝.
收藏 分享

blueskyneter

帖子
29 
主題
12 
精華
0 
積分
53 
點名
0  
作業系統
windows10 
軟體版本
OFFICE 2010 
閱讀權限
20 
性別
男 
來自
高雄 
註冊時間
2014-11-17 
最後登錄
2023-2-20 
8#
發表於 2015-7-6 12:41 | 只看該作者
因為找不到如何插入範例的方法，只好再開啟另一個發問的問題..
懇請各位達人幫忙,謝謝。

TOP

lpk187

帖子
552 
主題
3 
精華
0 
積分
578 
點名
0  
作業系統
win7 
軟體版本
office 2010 
閱讀權限
50 
性別
男 
註冊時間
2015-2-8 
最後登錄
2024-7-9 

2016猴年全勤獎章2015羊年全勤獎章熱烈參與勳章
9#
發表於 2015-7-6 14:10 | 只看該作者
回復 8# blueskyneter

你指定的是巨集10裡面的肉容就是增加按鈕啊！是不是指定錯了！
  1. Sub 巨集10()
  2. '
  3. ' 巨集10 巨集
  4. '

  6. '
  7.     Sheets("船員薪資請款單 (含第一次用費))").Select
  8.     ActiveSheet.Buttons.Add(579.75, 19.5, 66.75, 42).Select
  9.     ActiveSheet.Buttons.Add(581.25, 64.5, 64.5, 32.25).Select
  10.     ActiveSheet.Buttons.Add(507.75, 29.25, 52.5, 24).Select
  11.     ActiveSheet.Buttons.Add(51, 4.5, 70.5, 16.5).Select
  12.     ActiveSheet.Buttons.Add(509.25, 67.5, 54, 21).Select
  13.     Sheets("船員薪資請款單 (含第一次用費))").Copy
  14. End Sub
複製代碼

TOP

bobomi

帖子
181 
主題
5 
精華
0 
積分
197 
點名
0  
作業系統
XP 
軟體版本
2000 
閱讀權限
20 
性別
女 
註冊時間
2014-3-9 
最後登錄
2024-4-29 
10#
發表於 2015-7-6 14:11 | 只看該作者
Sub 巨集10()
'
' 巨集10 巨集
'

'
    Sheets("船員薪資請款單 (含第一次用費))").Select
'    ActiveSheet.Buttons.Add(579.75, 19.5, 66.75, 42).Select   '.......................拿掉
'    ActiveSheet.Buttons.Add(581.25, 64.5, 64.5, 32.25).Select   '.......................拿掉
'    ActiveSheet.Buttons.Add(507.75, 29.25, 52.5, 24).Select   '.......................拿掉
'    ActiveSheet.Buttons.Add(51, 4.5, 70.5, 16.5).Select   '.......................拿掉
'    ActiveSheet.Buttons.Add(509.25, 67.5, 54, 21).Select   '.......................拿掉
    Sheets("船員薪資請款單 (含第一次用費))").Copy
End Sub

TOP

        靜思自在 : 多做多得。少做多失。
12
返回列表 上一主題