tạo đường link trong excel 2007

[missingU_2689]

các bác ơi, muốn tạo đường link từ 1 cell bất kỳ tới một cell trong sheet khác thì làm thế nào????

 

[khoavu87]

các bác ơi, muốn tạo đường link từ 1 cell bất kỳ tới một cell trong sheet khác thì làm thế nào????

Bạn thử xem cái này có đúng yêu cầu của bạn ko?
http://www.giaiphapexcel.com/forum/showthread.php?t=32305&p=220969#post220969
- Xem thêm file đính kèm.

 

[yeuthamhangxom]

các bác ơi, muốn tạo đường link từ 1 cell bất kỳ tới một cell trong sheet khác thì làm thế nào????

Mạn phép bổ xung thêm.
vì là bạn hỏi excel 2007 nên
Bước 1 Chỉ đến cell cần link dữ liệu.
Bước 2 trong tap insert kích vào mục Hyperlink hiện ra cửa sổ mới.
Bước 3 Trong cửa sổ mới tích vào "Place in this document" trong cửa sổ "Or select a place in this document" chọn sheet cần chuyển đến. Trong cửa sổ "Type the cell reference:" gõ ô cần chuyển đến trong sheet vừa chọn.
chúc vui.

 

[missingU_2689]

Mạn phép bổ xung thêm.
vì là bạn hỏi excel 2007 nên
Bước 1 Chỉ đến cell cần link dữ liệu.
Bước 2 trong tap insert kích vào mục Hyperlink hiện ra cửa sổ mới.
Bước 3 Trong cửa sổ mới tích vào "Place in this document" trong cửa sổ "Or select a place in this document" chọn sheet cần chuyển đến. Trong cửa sổ "Type the cell reference:" gõ ô cần chuyển đến trong sheet vừa chọn.
chúc vui.

thak bạn nhiều nhe

 

[hibiki2011]

Rất cảm ơn bồ nhiều lắm, mình đang tìm cách hướng dẫn dễ hiểu này đấy.... Đa tạ nhé

 

[khacthich05011977]

Chào tất cả các bạn!
Mình có một vấn đề rất cần mọi người giúp đỡ, Mình có file excel, trong đó có nhiều sheet, mình muốn tạo đường link từ sheet chính (index) tới các sheet khác là (Sheet1,2,3,4..)và từ các sheet này có thể link được về sheet chính (index). mình đã dùng đoạn mã sau nhưng chỉ link từ sheet chính đến các sheet khác thì được, nhưng từ sheet 1,2,3.. mà link về sheet chính thì không dược
Private Sub Worksheet_Activate()
Dim wSheet As Worksheet
Dim lCount As Long
lCount = 1
With Me
.Columns(1).ClearContents
.Cells(1, 1) = "INDEX"
End With
For Each wSheet In Worksheets
If wSheet.Name <> Me.Name Then
lCount = lCount + 1
With wSheet
.Range("A1").Name = "Start" & wSheet.Index
.Hyperlinks.Add Anchor:=.Range("A1"), Address:="", SubAddress:= _
"Index", TextToDisplay:="Back to Index"
End With
Me.Hyperlinks.Add Anchor:=Me.Cells(lCount, 1), Address:="", SubAddress:= _
"Start" & wSheet.Index, TextToDisplay:=wSheet.Name
End If
Next wSheet
End Sub
chú ý có file đính kèm
câu trả lời xin hãy gửi theo địa chỉ sau (khacthich05011977@gmail.com)
xin cám ơn!