返回列表 上一主題 發帖

[發問] 請問該如何批次匯入不同日期資料至EXCEL?

回復 1# j1221

     但是好像用If 之後沒辦法用For 這樣excel會告訴我“有If 但沒有End If"
      樓主~ 這個問題是您在撰寫時~ 有寫IF 但沒有寫結尾Eed IF~      
     樓主的觀念的對的呀~若是誇月~ 我的寫法~ 直覺是用IF去判斷~
      因此~ 樓主 要不要再試一下~ 你原始的寫法~ 應該就可以解決跨月的問題~
學習才能提升自己

TOP

本帖最後由 hugh0620 於 2012-5-17 09:27 編輯

回復 3# j1221


    你有寫for 但是少了next~ 當然會產生錯誤呀~
    要在檢視一下~ 你寫的是不是一對一對的~
    if  
         for
               for
                           if    
                           end  if
               next
         next
     end if

檢查過你發文的程式碼~ 沒有問題~

要不要把你修改過後的完整程式碼po上來看看呢
學習才能提升自己

TOP

本帖最後由 hugh0620 於 2012-5-18 08:21 編輯

回復 5# j1221

     還真的寫錯了唷~
If iYear_s = iYear_e Then
    Z = iYear_s
    For J = iMonth_s To iMonth_e        
          If J = iMonth_s Then

            For K = iDay_s To 31
            
            NEXT K  

      Else
            For K = 1 To iDay_e

            next K

        End If
    next J
End If

按您原始的寫法~ 執行到For J = iMonth_s To iMonth_e 這一句~
如何跳到next J呢~  不可能唷~ 中間有END IF
在程式執行時~ 就會錯誤了~
你可以在IF .....   END IF 中間放在For  ...  Next
但不能把  next 放在 end  if後面~
學習才能提升自己

TOP

        靜思自在 : 願要大、志要堅、氣要柔、心要細。
返回列表 上一主題