[分享] with 的用法心得分享

t8899

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