¡y¤w¸Ñ¨M¡z°}¦C¤ñ¸û¡A§ä¥X®t²§ªºÀx¦s®æ
- ©«¤l
- 32
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 55
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- XP
- ¾\ŪÅv
- 20
- ©Ê§O
- ¤k
- µù¥U®É¶¡
- 2011-4-25
- ³Ì«áµn¿ý
- 2011-12-18
|
¦^´_ 5# ko310kmo
¤j¤j
Calculate¤w¸g·|¤@IJµo¡A´N¼g¤J¬Û¹ïªº¤u§@ªí¡A¤£·|Åý¨ä¥L¤u§@ªí«½Æ¼g¤J¤F
¦ý¤ñ¸û§À³¡ªº¤u§@ªí·|¥X²{²Ä¤@Ó¾ú¥v¦¨¥æ»ù¡B³æ¶q¬°¢¯ªºª¬ªp¡A·|³y¦¨«á±¥|Ó»ùªº§PÂ_°ÝÃD
¦Ó¥B¤ÀÄÁ¸ê®Æ·|«½Æ¸õ¥X
¨C¤@¤ÀÄÁ¥u·|¦³¤@µ§¡A¦ý«o·|¦P¤@¤ÀÄÁ¥X²{¤G¡B¤Tµ§ªº°ÝÃD
§Ú¸ê®ÆÅã¥Üªº¤è¦¡¬O§Æ±æ¹³ªþÀÉ
ok.5.10.rar (74.4 KB)
¡A¤]´N¬O¥u«eµo°Ýªº³o¼Ë
¨C¬í¬ö¿ý©Ò¥H±µ¨üªºÈ¡A¦A¨C¤ÀÄÁµ²ºâ¥¦³o¤@¤À¤ºªº¶}¡B°ª¡B§C¡B¦¬¡B¦¨¥æ¶q
¦ý³oÀÉ·|¥X²{ªº°ÝÃD¬O¡A¥¦ªºCalculateµLªk±oª¾¬OþÓÀx¦s®æ¸õ°Ê
·|©Ò¥H¤u§@ªí³£¼g¤J¤@¦¸¡A·|³y¦¨¸ê®Æ¿ù»~ªº°ÝÃD
ÁÂÁ¤j¤jªºÀ°¦£¡I¡I¡I¡I¡I |
|
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X
|
|
|
|
|
- ©«¤l
- 32
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 55
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- XP
- ¾\ŪÅv
- 20
- ©Ê§O
- ¤k
- µù¥U®É¶¡
- 2011-4-25
- ³Ì«áµn¿ý
- 2011-12-18
|
¦^´_ 2# Hsieh
¤j¤j
§Ú쥻ªºÀɦ³µy°µ×§ï¡A¦ýÀ³¸Ó¤£P©ó³y¦¨¤Ó¤jªº°ÝÃD
¦ý¤j¤jªºCalculate·|¦b¡y If arr(I, 2) & arr(I, 3) <> rng(I, 2) & rng(I, 3) Then¡zµo¥Í¶À©³¡y«¬ºA¤£²Å¦X¡zªº¿ù»~¡H
¬ã¨s¤F¤@¤UÁÙ¬Oµo¤£¥Xì¦]¡A§Æ±æ¤j¤j½ç±Ð
5.102.2.rar (22.2 KB)
¦]¬°¤@¯ë¼Ò²Õ¤¤¤w¦³¼g¤F¤@Ó°}¦Car¡A©Ò¥H¦³±N¤j¤jªºar §ï¬°arr |
|
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X
|
|
|
|
|
- ©«¤l
- 32
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 55
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- XP
- ¾\ŪÅv
- 20
- ©Ê§O
- ¤k
- µù¥U®É¶¡
- 2011-4-25
- ³Ì«áµn¿ý
- 2011-12-18
|
¥»©«³Ì«á¥Ñ ko310kmo ©ó 2011-5-14 17:12 ½s¿è
¦^´_ 13# GBKEE
¤j¤j§Ú¤F¸Ñ¤F
§Ú¥»¨Ó¬O¥Î§Y®É¦¨¥æ»ù¡B³æ¶q
§Ú·Q¦A¥Î¤@Ó¦¨¥æ¶q¨Ó¬ÝÅÜ°Ê
§Ú¦Û¦æ¨Ì§A´£¨Ñªº´XÓµ{¦¡¡Aקï«á
Calculate¤w¸g¥i¥H¥¿½T¼g¤J¤F
²{¦b·|¥X²{ªº°ÝÃD¬O
¤ÀÄÁ¸ê®Æ¬O¢±¤ÀÄÁ§ó·s¤@¦¸
§Ú¬O¥ý°õ¦æ test1¡Aµ¥¥¦¶]§¹¦A°õ¦ætest3
³o¼Ë¬O¥i¥H¨C¤À§ó·sªº
¦pªG§Ú¬O¥ý°õ¦ætest1¦A°õ¦ætest2¡A¨S¦³³]©wtest3
³o¼Ë¤ÀÄÁ¸ê®Æ¥u·|§ó·s²Ä¤@¹M¡C
½Ð°Ý³o¨ì©³¬O¸Ó¦p¦óקï¤~¦n©O¡H
Àµ½Ð¤j¤j½ç±Ð¡I¡I¡I |
|
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X
|
|
|
|
|
- ©«¤l
- 32
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 55
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- XP
- ¾\ŪÅv
- 20
- ©Ê§O
- ¤k
- µù¥U®É¶¡
- 2011-4-25
- ³Ì«áµn¿ý
- 2011-12-18
|
¥»©«³Ì«á¥Ñ ko310kmo ©ó 2011-5-13 10:10 ½s¿è
¦^´_ 15# GBKEE
½Ð°Ý¤j¤j
If Minute(Time) = Minute(t) Then
Do While Minute(Time) = Minute(t)
³o¤G¦æªº·N«ä¬O
¤@ª½°µ¨ì³o¤@¤ÀÄÁ¹L§¹¹ï§a!
¦Ó§Ú̫ᱤS¼gApplication.OnTime Now + TimeValue("00:01:00"), "test2"
©Ò¥H·|¤£·|¬O¦]¬°³o¼Ë¡A¤~·|³y¦¨¤G¤ÀÄÁ°O¿ý¤@¦¸©O?
§Ú¦b·Q¬O¤£¬O¡A¤£¥Î¥[Application.OnTime
¦Ó§â¤j¤j쥻ªºµ{¦¡³Ì«á¼gªº
Loop Until Time <= #1:30:00 PM#
§ï¦¨
Loop Until Time >= #1:30:00 PM#
loop until time<=1:30
°µ¨ì®É¶¡¤p©ó1ÂI30´N¸õ¥X¡A´ú¸Õªº®É¶¡¤@©w³£¬O¤p©ó1:30ªº¡A©Ò¥H¤~¸õ¶]¤@¹M¦Ó¤w¡A´N¸õ¥X
¤j¤j¡A¤µ¤é´ú¸Õµ²ªG¡A¥un§â<§ï¦¨>´N¨S¦³°ÝÃD¤F¡AÁÂÁ¤j¤jªºÀ°¦£»P@¤ßÁ¿¸Ñ¡I¡I¡I:) |
|
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X
|
|
|
|
|
- ©«¤l
- 32
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 55
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- XP
- ¾\ŪÅv
- 20
- ©Ê§O
- ¤k
- µù¥U®É¶¡
- 2011-4-25
- ³Ì«áµn¿ý
- 2011-12-18
|
¦^´_ 10# GBKEE
¤j¤j¹ï©óµ{¦¡½Xªº¼gªk¡AÁÙ¦³´XÂI·Q½Ð±Ð
If IsEmpty(B) Then '¤ñ¹ï°}¦C¬°¸ê®Æ
For Each E In Range("b2", Range("b2").End(xlDown))
With Sheets(E.Text).Cells(Rows.Count, "j").End(xlUp)
.Offset(1) = E(1, 2) '°O¿ý ¦¨¥æ»ù
.Offset(1, 1) = E(1, 3) '°O¿ý ³æ¶q
.Offset(1, 2) = Time '°O¿ý ¦¨¥æ®É¶¡
End With
Next
E(1, 2)³o¼gªk¬O¤°»ò·N«ä?
Else
For i = 1 To UBound(A, 2)
If A(1, i) <> B(1, i) Or A(2, i) <> B(2, i) Or A(3, i) <> B(3, i) Then ' ¼i¬ù»ùªº(¦¨¥æ»ù©Î¦¨³æ¶q)¦³ÅÜ°Ê
With Sheets([B2].Cells(i, 1).Text).Cells(Rows.Count, "j").End(xlUp)
.Offset(1) = [B2].Cells(i, 2) '°O¿ý¤U §Y®É¦¨¥æ»ù
.Offset(1, 1) = [B2].Cells(i, 3) '°O¿ý¤U ³æ¶q
.Offset(1, 2) = Time
End With
End If
Next
End If
[B2].Cells(i, 3)
ÁöµM¬Ý¤F¤j¤j¶Kªººô§}ªº±Ð¾Ç
©Ò¥H¬O range("B2").cells(i,3) ªº·N«ä¶Ü?
¬Ý¤F¦n¤[¡AÁÙ¬O¤£¤Ó¤F¸Ñ
½Ð¤j¤j¸ÑÄÀ¤@¤U¡AÁÂÁÂ!!! |
|
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X
|
|
|
|
|