t8899

¦^´_  t8899

ª½±µ³o¼Ë¤£´N¦æ¤F¶Ü¡H¤£µM´N¬O­n
owen06 µoªí©ó 2014-3-20 20:07

¤£¦æ­C, ¨S¦³³]©wª«¥óÅܼÆ
a=Sheets("She5555555555555et6").Range("ao20:ao350").Find(Application.Max(Sheets("She5555555555555et6").Range("ao20:ao350"))).address

t8899

°ÝÃD´N¥u¬O¨S¦³¨Ï¥ÎSet³]¸mÅܼƬ°ª«¥ó
Hsieh µoªí©ó 2014-3-20 15:14

ª«¥ó©w¸q¿ù»~??½Ð±Ð¦p¦ó©w¸q¬d§ä¥X¨ÓªºÄÝ©Ê ?
Sub aaa()
Dim a
Set a=Sheets("She5555555555555et6").Range("ao20:ao350").Find(Application.Max(Sheets("She5555555555555et6").Range("ao20:ao350")))
Sheets("She5555555555555et6").Range("A10") = Sheets("She5555555555555et6").Range(a).Offset(0, -37)
End Sub

Hsieh

¦^´_ 9# t8899
°ÝÃD´N¥u¬O¨S¦³¨Ï¥ÎSet³]¸mÅܼƬ°ª«¥ó
MAX»PLARGE¨ç¼Æ§A³ßÅw¥Î­þ­Ó¨SÃö«Y°Õ

t8899

¦^´_  t8899 max¥u¯à¨ú³Ì¤j¡Alarge¯à¿ï¾Ü­n²Ä´X¤j¡A®t§O¦b³o
owen06 µoªí©ó 2014-3-20 09:39

­è¸Õ¤F¤@¤U¡A¨S¦³³]©wª«¥óÅܼÆ??

owen06

¦^´_ 7# t8899


¬O³o»ò»¡¨S¿ù°Õ¡A   
¦ý¦pªG§A¥u¬O­n³Ì¤j­È¡A´N¥i¥Hª½±µ¥ÎMAX¡A¤½¦¡¤ñ¸û²µu¤@ÂI¡A
MAX(RANGE)
LARGE(RANGE,1)
®¦¡A¯uªº¥u¦³¤@ÂI¡K

t8899

¦^´_  t8899 max¥u¯à¨ú³Ì¤j¡Alarge¯à¿ï¾Ü­n²Ä´X¤j¡A®t§O¦b³o
owen06 µoªí©ó 2014-3-20 09:39

large §Y¤w¥]§tmax  , ´NµL¶·max °Ú

owen06

¦^´_ 3# t8899

1. Sub BBB()
   
2. A = [ao20:ao350].find(Application.Large(Sheets("Sheet6").Range("ao20:ao350"), 1),,,xlwhole).address
   
3. Sheets("Sheet6").Range("A10").Value = range(A).Offset(0, -37)
   
4. End Sub

½Æ»s¥N½X

max¥u¯à¨ú³Ì¤j¡Alarge¯à¿ï¾Ü­n²Ä´X¤j¡A®t§O¦b³o

t8899

¦^´_  t8899

A = Application.Large(Sheets("Sheet6").Range("ao20:ao350"), 1)

³o¼Ë±o¨ìªº¬O°Ï¶¡³Ì ...
Hsieh µoªí©ó 2014-3-20 08:28

Application.Large
application.max
³o¨â­Ó¦³®t§O¶Ü???

Hsieh

¦^´_ 3# t8899

A = Application.Large(Sheets("Sheet6").Range("ao20:ao350"), 1)

³o¼Ë±o¨ìªº¬O°Ï¶¡³Ì¤j­È¡A¬O­Ó¼Æ­È¡A¨Ã«DÀx¦s®æª«¥ó
¸Õ¸Õ
set a=Sheets("Sheet6").Range("ao20:ao350").find(application.max(Sheets("Sheet6").Range("ao20:ao350")))

t8899

Aªð¦^ªº¬O°Ï¶¡¤¤³Ì¤j¼Æ­È,¬O¼Æ­È¦Ó«D¸Ó¼Æ­È©Ò¦bªºÀx¦s®æ
¦Óoffset¨ç¼Æ¥²¥ý«ü©w¤@­ÓÀx¦s®æ©Î½d³ò(ª«¥ó)¦A¥h ...
a8350070 µoªí©ó 2014-3-19 22:15

¸Õ¹L¥i¥H¡A¦ý°Ñ¼Æ¤Ó¦h¡A¬Ý¤£¤ÓÀ´?¦³µL¸û©öÀ´ªº¸Ñªk?