Wa'alaikum salaam.

Pak Heri, terimakasih atas arahannya. Sudah saya coba dan hasilnya sesuai yang 
saya harapkan.

wassalamu'alaikum.

Haris.
Pada Selasa, 15 April 2014 16:03, Heri Pamungkas ( Gmail ) 
<[email protected]> menulis:

 


السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Semangat pagi,. Berikut yang coba saya jalankan di komputer saya
dan berhasil : Public Sub Buka_File()
Dim wbkApp As Workbook, wbkTarget As Workbook Set wbkApp = ThisWorkbook Set 
wbkTarget = Workbooks.Open("\\dem1-ppc-002\Standard Min - Max\Balance 
April.xlsx", 2) wbkTarget.Sheets("LV WIRE 05, 03 & 18").Activate
End Sub Atau mungkin bisa diganti IP ?!
Semoga bisa membantu. وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ  
Warm Regards,
On 15/04/2014 15:46, Haris Rifai wrote:

 
>Dear Master Excel.
> 
>Public sub Buka_File()
>Dim wbkApp As Workbook, wbkTarget As Workbook
>    Set wbkApp = ThisWorkbook
>    Set wbkTarget =
                  Workbooks.Open("f:\baru\DATABASE.xlsm", 2)
>    wbkTarget.Sheets("Database").Activate
>end sub
> 
>Prosedur diatas adalah perintah untuk membuka/mengaktivkan suatu file  macro 
>excel.
> 
>Bagaimana jika file yang ingin dibuka berada di PC yang berbeda. Misalnya kita 
>bekerja dalan sebuah jaringan LAN.
>PC-01 sebagai tempat prosedur pemanggil, sedangkan file yang dibuka berada di 
>PC-02.
> 
>Apa yang mesti ditambahkan dalam prosedur tersebut, atau bagaimana prosedur 
>yang mesti dibuat untuk menjalankan yang saya maksudkan tersebut.
> 
>Mohon pencerahan para master sekalian.
>Terimaksih.
> 
>Haris.

Kirim email ke