silakan di oprex,
Sub ling()
For Each c In Range("B2:K5")
If c <> "" Then
ActiveSheet.Hyperlinks.Add Anchor:=c, _
Address:="D:\Folder\Workbook" & c.Column - 1 & ".xls"
End If
Next
End Sub
>semoga bermanfaat
________________________________
From: sepriansyah encep <[email protected]>
To: [email protected]
Sent: Thu, April 15, 2010 10:48:04 AM
Subject: [belajar-excel] belajar-excel] link dengan banyak wookbook
Dear para Master
Saya punya permasalahan dgn link di wookbook lain
ex :
1 2 3 4 5 6
CSU 0 0 0 0 0 0
Planned Visit 0 0 0 0 0 0
Actual Visit 0 0 0 0 0 0
In Route Visit 0 0 0 0 0 0
di kolom 1 akan di link dengan doc wookbook1.xls
di kolom 2 akan di link dengan doc wookbook2.xls
dst...
Permasalahan nya adalah bagaimana cara yg simple agar saya tdk kesulitan copy
rumus di cell itu tapi pada wookbook yg tepat..karena bisa ratusan wookbook yg
akan saya link
Mohon bantuan & solusi para master semua
Tx,
Syepriansyah
____________ _________ _________ _________ _________ __
Apakah Anda Yahoo!?
Lelah menerima spam? Surat Yahoo! memiliki perlindungan terbaik terhadap spam
http://id.mail. yahoo.com
