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

[µo°Ý] ®æ¦¡¤Æ±ø¥ó,¦³­È«hÅã¥Ü¾ã¼Æ¦C®Ø¬[

[µo°Ý] ®æ¦¡¤Æ±ø¥ó,¦³­È«hÅã¥Ü¾ã¼Æ¦C®Ø¬[

·Q½Ð°Ý¦U¦ì«e½ú

¦p¦ó³]©w®æ¦¡¤Æ±ø¥ó,Åý¨ä¤u§@­¶®Ø¬[¦b¦³­Èªº®É­Ô,·|¦b½s¸¹1¨ì10§@¬°¤@¾ã¼Æªºªº±¡ªp¤U¦Û°Ê®Ø¬[Ãä½u
­Y¬O¶W¹L½s¸¹10ªº³¡¤À,«h¬O1¨ì20,¥H¦¹Ãþ±À

¥Ø«e¥u·|³]©w¤½¦¡±ø¥ó=C1>0
¦ý¬O¥u¦³¦³¼Æ­Èªº³¡¤À¦³®Ø¬[,¤£·|³]©w¥X½s¸¹1¨ì10ªº³¡¤À³£¥X²{®Ø¬[
¤é³øªí.rar (53.82 KB)
Àɮפ¤»Ý­nªº¶µ¥Ø1¬O§Ú©Ò»Ý­nªº¦¨«~

¦^´_ 2# ANGELA

·PÁÂANGELA¤jªº¦^ÂÐ
¥Ø«e´N¬O¨Ï¥Î¦¹¤½¦¡¡A¦ý¬O»Ý­nªº®æ¦¡¬O½s¸¹1~10³£·|¥X²{³]©wªº®æ¦¡
­Y¬O½s¸¹11¦³­È«h·|¦b1~20¬Ò¦³®æ¦¡,¥H¦¹Ãþ±À..

¤£¾å±o¤½¦¡¸Ó¦p¦ó¼g

TOP

¥»©«³Ì«á¥Ñ jackson7015 ©ó 2012-3-29 23:52 ½s¿è

¦^´_ 4# register313

·PÁ¤j¤jªº¦^À³¡A¥i¥H¥¿±`°õ¦æ¤F

¤½¦¡¦AºCºC¬ã¨s¡AÁÂÁ¡I¡I

TOP

¦^´_ 4# register313

·Q½Ð°Ýregister313¤j¤j

¬°¦ó³]©w¦n®æ¦¡«á¡A¤u§@­¶­±¤]¦³¥¿±`Åã¥ÜªÅ¥Õªº®Ø¬[Äæ¦ì
¥i¬O¦C¦LÅã¥Ü¡A«o¨S¦³ªÅ¥Õ®Ø¬[
¦C¦L¥X¨Óªº¤å¥ó¤]¨S¦³ªÅ¥Õ®Ø¬[

¦ý¬O¦³¦r¤¸ªº®Ø¬[³¡¤À«o¦³Åã¥Ü¡A¤]¯à¦C¦L¥X¨Ó

TOP

¦^´_ 7# register313

µo²{«Ü©_©Çªº²{¶H
§Ú¤U¸ü²Ä¤@¦^À³ªºªí®æ¥h´ú¸Õ,¥i¥H¥¿±`¦C¦L¥XµL¦r¤¸®Ø¬[
¦Ó¨Ï¥Î§Úªº¸ê®ÆÀÉ®×,«o¤£¯à¦C¦L¥XµL¦r¤¸®Ø¬[

ªþ¤W¤@³¡¥÷¸ê®ÆÀɮפu§@­¶­±,¶µ¥Ø1
¤é³øªí.rar (71.4 KB)

TOP

¥»©«³Ì«á¥Ñ jackson7015 ©ó 2012-4-5 08:20 ½s¿è

¦^´_ 9# register313

·Q¦b«_¬N½Ð°Ý¤@¤U
¬°¤°»òª½±µ¿ï¾ÜE:IÄæ¦ì¡A«o¤£¯à±N©Ò¦³ªÅ¥Õ®Ø¬[¤]³£¥]§t¦b¦C¦L½d³ò¤º¡H

¦Ó¤â°Êø»sªºªÅ¥Õ®Ø¬[¡A«o¥i¥H¦Û°Ê¥]§t¦b¦C¦L½d³ò¤º¡H

¸Ó«ç»ò³]©w¤~¯àÅý¦Û°Ê®æ¦¡¤Æ±ø¥óªº®Ø¬[¡A¦Û°Ê¥]§t¦b¦C¦L½d³ò¤º©O¡H
¦pªGµLªk¥H³]©w°µ³B²zªº¸Ü¡A¥¨¶°¸Ó¦p¦ó½s¼g¡H

TOP

¦^´_ 11# register313

·PÁÂregister313¤j¤jªº¦^À³

·Q½Ð±Ð¦¹ºØPrivate Sub¥¨¶°ª½±µ¶}·s¥¨¶°¤U¥h¨Ï¥Î´N¦n¤F¶Ü?
ÁÙ¬O­n´¡¤J¨ì¦C¦L¥¨¶°¤º?

§Ú¨Ï¥Î·s¥¨¶°¤U¥h¨Ï¥Î®É,·|³sµ²¾É¤J¨ä¥L¥¨¶°
¦Ó§Ú¾É¤J¨ì·s«Øªº¦C¦L¥¨¶°¤¤,¦n¹³¨S¦³Åܧó¦C¦L½d³ò

TOP

¦^´_ 13# register313

·PÁÂregister313¤j¤jªºÀ°¦£

­Y¬OCÄæ¦C¸¹­Ó¦ì¼Æ¬°6ªº¸Ü¡A¬O§_§ó§ï¬°¤U¦¡
  1. Private Sub Worksheet_Change(ByVal Target As Range)
  2. If (Target.Column = 6) And (Target.Row Mod 10) = 6 Then
  3.    If Target <> "" Then
  4.       Target.Resize(10, 4).Borders.LineStyle = xlContinuous
  5.       PageSetup.PrintArea = "C1:I" & Target.Row + 9
  6.    Else
  7.       Target.Resize(10, 4).Borders.LineStyle = xlNone
  8.       PageSetup.PrintArea = "C1:I" & Target.Row - 1
  9.    End If
  10. End If
  11. End Sub
½Æ»s¥N½X
¦ý¬O§ó§ï«á¦n¹³¬O¿ù»~ªº¡A¤Ï¦Ó¨S¦³°Ê§@..

¥i¯à­n¦A³Â·Ðregister313¤j¤j¨ó§U¤@¤U

TOP

¦^´_ 15# register313

¤w¸g¥i¥H¥¿±`Åܧó¦C¦L½d³ò¤F,·PÁÂregister313¤j¤j

·Q½Ð±Ð,§Ú¬O±N¤u§@­¶­±¥H¼Ï¯Ã¤ÀªRªí§@¾ã²z

¦b¤â°Ê´ú¸Õ¤j¤j´£¨Ñªº´ú¸Õ½X®Éµo²{,­Y¬O±NCÄæ¸ê®Æ¤@¦¸§R°£©ÎªÌ¤@¦¸Åܧó¦Ü¦h­¶
¦n¹³µLªk§PÂ_cÄæÅܰʪº½d³ò,¥u·|¨Ì·Ó­«·s¾ã²z«eªº¦C¦L½d³òªí¥Ü

TOP

¥»©«³Ì«á¥Ñ jackson7015 ©ó 2012-4-9 08:50 ½s¿è

¦^´_ 17# register313

¥\¯à»Ý¨D:
·íCÄæ¦C¸¹­Ó¦ì¼Æ¬°6¤§Àx¦s®æ­È¦³ÅܰʮɥB¸ÓÀx¦s®æ¤£¬°ªÅ­È=>¦Û°Ê¥[10¦C®Ø½u
·íCÄæ¦C¸¹­Ó¦ì¼Æ¬°6¤§Àx¦s®æ­È¦³ÅܰʮɥB¸ÓÀx¦s®æ¬°ªÅ­È=>¦Û°Ê¨ú®ø10¦C®Ø½u
·íE6¤§Àx¦s®æ­È¦³ÅܰʮɥB¸ÓÀx¦s®æ¬°ªÅ­È=>¦Û°Ê¨ú®ø¦C¦L½d³ò(µL¦C¦L)
¥B·íCÄæ¦C¸¹­Ó¦ì¼Æ¬°6¤§Àx¦s®æ­È¦³ÅܰʮÉ=>ÀH®É§PÂ_¦C¦L½d³ò
¤é³øªí.rar (491.66 KB)

³Â·Ð¤j¤j¤F,¥Ñ°J·PÁÂ..

TOP

        ÀR«ä¦Û¦b : ­ì½Ì§O¤H´N¬Oµ½«Ý¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD