RE: [belajar-excel] BreakLink

['Dede Sulaeman' dede_sulae...@pinusmerahabadi.co.id [belajar-excel]]

Dear Mr Toby,

 

Makasih atas masukannya, saya pelajari dulu.

 

Salam,

DD

 

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] 
Sent: 07 Desember 2016 17:44
To: belajar-excel@yahoogroups.com
Subject: Bls: [belajar-excel] BreakLink

 

  

Dear DD,

Coba Script ini :

 

Dim a As Workbook
Dim b As Long
Dim c As Variant

Set a = ActiveWorkbook

c = a.LinkSources(Type:=xlLinkTypeExcelLinks)


For b = 1 To UBound(c)

 

a.BreakLink Name:=c(b), Type:=xlLinkTypeExcelLinks

Next b 

 

Jika ada file link yang terprotect, maka tidak bisa nge-BreakLinks

 

TerimaKasih.

 

Pada Rabu, 7 Desember 2016 13:54, "'Dede Sulaeman' 
dede_sulae...@pinusmerahabadi.co.id [belajar-excel]" 
<belajar-excel@yahoogroups.com> menulis:

 

  

Dear BeExceller,

 

Berikut script yang saya pakai :

 

Sub Macro2()

FlNm = Range("A1").Value

u = Range("F1").Value

 

For x = 1 To u

On Error Resume Next

    Sheets("Sheet1").Select

    Sheets("Sheet1").Move

    ActiveWorkbook.BreakLink Name:="" & FlNm & "", Type:=xlExcelLinks

    Sheets("Sheet1").Select

    Sheets("Sheet1").Move Before:=Workbooks("Book1").Sheets(1)

Next x

End Sub

 

Script ini hanya untuk BreakLink satu file saja.

Jadi kalau Tiga file gimana yah scriptnya?

 

Salam,

DD

 

 

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] 
Sent: 07 Desember 2016 8:43
To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] BreakLink

 

  

Dear Be Exceller,

 

Saya mempunyai file (sebut saja File A) yang formulanya nge-Link ke (3)tiga 
file yang berbeda.

Apa scriptnya yah kalau saya mau nge-BreakLink “File A” tersebut.

 

Salam,

DD