- ©«¤l
- 17
- ¥DÃD
- 10
- ºëµØ
- 0
- ¿n¤À
- 56
- ÂI¦W
- 0
- §@·~¨t²Î
- Window10
- ³nÅ骩¥»
- Office 2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2019-12-4
- ³Ì«áµn¿ý
- 2022-6-16
|
¨D±Ð©ó¦U¤è°ª¤â...
½Ð°Ý¦U¤è°ª¤â:
©³¤Uªºµ{¦¡½XÀ³¸Ó¬O¥¿½Tªº,¦ý¬O§Ú«o¬Ý¤£¥X¨Ó¬°¦ó VBA¤£ªÖ°õ¦æ,¬O§_¦³¤H¥i¥H¬Ý¥X°ÝÃD.....
For m = 228 To 258 Step 1
If Cells(m, 38) > Cells(m + 1, 38) Then _
Max_Price = Cells(m, 38)
Else
Max_Price = Cells(m + 1, 38)
End If
Next
§Ún 228 ¨ì 258 ªº for °j°é, §PÂ_ "AL228 ªºÈ" ¬O§_¤j©ó "AL229 ªºÈ",
Y¬O,Max_Price ¦s¤J "AL228¤§È",
Y§_,Max_Price ¦s¤J "AL229¤§È"
¥H¦¹¤è¦¡§ä¥X30Ó¼ÆȤ§¤¤ªº³Ì¤jÈ..
¦ý¬O VBA »¡§Ú¦³¿ù,½Ð°Ý,§Úþ¸Ì¼g¿ù????
§Úª¾¹D§ÚªºÅÞ¿è¥i¯à¦³¿ù,³æ¯Â·Qª¾¹D¤Wz»yªk¿ù¦bþ¸Ì...... |
|