Đăng ký học Excel và VBA cùng GPE tháng 10 - TPHCM

Đăng ký học Excel và VBA cùng GPE tháng 11 - TPHCM

Nén hàng loạt ảnh trong file Excel

Thảo luận trong 'Lập Trình với Excel' bắt đầu bởi trunghtpco, 14 Tháng sáu 2010.

  1. trunghtpco

    trunghtpco Thành viên chính thức

    Chào mọi người, mình có vấn đề thế này nhờ mọi người xem giúp có giải pháp nào không: hiện tại trong máy mình có rất nhiều file excel có chứa hình ảnh. Mình cần nén lại các hình này (dùng chức năng Compress Pictures của Excel). Nhưng với số lượng file lớn thì làm thủ công từng file sẽ mất rất lâu.
    Các pro VBA cho mình hỏi VBA có giải quyết được vấn đề này không vậy? Mình định viết 1 thủ tục để compress hình ảnh trong tất cả các file excel trong thư mục được chỉ định.
    Cám ơn mọi người.
     
  2. ongtrungducmx25

    ongtrungducmx25 Thành viên gạo cội

    bạn có thể làm cách đơn giảng không cần VBA đâu nhé! bạn mở file.xls của bạn lên sau đó nhấn F12 chọn mục save as type: chọn định dạng Web page thế thôi ! sau đó ảnh của bạn cần nén có tên là img2 giảm dung lượng đáng kể lém.
    [​IMG]
     
  3. trunghtpco

    trunghtpco Thành viên chính thức

    Cám ơn bạn, nhưng bạn hiểu lầm ý mình rùi.
    Do có rất nhiều file nên mình không thể thực hiện nén thủ công trên từng file. Ý mình muốn viết code đại loại thế này;

    For Each fileExcel In [Thư Mục được chỉ đinh]
    'Compress pictures trong từng file
    Next

    Mình muốn backup tất cả dữ liệu để lưu trử trên web, mình muốn giảm dung lượng tất cả các file excel bằng cách compress tất cả các hình ảnh trong file đó mà.
     
  4. ndu96081631

    ndu96081631 Ăn cùng GPE, Ở cùng GPE, Sống cùng GPE Staff Member Super Moderator

    Code duyệt file trong thư mục thì chẳng nói làm gì... Tuy nhiên vụ nén hình thì trên mạng người ta cũng đã bàn rất nhiều... Dù rằng có thể làm bằng tay được nhưng lại chẳng thể record macro... Hic...
    Cuối cùng người ta dùng giải pháp Senkeys... không hiệu quả mấy
    Mà tôi rất lấy làm lạ: Tại sao file Excel của bạn lại cần chứa nhiều hình chi vậy? Làm vậy chỉ tổ nặng file thêm thôi
     
  5. hoangbathang

    hoangbathang Thành viên mới

    bạn ndu96081631 ơi. Trong file excel chứa nhiều hình ảnh là chuyện bình thường mà. Hằng ngày tôi phải giải quyết rất nhiều file Excel tại công ty. Dung lượng mỗi file nhỏ nhất thì khoảng 7 / 8 Mb. nhưng có những file tôi nhận được lên đến 15MB lận đó.
    Nếu như bạn có kinh nghiệm gì về Excel liên quan đến Compress all picture thì bạn góp ý cho mọi người để có kỹ năng làm việc tốt hơn bạn nhé.
    Cảm ơn trunghtpco và mọi người.
     

Chia sẻ trang này