Tujuan: Excel 2010 - VBA untuk Hyperlink Active Cell untuk dirinya sendiri, sehingga akan mengarah ke lokasi yang tepat di spreadsheet mulai dari saat sel itu disisipkan dan dikirim dalam email Outlook. Saya perlu menjaga isi sel Excel tetap utuh - tetap menampilkan apa pun yang saya miliki di dalamnya yang tidak terkait dengan hyperlink dll. Sel itu akan dikirim melalui email. Harus dapat mengklik sel dari pesan email Outlook dan meminta Hyperlink membuka spreadsheet dan memilih lokasi sel yang tepat pada spreadsheet itu. Satu-satunya elemen yang hilang adalah bagian Hyperlinking itu. Kode VBA saya memiliki bug di bawah ini (highlight kuning) bagian dengan Hyperlink. Maaf jika saya tidak menempelkan kode sesuai aturan - saya mungkin tidak memahaminya. Terimakasih atas bantuannya!
Sub H_Link_Cell_to_Self
Dim path As String
Dim sheet As String
Dim cell As String
path = Application.ActiveWorkbook.FullName
sheet = Application.ActiveSheet.Name
cell = Application.ActiveCell.Address
ActiveSheet.Hyperlinks.Add Range(Active.Cell), "path” & “\“ & “sheet” & “\“ & “cell"
End Sub
Jawaban:
Kode Anda terlihat bagus dengan pengecualian baris yang menambahkan hyperlink. Di sini Anda memiliki variabel Anda dikelilingi oleh tanda kutip ganda yang menyebabkan mereka ditafsirkan sebagai nilai literal bukan variabel.
Coba ini sebagai gantinya:
sumber