ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[¤À¨É] with ªº¥Îªk¤ß±o¤À¨É

[¤À¨É] with ªº¥Îªk¤ß±o¤À¨É

with ªº¥Îªk¤ß±o¤À¨É
Sub Ma3333()
With Workbooks("111.xls").Sheets("Sheet2")     '¤£¥i¥H.Sheet2 (µL¦¹»yªk)
.Range("a8").Value = 1  '³Ì«e­±ªºÂI¤£¥i®³±¼ ,®³±¼·|Åܦ¨¦bactive sheet
End With
End Sub
--------
Sub Ma3333()
With Workbooks("111.xls")
.Sheets("Sheet2").Range("a8").Value = 1   '³Ì«e­±ªºÂI¤£¥i¤Ö±¼  ¤£¥i¥H¥Î.sheet2.range("a8").Value = 1 (µL¦¹»yªk)
End With
End Sub

        ÀR«ä¦Û¦b : ¡i®É¤é²öªÅ¹L¡j¤@­Ó¤H¦b¥@¶¡°µ¤F¦h¤Ö¨Æ¡A´Nµ¥©ó¹Ø©R¦³¦hªø¡C¦]¦¹¥²¶·»P®É¶¡Ävª§¡A¤Á²ö¨Ï®É¤éªÅ¹L¡C
ªð¦^¦Cªí ¤W¤@¥DÃD