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

[µo°Ý] VBA ²M°£¡BÁÙ­ì½Ð±Ð

¦^´_ 10# Andy2483
·PÁ«e½úªº¸Ñ»¡

·Q¦A½Ð±Ð¤@¤U
On Error GoTo Rear
'¡ô¥Oµ{§Ç¹J¨ì¿ù»~®É´N¸õ¨ì¼Ð¥Ü Rear¦ì¸mÄ~Äò°õ¦æ

¤W­±³o¬qªºRear¦ì¸m¬O¤°»ò·N«ä©O?

If N2 < (N1 \ 100) Then GoTo Rear
'¡ô¦pªG«DªÅ®æÀx¦s®æ¤Ö©ó1%? ¬O´N¸õ¨ì¼Ð¥Ü Rear¦ì¸mÄ~Äò°õ¦æ
'¡ôÁr´ú ²M°£III¥u·|¦b¤ë©³©Î¨C¤ë²Ä1¤Ñ¤~°õ¦æ,
'©Ò¥H¸ê®Æ¤Ó¤Ö¤£¯à²M°£

¤W­±³o¬q«e½ú±z²qªº¨S¿ù¡A¥u¦³¦b¤ë©³©Î¨C¤ë²Ä1¤Ñ¶i¦æ²M°£
·Q½Ð±Ð¤@¤U
¦pªG%¼Æ·Q§ï°ª­n«ç»ò§ï©O?
¨Ò¦p1%¡÷90%

¤£¦n·N«ä¡A³Â·Ð«e½ú¤F

TOP

¦^´_ 11# ¬PªÅÉ@¦ÐÁl


    ÁÂÁ«e½úÄ~Äò¤@°_¾Ç²ß

1.Rear


2.90%
N2 < (N1 * 0.9)

PS:
N1 /100 = N1 ªº 1% = N1 * 0.01
N1 ªº 90%= N1 * 0.9
¥Î¦æ°Ê¸Ë¸mÂsÄý½×¾Â¾Ç²ß«Ü¤è«K,ÁÂÁ½׾¸gÀç¹Î¶¤
½Ð¤j®a¤@°_¤W½×¾Â¨Ó¥æ¬y

TOP

¦^´_ 12# Andy2483

·PÁ«e½úªº­@¤ß±Ð¾Ç¤Î¦^´_

·Q¦A½Ð±Ð
CLearr = xR: xR.ClearContents
'¡ô¦pªGµ{§Ç¦³¶]¨ì³o¸Ì´N¥O CLearrÅܼƬO ¤Gºû°}¦C,¥HxRÀx¦s®æ­È±a¤J,
'¡ô¥OxRÀx¦s®æ­È²M°£

³o¤@¬q«á¾Ç¬Ý¤£¤ÓÀ´¡A¤£À´³o¤@¬qªº·N«ä@@
¦A³Â·Ð«e½ú¸Ñ»¡¡AÁÂÁ¡I

TOP

¥i¥H²M°£¸ê®Æªº¥u¦³¯S©w¤H§a!
1) ²M°£®É³]¤@¦Ü¤G¹DINPUTBOX, ¿é¤J«ü©w¼Æ¦r¤~¥i°õ¦æ²M°£
2) ¤£­n³]²M°£«ö¶s, §Q¥Î¤@­ÓÀx¦s®æ, ¿é¤J¯S©w¼Æ¦r¨Ó°õ¦æ²M°£

TOP

¦^´_ 14# ­ã´£³¡ªL

ÁÂÁª©¥D¤j¤jªº«Øij
ªº½T³o¤]¬O­Ó¤è¦¡

¤£¹L³o­Óªí®æ¹ê»Ú¤W¥u¦³¤@­Ó¤H¦b¨Ï¥Î³á
©Ò¥H¤£¤Ó¦³³Q¨ä¥L¤H²M°£ªº±¡ªp

·PÁª©¥D¤j¤j·Qªkªº¤À¨É¡I

TOP

¦^´_ 15# ¬PªÅÉ@¦ÐÁl


³]­Ó³Æ¥÷°Ï©Î³Æ¥÷ªí, ²M°£®É±N¸ê®Æ¥á¶i¥h,
§K±o²M°£«á¤SÀx¦sÃöÀÉ, ­«¶}®É¸ê®Æ¥þ¨S¤F

TOP

¦^´_ 16# ­ã´£³¡ªL

ÁÂÁª©¤jªº·Qªk«Øij
¤@¶}©lªº½T¦³³o¼Ëªº·Qªk
ê©ó¥\¤O¤£°÷¡A¤£ª¾¹D¦p¦ó¹ê²{
Áٻݳ·Ъ©¤j«ü¾É«ü¾É¡IÁÂÁ¡I

TOP

¦^´_ 13# ¬PªÅÉ@¦ÐÁl


   
¥Î¦æ°Ê¸Ë¸mÂsÄý½×¾Â¾Ç²ß«Ü¤è«K,ÁÂÁ½׾¸gÀç¹Î¶¤
½Ð¤j®a¤@°_¤W½×¾Â¨Ó¥æ¬y

TOP

¥»©«³Ì«á¥Ñ Andy2483 ©ó 2023-6-12 07:27 ½s¿è

¦^´_ 16# ­ã´£³¡ªL

³]­Ó³Æ¥÷°Ï©Î³Æ¥÷ªí, ²M°£®É±N¸ê®Æ¥á¶i¥h,
§K±o²M°£«á¤SÀx¦sÃöÀÉ, ­«¶}®É¸ê®Æ¥þ¨S ...
­ã´£³¡ªL µoªí©ó 2023-6-11 11:30 [/quote]



    ½Ð«e½ú«ü¾É
¥Î¦æ°Ê¸Ë¸mÂsÄý½×¾Â¾Ç²ß«Ü¤è«K,ÁÂÁ½׾¸gÀç¹Î¶¤
½Ð¤j®a¤@°_¤W½×¾Â¨Ó¥æ¬y

TOP

¦^´_ 18# Andy2483

ÁÂÁ«e½ú­@¤ß«ü¾É¡I

TOP

        ÀR«ä¦Û¦b : ¦h°µ¦h±o¡C¤Ö°µ¦h¥¢¡C
ªð¦^¦Cªí ¤W¤@¥DÃD