- ©«¤l
- 104
- ¥DÃD
- 32
- ºëµØ
- 0
- ¿n¤À
- 144
- ÂI¦W
- 0
- §@·~¨t²Î
- windowsXP
- ³nÅ骩¥»
- 2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2013-2-25
- ³Ì«áµn¿ý
- 2022-9-2
|
¥»©«³Ì«á¥Ñ lifedidi ©ó 2013-6-27 10:38 ½s¿è
¦^´_ 5# luhpro
luhpro¤j¤j¦n¡G
§Ú³o¼Ëªº³]©w«Ü¹³¦³ÂI¶Ã¡A§Ú·|¨Ì·Ó¤j¤j«Øijקï¡C
¦^¨ì°ÝÃD¡G
¤j¤jªºµ{¦¡½X¨S°ÝÃD¡I¬O¤p§Ì¦b¤U¤@¨B®É¥X²{°ÝÃD¡A·Q½Ð±Ð¡I
¡m¹ê»Úªí®æ¡n ¢x ¡m¹ïÀ³µ{¦¡½X¡n
i = Äl¸¹.Offset(-9, Columns.Count - 2).End(xlToLeft).Column - Äl¸¹.Column + 1
±M®×½s¸¹ ¢x Äl¸¹.Offset(-9, i) = ·s¼W¸ê®Æ.±M®×½s¸¹
»s³y¶Ç²¼½s¸¹ ¢x Äl¸¹.Offset(-8, i) = ·s¼W¸ê®Æ.»s³y¶Ç²¼½s¸¹
»â¥X¼Æ¶q ¢x Äl¸¹.Offset(-7, i) = ·s¼W¸ê®Æ.»â®Æ«1
»â¥X¤é´Á ¢x Äl¸¹.Offset(-6, i) = ·s¼W¸ê®Æ.»â®Æ®É¶¡1
»â¥X®É¶¡ ¢x Äl¸¹.Offset(-5, i) = ·s¼W¸ê®Æ.TextBox1
°h¦^¼Æ¶q ¢x Äl¸¹.Offset(-4, i) = ·s¼W¸ê®Æ.°h®Æ«1
°h¦^¤é´Á ¢x Äl¸¹.Offset(-3, i) = ·s¼W¸ê®Æ.°h®Æ®É¶¡1
°h¦^®É¶¡ ¢x Äl¸¹.Offset(-2, i) = ·s¼W¸ê®Æ.TextBox1
û¤u©m¦W ¢x Äl¸¹.Offset(-1, i) = ·s¼W¸ê®Æ.¯u¹ê©m¦W
û¤u½s¸¹ ¢x Äl¸¹.Offset(0, i) = ·s¼W¸ê®Æ.¯u¹ê½s¸¹
²b¥Î«¶q ¢x Äl¸¹.Offset(1, i) = ·s¼W¸ê®Æ.»â®Æ«1 - ·s¼W¸ê®Æ.°h®Æ«1
®w¦s¼Æ¶q ¢x Äl¸¹.Offset(2, i) = Val(Äl¸¹.Offset(2, Columns.Count - 2).End(xlToLeft).Column - Äl¸¹.Column) - (Val(·s¼W¸ê®Æ.»â®Æ«1) - Val(·s¼W¸ê®Æ.°h®Æ«1))
¥H¤W¦b¡m®w¦s¼Æ¶q¡n¦³ÂI°ÝÃD¡A¤p§Ìªº·Qªk¬O®w¦s¼Æ¶q¬°¡i«e¤@µ§¸ê®Æªº®w¦s¼Æ¶q - ³o¦¸ªº²b¥Î¼Æ¶q¡j
ºâ¥X¨ÓªºÈ©M¹ê»ÚªºÈ¤£¦P
¦Ó«e¤@µ§ªº®w¦s¼Æ¶q¦ì¸m«ç»ò§ì©O¡H
³o¼Ë¼gªºÈ¬O§ì¨ìþ¤@®æ¥h¤F...
Val(Äl¸¹.Offset(2, Columns.Count - 2).End(xlToLeft).Column - Äl¸¹.Column) |
|