السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
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.
