返回列表 上一主題 發帖

同時執行兩個vba時同樣做copy貼上的動作如何避免貼上的異常

flask

帖子
40 
主題
10 
精華
0 
積分
83 
點名
0  
作業系統
winxp 
軟體版本
office2003 
閱讀權限
20 
註冊時間
2011-6-3 
最後登錄
2020-10-1 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2011-7-21 12:42 | 顯示全部帖子

同時執行兩個vba時同樣做copy貼上的動作如何避免貼上的異常

請問我同時執行兩個vba時,從不同網頁匯入資料處理完,將資料複製到各工作表,同樣做copy貼上的動作,
當兩個vba執行到同時做貼上時會有一個會出現異常,請問要如何避免貼上的異常的現像,謝謝..
收藏 分享

flask

帖子
40 
主題
10 
精華
0 
積分
83 
點名
0  
作業系統
winxp 
軟體版本
office2003 
閱讀權限
20 
註冊時間
2011-6-3 
最後登錄
2020-10-1 
2#
發表於 2011-7-21 15:43 | 顯示全部帖子
謝謝GBKEE大大,我的程序碼是這樣那要如何改呢?
   Sheets("sheet1").UsedRange.Columns.AutoFit
    Columns("B:F").Copy
     Workbooks.Open Filename:= _
     "c:\7月\" & stcode & "7月.xls"
     Sheets("庫存").Select
     ActiveWorkbook.Sheets("庫存").Cells(, Cells(2, 255).End(xlToLeft).SpecialCells(12).Column + 1).Select
     ActiveSheet.Paste
      Workbooks(stcode & "7月.xls").Close SaveChanges:=True
     Columns("B:F").ClearContents

TOP

flask

帖子
40 
主題
10 
精華
0 
積分
83 
點名
0  
作業系統
winxp 
軟體版本
office2003 
閱讀權限
20 
註冊時間
2011-6-3 
最後登錄
2020-10-1 
3#
發表於 2011-7-22 17:15 | 顯示全部帖子
謝謝GBKEE大大,今天只改一個沒改的會異常,但狀況好多了,下星期再來試試.謝謝GBKEE大大

TOP

        靜思自在 : 人要自愛，才能愛普天下的人。
返回列表 上一主題