Kết quả 1 đến 4 của 4

Chủ đề: Đóng file đang mở ?

  1. #1
    sonbutterbee Guest

    Đóng file đang mở ?

    dear all,

    mình có chưa biết cách đóng file bằng vòng lặp này làm sao,
    - mình dùng vòng lặp để mở một số file

    Mã:
     For i = LBound(Mang) To UBound(Mang) Step 1
          sFile = ThisWorkbook.Path & "\" & Mang(i) & "ABC.xls"
    Workbooks.Open sFile
    ' call function
    ' Windows.close <-- đóng hết các file,hix
    Next i
    End if
    Làm sao đóng từng file đã mở bằng vong lặp trên
    cam on

  2. #2
    hungosp Guest
    For i = LBound(Mang) To UBound(Mang) Step 1
    NameBook = Mang(i) & "ABC.xls"
    Workbooks(NameBook).Close SaveChanges:=False '(or True)
    Next i
    End if

  3. #3
    Mrhieuson Guest
    Hong duoc Chibi ơi, cứ báo lỗi ngay chỗ
    Workbooks(NameBook).Close SaveChanges:=False

    Mình nghĩ là do mở mở file bằng vòng lặp, rùi close phải tư nguọc lại, cứ báo lỗi wài, chán ghê

  4. #4
    Ngày tham gia
    Aug 2015
    Bài viết
    0
    oh yeah, duoc rùi, hiểu rùi, cám ơn Chibi,ngồi tới nủa đêm, cuối cùng cũng ra, pó tay, bờm thiệt,hihi

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •