標題: [分享] with 的用法心得分享 [打印本頁] 作者: t8899 時間: 2014-3-22 06:53 標題: with 的用法心得分享
with 的用法心得分享
Sub Ma3333()
With Workbooks("111.xls").Sheets("Sheet2") '不可以.Sheet2 (無此語法)
.Range("a8").Value = 1 '最前面的點不可拿掉 ,拿掉會變成在active sheet
End With
End Sub
--------
Sub Ma3333()
With Workbooks("111.xls")
.Sheets("Sheet2").Range("a8").Value = 1 '最前面的點不可少掉 不可以用.sheet2.range("a8").Value = 1 (無此語法)
End With
End Sub作者: barrykuo 時間: 2014-7-7 13:23
回復 1#t8899
謝謝t8899大大分享原來點點 . 是這樣用途，不能不加上去。拿掉會變成在active sheet。
昨天也寫with，為了range與cell併用來選擇範圍做清楚，剛好碰到.Range(....)這樣的敘述，有發現需要加一個 . 在range前面只是不知道為什麼？真是謝謝分享！
With Worksheets(1)
.Range(.Cells(2, 3), .Cells(6, 4)).ClearContents '利用range與cells並用選擇範圍清除
End With
