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

[µo°Ý] Excel¤@­ÓÅÜ°ÊÀx¦s®æ«O¯d³Ì¤j­È¤Î³Ì¤p­È

[µo°Ý] Excel¤@­ÓÅÜ°ÊÀx¦s®æ«O¯d³Ì¤j­È¤Î³Ì¤p­È

¥»©«³Ì«á¥Ñ joss ©ó 2011-11-22 01:11 ½s¿è

½Ð¦U¦ì°ª¤âÀ°À°¦£
=======
A1=Àx¦s®æ¬OªÑ²¼«ü¼Ð­pºâ
ÀH®ÉÅÜ°Ê
¦p¦óÅã¥Üa1¾ú¥v¤¤ªº³Ì¤j­È¤Î³Ì¤p­È?
===========
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
K = WorksheetFunction.Max([A1:A10])
If K > [B1] Then [B1] = K
End Sub=================
Private Sub Worksheet_Calculate()

If Sheets("sheet1").Range("a1").Value > Sheets("sheet1").Range("a2").Value Then Sheets("sheet1").Range("a2").Value = Sheets("sheet1").Range("a1").Value

End Sub =======
¬O¤£¬O¹³¤W­±
¦ý§Ú¸Õ¤£¥X¦¨®Ä
¸Ó«ç»ò°µ???
·PÁ¦U¦ì¤j¤j

        ÀR«ä¦Û¦b : ¤H¥Í¨S¦³©Ò¦³Åv¡A¥u¦³¥Í©Rªº¨Ï¥ÎÅv¡C
ªð¦^¦Cªí ¤W¤@¥DÃD