※ 引述《zesy (認識新朋友!!)》之銘言：
: ※ 引述《zesy (認識新朋友!!)》之銘言：
: : 例
: : a b c d e f g h i j
: : 1 # # # #
: : 2 # # # #
: : 3 # # # #
: : 4
: : 5
: : 6
: : 7
: : 8
: : x為變數
: : Worksheets("統計表").Range(Cells(x, 2), Cells(x, 5)).Clear
: : 請問這樣的寫法有錯嗎?
: Sub gg()
: Dim x As Integer
: If Worksheets("sheet2").Range("A1").Value >= 1 Then
: x = Worksheets("sheet2").Range("A1").Value
: Worksheets("SHEET1").Range(Cells(x, 2), Cells(x, 7)).ClearContents
上面那列改成
Worksheets("SHEET1").Range(Cells(x, 2).address, Cells(x, 7).address).ClearContents
: End If
: End Sub
: 這是我寫的程式碼
: 寫在同一個sheet沒問題，但不同sheet時就出現問題
: 請問是問題出在哪?
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 203.73.105.131