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

[µo°Ý] WITH µLªk¥Î©ó«ü©w¤u§@ªí ??

[µo°Ý] WITH µLªk¥Î©ó«ü©w¤u§@ªí ??

sheet2 ¬°¤u§@µøµ¡¡A¥¨¶°¸Ì«ü©w¬°sheet1 1.rar (7.54 KB)
©Ò±oªºµ²ªG·|¦bsheet2 ¤W??
¦³µL¨ä¥L¤èªk¸Ñ¨M?
°£¤F Sheets("sheet1").select ©Î  Sheets("sheet1").Activate  ¤§¥~?
Sub ACLEAR()
'With Workbooks("1.xls").Sheets("sheet1")
With Sheets("sheet1") '«Dsheet2
Range("B65536").End(xlUp).Offset(0).Select
Selection.ClearContents
Range("C65536").End(xlUp).Offset(0).Select
Selection.ClearContents
End With

End Sub

        ÀR«ä¦Û¦b : §g¤l¬°¥Ø¼Ð¡A¤p¤H¬°¥Øªº¡C
ªð¦^¦Cªí ¤W¤@¥DÃD