°Ý­Ó¤p°ÝÃD~

color790

½Ð°Ý=«á­±­n«ç»ò­×§ï,§Úª¾¹D¬O¿ùªº
·Q­ncells(i-2 , 4)¨ìcells( i, 4)¦C³Ì¤j­È (¤§«á¤]¥i¯à§ïi-10~i )
Worksheets("sheet2").Cells(j, 4) = Worksheets("sheet1").Max(cells(i-2, 4):cells(i, 4))

oobird

Application.Max(Range(Cells(i - 2, 4), Cells(i, 4)))

color790

HI~ÁÂÁÂÀ°¦£,¦A½Ð°Ý¤@¤U
Worksheets("sheet2").Cells(j, 4) = Worksheets("sheet1").Application.Max(Range(Cells(i - 2, 4), Cells(i, 4)))
¬O§ï¦¨³o¼Ë¶Ü?¥i¬O³o¼Ërun,«ç»ò³£¨q0

Hsieh

Worksheets("sheet2").Cells(j, 4) = Application.Max(sheet1.Range(sheet1.Cells(i - 2, 4), sheet1.Cells(i, 4)))

luhpro

HI~ÁÂÁÂÀ°¦£,¦A½Ð°Ý¤@¤U
Worksheets("sheet2").Cells(j, 4) = Worksheets("sheet1").Application.Max(Rang ...
color790 µoªí©ó 2010-8-19 23:38

§Ú¦³¸Õ¹Lµ{¦¡¨Ã¤£·|¦³¿ù»~ªºµ²ªG©O...

Sub aa()
  Dim i, j
  i = 10
  j = 1
  Worksheets("sheet2").Cells(j, 4) = Worksheets("sheet1").Application.Max(Range(Cells(i - 6, 4), Cells(i, 4)))
End Sub

D1=2
D2=8
D3=6
D4=5
D5=10
D6=15
D7=8
D8=9
D9=10
D10=11

¤W­zµ{¦¡°õ¦æ«áªºµ²ªG Sheet2 ªº D1 = 15

«Øij§A¬O¤£¬O¦Ò¼{§âµ{¦¡¶K¤W¨Ó¬Ý¬Ý?

color790

¤w¸gªþ¤W¤F,¦A³Â·Ð¤@¤U,ÁÂÁ¦U¦ì

kimbal

¦^´_ 5# luhpro


    ¦pªG·í«eªº¤u§@ªí¬Osheet2, ¥X¨Óªº´N¬Osheet2ªºRange(Cells(i - 6, 4), Cells(i, 4))

color790

¦^´_ 7# kimbal

¯uªº­C~¬°¤°»ò???¤£¬O«ü©w­þ­Ó sheet¤F?

luhpro

¦^´_  luhpro


    ¦pªG·í«eªº¤u§@ªí¬Osheet2, ¥X¨Óªº´N¬Osheet2ªºRange(Cells(i - 6, 4), Cells(i, 4 ...
kimbal µoªí©ó 2010-8-20 00:08

§â Worksheets() §ï¦¨ Sheets() À³¸Ó´N¥i¥H¤F

Sheets("sheet2").Cells(j, 4) = Sheets("sheet1").Application.Max(Range(Cells(i - 6, 4), Cells(i, 4)))

¥D­n¬O©w¸q¤Wªº°ÝÃD
Worksheets ªí¥Ü¥¿¦b "¤u§@¤¤" ªºªí®æ

¸É¥R :
­è­èµo²{¤W­zªºµ{¦¡¤º®e :
Sheets("sheet1").Application.Max(Range(Cells(i - 6, 4), Cells(i, 4)))
½T¹ê·|¨ü­­©ó¥Ø«e§@¥Î¤¤ªº Sheet ¬O­þ¤@­Ó,
¬ã§PÀ³¸Ó¬O¨º­Ó Application ±Ô­z±N§@¥Îª«¼h¯Å´£¤É¨ì Application ¥H¦Ü©ó¨ä«á­±ªº­pºâ¦bWorksheet«D¬° sheet1 ®É,¤Ï¦ÓµLªk¯u¥¿¹ïÀ³¨ì sheet1,
«Øij§AÁÙ¬O§ï±Ä Hsieh  ¤jªº¤Þ¥Î¤è¦¡¬°©y.

color790

³á~­ì¨Ó¦p¦¹,¤S¾Ç¨ì¤F,ÁÂÁÂ~^^