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

[µo°Ý] ¥X²{RUN-TIME ERROR '9': SUBSCRIPT OUT OF RANGE,½Ð°Ý­þ¸Ì¥X²{°ÝÃD¡H

¥»©«³Ì«á¥Ñ 198188 ©ó 2013-1-13 00:46 ½s¿è

¦^´_ 43# GBKEE
1.rar (380.46 KB)
2.rar (464.33 KB)
3.rar (419.49 KB)

vba.rar (2.65 KB)

¥Ñ©óÀɮפӤj¡A§Ú¤À¶}¤F7­Ó excel ©M¤@­Óµ{¦¡ªºªþ¥ó

4.rar (903.92 KB)

5.rar (760.94 KB)

4.rar (903.92 KB)

5.rar (760.94 KB)

TOP

¦^´_ 42# 198188
¤W¶ÇÀɮפε{¦¡½X¬Ý¬Ý.

TOP

¦^´_ 41# GBKEE


    §Ú¸Õ¹L±N¥þ³¡ªº¤é´Á®æ¦¡³£§ï¦¨¤@¼Ë¡A¦Ó¦UºØ¤é´Á®æ¦¡³£¸Õ¹L¡C
¦ý¤@°õ¦ævba´N·|¦Û°Ê±N®æ¦¡§ï¦¨¼Æ¦r¦p¤U¡A¦Ó§Ú·Q±N³o­ÓETA¤é´Á´î¨â¤é¡A¦pªG¬O¬P´Á¤»©Î¤é¡A´N¦b¥t¤@columnÅã¥ÜETA Columnªº¤é´Á¡A§_«h´NÅã¥ÜETA¤é´Á´î¨â¤é,¥Ñ©óvba¥¼¯à¿ë»{¼Æ¦r¦¨¤é´Á¡A©Ò¥H¥þ³¡³£´î2
ETA
41289.5
41291
41288.5
41295
41297
41298

TOP

¦^´_ 39# 198188
    ¤G­Ódata base¡A´NÅܦ¨ªþ¥ó¹Ï¤ù
FÄæ­n³]©w¬°¤é´Á®æ¦¡ ¦p¹Ï

TOP

¦^´_ 19# kimbal

½Ð°Ý¥i§_À°§Ú¬Ý¤@¤U¤U­±ªºlink­þ¸Ì¥X²{°ÝÃD
    http://forum.twbts.com/viewthrea ... amp;page=4#pid49510

TOP

¦^´_  GBKEE




§Ú³o­Óµ{¦¡À³¸ÓµL°ÝÃD¡A¦ý¬OWorksheets("Request").Range("F" & i).Value ¸g±`¥X²{¬O ...
198188 µoªí©ó 2013-1-11 10:19


§Ú²Ä¤@­Ódata base ­ì¥»¬O04-Jan-13
µM«á§ÚÂà1/4¦b²Ä¤G­Ódata base
¤§«áŪ¨ú²Ä¤G­Ódata base¡A´NÅܦ¨ªþ¥ó¹Ï¤ù¡A¼Æ­È¡A¦Ó³o­Óµ{¦¡«o¤£À´±o¿ë»{¦¨¤é´Á

TOP

  1.     The_day = Worksheets("Request").Range("F" & i).Value - 2
  2.   If The_day = "¬P´Á¤»" Or The_day = "¬P´Á¤é" Then .Range("H" & i).Value = .Range("F" & i).Value Else .Range("H" & i).Value = .Range("F" & i).Value - 2
½Æ»s¥N½X
¦^´_ 37# GBKEE




§Ú³o­Óµ{¦¡À³¸ÓµL°ÝÃD¡A¦ý¬OWorksheets("Request").Range("F" & i).Value ¸g±`¥X²{¬O¼Æ­È¡A¤£¬O¤é´Á¡A¦pªGÅý¹q¸£¦Û°Ê¿ë»{³o­ÓÀx¦s®æ¬O¤é´Á¡C§ÚÀx¦s®æªº¤é´Á®æ¦¡¬O11/1

TOP

¦^´_ 34# 198188
³oª¬ªp§Ú¤]¤£ª¾¹D!

¦^´_ 35# 198188
  1. Sub Ex()
  2. Dim The_day As Variant
  3. The_day = #1/1/2013#
  4. MsgBox Format(The_day, "aaa")
  5. The_day = Date '¨t²Î¤é´Á: ¤µ¤é
  6. MsgBox Format(The_day, "aaa")
  7. End Sub
½Æ»s¥N½X

TOP

¥»©«³Ì«á¥Ñ stillfish00 ©ó 2013-1-10 16:23 ½s¿è

¦^´_ 35# 198188

if WeekdayName(Weekday("2013/1/10")) = "¬P´Á¤@"
©Î
if Weekday("2013/1/10") = vbMonday

TOP

¦^´_ 29# Hsieh


    ½Ð°Ý­ncheck¤@­ÓÀx¦s®æ¤ºªº¤é´Á¬O¬P´Á´X¡A¥i¥H¥Îvba¶Ü¡H

TOP

        ÀR«ä¦Û¦b : ¤@­Ó¯Ê¤fªºªM¤l¡A¦pªG´«¤@­Ó¨¤«×¬Ý¥¦¡A¥¦¤´µM¬O¶êªº¡C
ªð¦^¦Cªí ¤W¤@¥DÃD