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

¦p¦ó¥Ñ¬YÄæ¸õ¨ì§OÄæ,¦A¦^¨ì­ìÄæ?

¦^´_ 1# leehom

¸Û¦p2¼Ó©Ò»¡ªº¡AÃD·N¤£²M´·
§AÀ³¸Ó¦h¬ÝVBE¤¤ªºRangeªº»¡©ú©Î¬O³o½×¾Â¤¤ªº¤å³¹¡A
¦]¬°§A©Ò°Ýªº¡A³£¬O³Ì°ò¦ªºª¾ÃÑRange¡BCells¡BRow¡BColumn¥u­n·d²M·¡³o´X­Ó§Aªº°ÝÃD´N¥i¥HÀH·N¹B¥Î¤F
Range¡G½d³ò¡A³æ¤@Àx¦s®æ¥H¤W¬Û¾FªºÀx¦s®æ¼g¦¨Range("A1:A10")©Î²ºÙ[A1:A10]¨ä»yªk·N«ä¬°¡A±qA1¨ìA10
Cells¡GÀx¦s®æ©Î³æ¤¸®æ¡A´N¬O³æ¤@­ÓÀx¦s®æ©Î¥Nªí¤u§@ªí©Ò¦³Àx¦s®æ¡A³æ¤@Àx¦s®æ¼gªk ¥HB1Àx¦s®æ¨Ó»¡©ú ¡A¼gªk¬°Cells(1,2)·N«ä´NCells(¦C1,Äæ2)ªº·N«ä¡A©Ò¦³Àx¦s®æ«h¥u¼g¦¨ Worksheet.Cells
Row¡G¦C¸¹¡A­þ¤@¦Cªº·N«ä
Column¡GÄæ¸¹¡A­þ¤@Äæ
¥H¤W»¡©ú¡A¥u¬O²³æ´y­z¡A¨Ã¤£¯à°÷¥Nªí©Ò¦³·N«ä¡A¸Ô²Ó»¡©ú¡AÀ³¥HVBE»¡©ú¬°¥D
¤U­±¥N½X¥u¬O¸ÑÄÀ§Aªº°ÝÃDªº´y­z ªº°ò¦»yªk¡A¨ä¹ê»Ú¼gªk¤´­n¬Ý§Aªº°µ¥Î­Ë©³¬O¤°»ò¦Ó©w¡G
Dim Ran As Range
Set Ran = Range("A5") '°²³]­ì©w¦ì¸m¬OA5¡AA5³]¦¨ÅÜ¼Æ Ran
Cells(Ran.Row, "D").Select 'µM«á¸õ¨ì¦P¦CªºDÄæ,§YD5¡A³o¸Ì¤£ª¾¹D§A­n°µ¤°»ò¨Æ¡A©Ò¥H¥u¦³¥ÎSelect¿ï¾Ü D5¡A­Y¬O­n¼g­È¥i¥H¼g¦¨ Cells(Ran.Row, "D")="ABC"
Cells(18, "D").Select '·í°µ§¹¤@¨Ç°Ê§@«á , ¦ì¸mÅܦ¨D18 ¡A¦P¤W¦C»¡©ú
Cells(18, Ran.Column).Select '¸õ¦^¸Ó¦CªºAÄæ,§YA18

TOP

        ÀR«ä¦Û¦b : ¡i®É¶¡µLªk¾B¾×¡j©È®É¶¡®ø³u¡Aªá¤F³\¦h¤ß¦å¡A·QºÉ¦U¦¡¤èªk­n¾B¾×®É¶¡¡Aµ²ªG¬O¡G®ö¶O¤F§ó¦h®É¶¡¡A¥B¤@µL©Ò¦¨¡I
ªð¦^¦Cªí ¤W¤@¥DÃD