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

¦©©Î¤£¦©¦Ê¤À¤§10°ÝÃD

¦^´_ 1# gca78000

½Ð¸Õ¸Õ¬Ý¡A¬O§_¬O§A­nªº¡ã
  1. Private Sub ToggleButton1_Click()

  2.     GG = [G18] + ([G18] * 10)
  3.     If [E21] = GG Then
  4.         [E21] = [G18]
  5.     Else
  6.         [E21] = [G18] + ([G18] * 10)
  7.     End If
  8.    
  9. End Sub
½Æ»s¥N½X
§Ú«Ü²Â,©Ò¥H§Ú«Ü¥Î¤ß
¡@§Ú¾ÇÃÀ¤£ºë,¦ý§Ú´÷¨Dª¾ÃÑ

TOP

¦^´_ 3# gca78000

¤½¦¡½Ðª½±µ§ï¬õ¦â³o¤@¬q
GG = [G18] - ([G18] * 0.1)

   
  1. Private Sub ToggleButton1_Click()

  2.     GG = [G18] - ([G18] * 0.1)
  3.     If [E21] = "" Then
  4.         [E21] = GG
  5.     Else
  6.         [E21] = ""
  7.     End If
  8.    
  9. End Sub
½Æ»s¥N½X
§Ú«Ü²Â,©Ò¥H§Ú«Ü¥Î¤ß
¡@§Ú¾ÇÃÀ¤£ºë,¦ý§Ú´÷¨Dª¾ÃÑ

TOP

¦p°Æ¥ó­n¦p¦ó¼g¤JVBA¸Ì½Ð¦U¦ìª©¤j«ü¾ÉÁÂÁÂ
1.E22­n¦©°£G18ªºª÷ÃB¦Ê¤À¤§10
2.°µ¤@­Ó¤Á´«¯Ã¥i¿ï¦©©Î¤£¦©
½Ð ...
gca78000 µoªí©ó 2014-11-4 17:39



(§Ú­ú¤F¡D¡D¡D¡D)¡@³o¤S¬O¥t¥~¤£¦Pªºµ{¦¡»yªk¡D¡D¡D¡D
ÁÙ¦³¡ã¤U¦¸³oºØÃþ¦ü°ÝÃD¡A½Ð¦Ü Excel µ{¦¡°Ï´£°Ý¡A·PÁ¡ã

¦³¤G­Ó¨BÆJ
¡@¡´E21Äæ¦ì¶ñ¤W¥H¤U¤½¦¡¡G=G18-(G18*0.1)

¡@¡´¦A¶K¤W¥H¤Uµ{¦¡½X¡G

  1. Private Sub ToggleButton1_Click()
  2.     GG = [G18] - ([G18] * 0.1)
  3.     If [E21] = "" Then
  4.         [E21] = "=G18-(G18*0.1)"
  5.     Else
  6.         [E21] = ""
  7.     End If
  8.    
  9. End Sub
½Æ»s¥N½X
§Ú«Ü²Â,©Ò¥H§Ú«Ü¥Î¤ß
¡@§Ú¾ÇÃÀ¤£ºë,¦ý§Ú´÷¨Dª¾ÃÑ

TOP

        ÀR«ä¦Û¦b : ¬O«D·í±Ð¨|¡AÆg¬ü§@ĵ±§¡C
ªð¦^¦Cªí ¤W¤@¥DÃD