Membaca isi di beberapa folder

  1. 5 tahun lalu

    Master22 mohon bantuannya
    Klo di file destination ada beberapa folder trus isi di folder tersebut kita ingin kita taro di kolom hasil destination jadi satu file.
    Apa yg kita ubah makronya

    SM d kolom R kenapa yg kita ambil hasilnya ada yg beda ya

    Terlampir excelnya

  2. Mas caton ini udh bs baca subfolder
    Tapi gmn klo destinationnya jgn browse tp d kolom A2 u destinasi direktori ya
    Apa yg hrs saya ubah om

  3. Caton

    26 Sep 2019 Terverifikasi Indonesia + 20.101 Poin

    @Meiby ...

    Maksudnya bagaimana? Mau buat daftar nama file pada folder yang aktif? Kalau yang saya pahami dari pertanyaan di atas, susun daftar file dari setiap sub folder pada kolom A mulai baris ke-2. Begitu maksudnya?

  4. Ya om begitu maksudnya
    Cm direktorinya d letakkan di sheet

  5. Maksudnya kita lgsg klik tidak usah browse LG filenya dmn?

  6. Caton

    26 Sep 2019 Terverifikasi Indonesia + 20.101 Poin
    Di sunting 5 tahun lalu oleh Caton

    @Meiby ...

    Misalkan saja, nama foldernya diisi pada sel A2, dan daftar filenya akan ditampilkan pada kolom B mulai dari baris ke-2. Pertama, coba buat dahulu prosedur berikut:

    Sub TesSaja()
        Call ListFilesInFolder(Trim$(Sheet1.Range("B2")), True)
    End Sub

    Kemudian pada prosedur ListFilesInFolder, ubah baris perintah:

    rowIndex = Application.ActiveSheet.Range("D25000").End(xlUp).Row + 1

    menjadi:

    rowIndex = Application.ActiveSheet.Range("B" & Rows.Count).End(xlUp).Row + 1

    dan pada prosedur yang sama, pada baris perintah:

    Application.ActiveSheet.Cells(rowIndex, 4).Formula = xFile.Name

    menjadi:

    Application.ActiveSheet.Cells(rowIndex, "B").Formula = xFile.Name

    Kemudian assign macro pada tombol ke prosedur TesSaja tadi. Coba klik tombol dan lihat hasilnya.

    Demikian.

  7. Om invalid procedure call or argument

    Eror pada set xfolder = xfilesystemobject.getfolder(xfoldername)

  8. Sorry om berhasil

  9. Makasi bantuannya

  10. 4 tahun lalu

    Mas caton bs bantuan LG

    Saya ada dua Excel book59(1) ini membaca nama file pada sub folder
    Sedangkan book60 membaca nama file pada folder dan menampilkan direktori pada kolom a

    Cara menggabungkan 2 Excel berikut gmn ya mas sehingga
    Book59(1) menampilkan direktori seperti book60

  11. Caton

    5 Okt 2019 Terverifikasi Indonesia + 20.101 Poin

    @Meiby ...

    Pelajari file terlampir, mungkin sesuai yang dimaksud...

    Demikian.

  12. Ok om caton ane coba dl ya

  13. Om caton terima kasih banyak sangat membantu
    Sesuai datanya
    Terima kasih banyak y om

  14. Caton

    8 Okt 2019 Terverifikasi Indonesia + 20.101 Poin

    @Meiby ...

    ... Terima kasih banyak y om ...

    Sama-sama... :)

 

atau Mendaftar untuk ikut berdiskusi!