bisa gunakan fungsi mkDir contoh:
Private Sub CommandButton1_Click() Dim nFolder As Integer For nFolder = 0 To ListBox1.ListCount - 1 MkDir "C:\" & ListBox1.List(nFolder) 'misal folder akan di taruh pada direktori C:, sesuaikan dg kebutuhan Next End Sub On 8/27/08, siti Vi <[EMAIL PROTECTED]> wrote: > Membuat SubDirektory (Folder) di file system, sebetulnya adalah pekerjaan yg > diurus oleh operating system bukan oleh excel secara langsung > Di dalam Exel pada dialogBox Open atau SaveAs misalnya, ada ikon untuk > Create New Folder. Itu sebetulnya Excel hanya mintak tolong ke Windows, > dengan caranya sendiri. > Di situ pun pembuatan folder baru tentu satu persatu. > Menu atau Fitur lain atau bahkan FUNGSI, saya kira ndak ada yg melayani > membuat Folder. > (CMIIW) > Dari luar Excel, misalnya dari windows explorer, situasinya tidak jauh > berbeda. > > Trus gimana dong *membuat folder banyak & sekali gus *dengan nama-nama > folder sesuai daftar yg sudah disiapkan. Mungkin kita bisa sertjing-sertjing > di inet cari program bantu gratis yg dapat mengerjakan gawean spt itu. > > Atau > memanfaatkan library FSO (file system object) yg ada di VBA untuk > di-atur-atur agar mampu mengerjakan seperti keinginan tsb. > Saya ngeri untuk bilang makro, karena takutt disangka mo merusak server > orang (seperti mail dari beberapa server tempat member XL-mania bekerja, > jika setiap kali saya posting wokbuk mengandung secuil macro. Astaghfirullah > al azim...) > > (ayok ayok pak hand, pak imam, pak eka, dan pak pak & mbak mbak yg lain > pasti sedang siap siap bikin codingnya). Aku cih cuma ngomporin saja... > > > 2008/8/27 Yulianto <[EMAIL PROTECTED]> > >> Met pagi semua... >> saya punya data list data karyawan dalam excel dan jumlahnya ribuan >> saya ingin membuat folder dari masing2 nama tersebut..apakah ada cara >> cepat membuat multi folder dari masing2 nama tersebut.. >> >> Thanks.. >> >
