Bagaimana kalau ada lebih dari 1 folder bernama Database1 di banyak sub
folder ? Harus buka yang mana ?
On Mon, Aug 19, 2019 at 6:59 PM HAIRUL ALAM ha_m...@yahoo.co.id
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Terimakasih
> Semuanya
>
> Maaf jika dengan code
>
> Buat sheet bernama INPUT
> di cells A1 ditulis lokasi filenya, misal : D:\Documen1\Data
> ActiveWorkbook.FollowHyperlink Sheets("INPUT").range("a1").text
>
> tetap harus ditentukan drive nya (drive D), bagaimana jika file / datanya
> saya letakkan di drive mana saja (semua drive bisa yang terpenting nama
> file yang dimakasud) misalkan folder Database1 jika dipanggil atau dibuka
> akan langsung terbuka. walaupun disimpan di drive misalkan C atau D ataupun
> tempat lain. Mohon pencerahannya
>
> Terimakasih
>
> Pada Senin, 19 Agustus 2019 14.17.20 WIB, hendrik karnadi
> hendrikkarn...@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>
> menulis:
>
>
>
>
> Hai Hairul,
>
> "bagaimana bila saya tempatkan file di drive misal C atau F tanpa merubah
> macro setiap harus pindah file/folder"
>
> Meminjam code Mr. Kid,....
> Kalau tidak mau merubah Macronya ya harus ubah acuan pada Sheetnya.
> Mis.
> Range("A1") ditulis "D:\Document\" (tanpa spasi)
> Range("A2") ditulis "Data.extnya" (tanpa spasi)
>
> Codenya menjadi :
> ActiveWorkbook.FollowHyperlink NamaSheetnya.Range("A1") & Range("A2").Text
>
> Jika File "Data.extnya" (tanpa spasi) dipindah...mis ke Directory F:\ maka
> Range("A1") ditulis "F:\" (tanpa spasi)
>
> Codenya tetap:
> ActiveWorkbook.FollowHyperlink NamaSheetnya.Range("A1") & Range("A2")..Text
>
> Jadi prinsipnya harus ngelink ke lokasi yang tepat.
>
>
> Salam,
> HK
>
>
>
> ----- Pesan yang Diteruskan -----
>
> Dari: 'Mr. Kid' mr.nm...@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>
> Kepada: BeExcel <belajar-excel@yahoogroups.com>
> Terkirim: Senin, 19 Agustus 2019 01.07.43 WIB
> Judul: Re: [belajar-excel] Buka folder dengan macro excel
>
>
>
>
>
>
>
> Wa'alaikumussalam wr wb,
>
> Buat sheet bernama INPUT
> di cells A1 ditulis lokasi filenya, misal : D:\Documen1\Data
> ActiveWorkbook.FollowHyperlink Sheets("INPUT").range("a1").text
>
>
> Wa'alaikumussalam wr wb,
> Kid
>
>
>
>
> On Thu, Aug 8, 2019 at 9:47 PM HAIRUL ALAM ha_m...@yahoo.co.id
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
> >
> >
> >
> >
> >
> >
> > Salam Para Master
> >
> > Kalau saya hendak membuka file dengan membuat code macro ;
> >
> > Sub DOCUMENT1()
> > 'Data1 = "D:\Documen1\Data"
> > ActiveWorkbook.FollowHyperlink Data1
> > End Sub
> >
> > code tersebut hanya bisa di buka pada folder yang ada di drive D saja,
> tapi bagaimana bila saya tempatkan file di drive misal C atau F tanpa
> merubah macro setiap harus pindah file/folder..
> >
> > Terimakasih
> > Assalamualaikum
> > Hairul Alam
> >
> >
> >
> >
> >
> >
>
>
>
>
>
>
>
