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

[µo°Ý] ¶µ¥Ø¸g±Æ§Ç«á½Æ»s¥t¤u§@ªí

[µo°Ý] ¶µ¥Ø¸g±Æ§Ç«á½Æ»s¥t¤u§@ªí

¥»©«³Ì«á¥Ñ BV7BW ©ó 2020-5-28 21:38 ½s¿è

·Ç¤j.¦U¦ì¥ý¶i¤j®a¦n
µ{¦¡­×§ï²£¥Í¿ù»~A1.A2³¡¤À
¤w­«·s«Ø¥ßªí®æ
­×§ï²Ä¤@ª©.zip (314.56 KB)
±Ó¦Ó¦n¾Ç,¤£®¢¤U°Ý

¦^´_ 32# BV7BW

­ã´£³¡ªL  ¦Ñ®v§A¦n  ®¥¶P·sÁH ·s¬K·ì§Ö
¤W¦¸¸ò¦Ñ®v´£¹L109-05Dª©­×§ï°ÝÃD¥Ø«e³¡¤À¤w¥i­×§ï
¦b¶µ¥Ø½s¸¹¤u§@ªí¤¤Äæ¦ì¥u¯à¨ìIVÄæ
¤£ª¾­n¦b¦ó³B­×§ï¼WÄæ40®æ¨ìKYÄæ
½Ð¦Ñ®v´£¥Ü
­×§ï«á¥Ø«eÁÙ¦³´X­Ó°ÝÃD¶·¶µ¦Ñ®v½Ð±Ð.µ¥­×§ï¦n¤@¨Ö½Ð±Ð
ÁÂÁ¦Ѯv
±Ó¦Ó¦n¾Ç,¤£®¢¤U°Ý

TOP

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

ÁÂÁ­㴣³¡ªL¦Ñ®v
³o´X¤Ñ¨Ó§Úªð´_§ó§ï¤w¦³ÂI¶i®i.§Ú¤£¬O§ïµ{¦¡.¥u¬O§ï§Ú»Ý¨D.¦ý§ó¥¿¹L·Pı©Ç©Çªº.¬Ý°_¨Ó¤£¤Ó¶¶²´.(.....)
§Ú¦³¬Ý¹L¦Ñ®v¦b9¦~«e°Q½×¹L¤ç»P¤½¤çºâªk©Ò¥H§Úª¾¹D³o¤£¬O¦n§ó§ïªº¤uµ{
²{¦b³oª©¥»¹ï§Ú­Ì«D±`¦n¥Î.¥u¬O·íªì§Ú¨S·Q¨ì«Ü¦h²Ó¸`.¾É­P²{¦b³oª¬ªp
§Ú·Q¦b§ï¦n«á¦A½Ð±Ð©È§Úªí¹F¤£¦n.§Æ±æ¦Ñ®v¨ì®É¦A«ü¾É
ÁÂÁ¦ѮvÃö¤ß
¯¬¦Ñ®v ·s¦~§Ö¼Ö ¤ß·Q¨Æ¦¨ ¸U¨Æ¦p·N
±Ó¦Ó¦n¾Ç,¤£®¢¤U°Ý

TOP

¥»©«³Ì«á¥Ñ ­ã´£³¡ªL ©ó 2021-1-1 12:03 ½s¿è

¦^´_ 30# BV7BW


³o­n¥þ³¡¥´±¼­«¼g, À³¤£¬O¤@¤é¤G¤é¥i§¹¦¨,
¤S¯A©¹«á»Ý¨D§ïÅܩΦ³bug¤ÎºûÅ@°ÝÃD,
³Ì¦n¸ß°Ý¬O§_¦³¤HÄ@·N¦³Àv¥I¶O±Mªù¼gµ{¦¡.
§Ú¬O¨S¿ìªk¤F!!!

1) ³æ¦ì°ÝÃD:¦P¤@°Ó«~¬O§_¦³¥i¯à³o¦¸¥H"¥x¤ç"­p»ù¶i³f, ¦³®É¤S¥H"¤½¤ç"»ù¶i³f, ¾P³f¥çµM?
   1.5¥x¤ç = 1¤ç5¨â ©Î 1¤ç8¨â???
   1.1¥x¤ç = 1¤ç1¨â ©Î 1¤ç10¨â???  ­Y§A¥´ 1.10 ªí¥Ü1¤ç10¨â, ¦ýexcel ¥¦·|¦Û°ÊÅܦ¨ 1.1, ¨º¬OµLªk¥¿½T§PÂ_ªº;
     ¥H"¥x¤ç"¶i³f, ¦ý¥H"¨â"¥X³f; ©Î¥H"¤½¤ç"¶i³f, ¤S¥H"¤½§J"¥X³f; ¥H"¥´"¶i³f, ¥H"­Ó¼Æ"¥X³f..¨ä¥¦¥H"¥]/½c"¶i³f¦Ó¹s´²¥X³f...³o³£¬O¤Ó½ÆÂø
2) °e³f³æ"¬d¸ß"-"§ó§ï"-"¦^¦s"
   ¥i±¤¨S¦³²M³æ¥i¨Ñ¿ï¾Ü¿é¤J, ¥u¯à¤â°Ê¥h¿é¤J, ­Y¥Îµ{¦¡©Î¤½¦¡±a¥X(¶µ¥Ø½s¸¹¤u§@ªíªº³]¸m, ¹ï¸ê®Æ½Õ¾\«D±`¤£«K)¤]¬O¤£¤Ó¦n¥Î

¨ä¥¦°ÝÃD­n¨D³£­n¼g¤@°ï, µ¥¬O§_¦³·NÄ@ªº¤H¨Ó§a~~


'===============================

TOP

¹ï±b©ú²Óªí
*¼W¥[¹ï±b©ú²Óªí*
¥H­q³f©ú²Óªí¬°¸ê®Æ¨Ó·½

¶µ¥Ø½s¸¹1
*¼W¦C³æ¦ìÄæ*
³æ¦ì¬°=¤ç.¤½¤ç.¤½§J.§â.²°.½c.Åø.°¦.¥].±ø.ªO.±í.¤ù.¸­.ªK.¥´.­Ó.Áû.¦·.ªM.§ô.µ¥µ¥
*¼W¦C¥x¤ç»ùÄæ*
*¥x¤ç»ù¥H§å»ù¬°·Ç(¿ì§O³æ¦ìÄæ¤ç®É)*
¦A°£0.6«h¬°¤½¤ç»ù
*¼W¦C¤½¤ç»ùÄæ*
*¤½¤ç»ù¥H§å»ù¬°·Ç(¿ì§O³æ¦ìÄ椽¤ç®É)*
¦A­¼0.6«h¬°¥x¤ç»ù
*¨ä¾l³æ¦ì«h¤£Åã¥Ü¥x¤ç»ù.¤½¤ç»ù(0©ÎªÅ®æ)*

«È¤á­qÁʪí1
*«È¤á­qÁʪí¼W¥[³æ¦ìÄæ*
³æ»ù¬O¥H¶µ¥Ø½s¸¹§å»ù¬°³æ»ù

*¼W¦C¬d¸ßÃöÁä¦rÄæ*
¬d¸ßÃöÁä¦r«á¦C¥X¶µ¥Ø½s¸¹¤Î¶µ¥Ø¦WºÙ

*ª÷ÃB¥H³æ¦ì¿ì§O(¤ç).¦A¥H(¼Æ¶qÂà´«¦¨¨â)*(³æ»ù°£16)=ª÷ÃB*
¨Ò¦p1.15¤ç³æ»ù12¤Î1.10¤ç.³æ»ù12.¤Î1.08¤ç³æ»ù12ºâªk
(1*16(¤ç)+15¨â)*(12/16)=23.25
(1*16(¤ç)+10(¨â))*(12/16)=19.5
(1*16(¤ç)+8(¨â))*(12/16)=18
*ª÷ÃB¥H³æ¦ì¿ì§O(¤½¤ç).¦A¥H(¼Æ¶q)*(³æ»ù)=ª÷ÃB*
¨ä¾l³æ¦ì»P¤½¤çºâªk¤@¼Ë
²{¦b®t§O¬O³æ¦ì(¤ç)®Éºâªk»P³æ¦ì(¤½¤ç)©Î¨ä¥L³æ¦ìºâªk®t§O

*¶µ¥Ø¤ÀÃþ¤¤¬O§_¥i¦A¼W¦C¦V0ªí¤è¦¡.ÂI¶i«á·|¶]¨ì©w¦ì(Ãþ¬O¤U©Ô²M³æ¤è¦¡)*

­q³f©ú²Óªí1
*¼W¦C³æ¦ìÄæ*

°e³f³æ1
*°e³f³æ¼W¥[³æ¦ìÄæ*
*¼W¦C½Õ¾\¤ÎÂл\*
½Õ¾\¥Ñ¤é´Á¤Î«È¤á¦W½Õ¾\¥X³æ¸¹
¦A¥Ñ°e³f³æ¸ü¤J³æ¸¹½Õ¥X¸Óµ§¸ê®Æ§@¬°­×§ï©Î¬O¦C¦L
*¸g­×§ï«á.Âл\¦^­q³f©ú²Óªí*
¦]­q³f©ú²Óªí¬°¥Ã¤[¸ê®Æ.©Ò¥H³æ¸¹¤£ÅÜ.¸g­×§ï«á
¥i¯à·|¼W¦C©Î¬O´î¤Ö.©ÎªÌ¼Æ¶q.³æ»ù.ª÷ÃB.Åܧó.©Ò¥H¤£¯àÂл\¨ì«e¤@µ§³æ¸¹©Î¤U¤@µ§³æ¸¹¸ê®Æ

¨®¥Dµ²´Úªí1
*¼W¦C³æ¦ìÄæ*
*¨®¥Dµ²´Ú³æ»ù¥H¶µ¥Ø½s¸¹³æ»ù¬°¥D*
¥X³f§@·~Dª©v01_10905.zip (949.12 KB)
±Ó¦Ó¦n¾Ç,¤£®¢¤U°Ý

TOP

¦^´_ 28# BV7BW


«¢! ´¸¤Ñ³Æ³Ê!
¶X²{¦b°O¾ÐµS·s, §â·Q¨ìªº°µ­Ó¸É¥R,
¥i¯à¹L¬q®É¶¡, ¦Û¤v¼gªºµ{¦¡½X³£§Ñ¥ú,
­n­×§ï¤°»òªº, ¶·­«·s¤@¤@¹L¼{¬yµ{, ®£°µ¤£¨Ó~~
«Ü¦h¥H«e°µªºÀÉ®×, ¤£¬O¤v§R´N¬O§ä¤]Ãø§ä¤F! ¤Ó¦h, Ãi±o¥h²z~~

TOP

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

ÁÂÁ¦Ѯv...
CCCCCCCCCCCCCCCC..(¯ºÁn)
§Ú¦b·Q­ã¤j¦Ñ®v¯u¬O©_²§¤§¤H
§Ú¤~·Q¤p¤p¤uµ{´N­n·Q5.6¤Ñ¨º¥u¬O¤p¤p³¡¤À
·Q¨ì³£ÀY³£¤j°_¨Ó.¯uÁÂÁ§A
CCCCCCCCCCCCC
¦Ü©ó®w¦s¤]¤£¥Î¥h¥[´î.»ù®æ¶Q¤]¤£¯à¶R«Ü¦h.»ù®æ§C§ó¤£¥Î¶R
¦]¬°®w¦s¥u¯à¦s2.3¤Ñ¹L«á´N­n§K¶O°e¥hµ¹ªü麽±ßÀ\(¦Ñ¤H§K¶OÀ\ÆU)
©Ò¥H®w¦sÀH®É³£·|¦¨0



.
±Ó¦Ó¦n¾Ç,¤£®¢¤U°Ý

TOP

±q¶µ¥Øªí¤¤¥hºûÅ@®w¦s¡A¦pªG¬O¨C¤Ñ°µ¡H¡H¡H
¤£ª¾­nªá¦h¤Ö®É¶¡¡H¤H¥i¯à³£­nÅܧb¡I¡I¡I
¡ã¡ã·Q¤F´X¤Ñ¡AÁÙ¬O¦A§Ë­Ó¶i¶¥ª©¡ã¡ã
¥[­Ó¡e®w¦sªí¡f¡A·s¼W®w¦sªº¡eºûÅ@¡f¤Î¡e§ó·s¡f¡A¨Ã¦Û°ÊÅã¥Ü¡e®w¦s¼Æ¡f¤Î¡e¤w¥X³f¼Æ¡f¡G
¥X³f§@·~Eª©v01_10906.rar (370.69 KB)

¤j­P´N³o¼Ë¤F¡A¦A°µ¤U¥h¡A¦Û¤v¥i¯à¤]Åܱo§ó§b¤F§a¡I¡ã¡ã¤w¤£ª¾¦A¦p¦ó¤U¤â

TOP

¦^´_ 25# BV7BW

Sub °e³f³æ_¸ü¤J()
Dim CN&
Call °e³f³æ_²M°£³æ¨­
With Sheets("°e³f³æ")
     If .[A6] = 0 Then MsgBox "**[³æ¸¹]¿ù»~©Î¥¼¿é¤J!  ": Exit Sub
     .[A7] = "=IF(ROW(A1)>B$6,"""",ROW(A1))"
     .[B7] = "=IF(N(A7)=0,"""",INDEX(­q³f©ú²Óªí!C:C,A$6+A7-1))"
     .[C7] = "=IF(N(A7)=0,"""",INDEX(­q³f©ú²Óªí!D:D,A$6+A7-1))"
     .[E7] = "=IF(N(A7)=0,"""",INDEX(­q³f©ú²Óªí!E:E,A$6+A7-1))"
     .[F7] = "=IF(N(A7)=0,"""",INDEX(­q³f©ú²Óªí!F:F,A$6+A7-1))"
     .[G7] = "=IF(N(A7)=0,"""",N(E7)*N(F7))"
     '-----------------------------------------
      CN = Application.Ceiling(.[B6].Value, 15) '¥H15¬°­¿¼Æ, ­pºâ©Ò»Ý¦æ¼Æ
     If CN > 1 Then .[A7:K7].Copy .[A8:K8].Resize(CN - 1) '¥Î²Ä¤@¦æ®æ¦¡½Æ»s©Ò»Ý¦æ¼Æ
    .[H7] = "=IF(N(A7)=0,"""",INDEX(­q³f©ú²Óªí!M:M,A$6+A7-1)&"""")" '±ÄÁʳ渹
    '-----------------------------------------
    .Range("A1:K" & CN + 6).Name = "'" & .Name & "'!Print_Area"  '¦C¦L½d³ò
    .Range("1:6").Name = "'" & .Name & "'!Print_Titles"  '¦C¦LªíÀY
End With
End Sub

¨º­Ó N §ï¦¨ CN ..À³¬O¤£¤p¤ß§R±¼¤F...¤p¨Æ...»{¯uÂI¥h¬Ý..¦Û¤v¤]¥i¥h­×¥¿ªº
'===========================================

TOP

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


    ­ã¤j¦Ñ®v
¸ò§A¦^³ø
Dª©.°e³f³æ¥uªí¦C²Ä1¶µ¥Ø.
¨ä¾l¤£¯àªí¦C.
Àµ½Ð¦Ñ®v¦AÀ°¬Ý...
ÁÂÁÂ
±Ó¦Ó¦n¾Ç,¤£®¢¤U°Ý

TOP

        ÀR«ä¦Û¦b : ·O´d¨S¦³¼Ä¤H¡A´¼¼z¤£°_·Ð´o¡C
ªð¦^¦Cªí ¤W¤@¥DÃD