返回列表 上一主題 發帖

[發問] 發生執行階段錯誤'1004': Class Range的Select方法失敗

[發問] 發生執行階段錯誤'1004': Class Range的Select方法失敗

我想複製工作表內容貼上值到其他工作表時發生了錯誤
  1. Private Sub 過帳_Click()

  2.     Sheets("過帳表單").Select
  3.     Range("A6").Select
  4.     Application.CutCopyMode = False

  5.     Sheets("過帳表單").Select
  6.     Range("A6:F15").Select
  7.     Application.CutCopyMode = False
  8.     Selection.Copy
  9.     Sheets("借出歸還紀錄").Select
  10.     Range("A3").Select  //這一句會發生執行階段錯誤'1004': Class Range的Select方法失敗
  11.     Selection.End(xlDown).Select
  12.     ActiveCell.Offset(1, 0).Range("A1").Select
  13.     Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
  14.         :=False, Transpose:=False
  15.    
  16.     Sheets("過帳表單").Select
  17.     Range("A6").Select
  18.    
  19. End Sub
複製代碼

感謝GBKEE的幫忙 問題透過 提供的修改程式碼 已經解決 實在太厲害了

TOP

        靜思自在 : 能幹不幹,不如苦幹實幹。
返回列表 上一主題