Làm cách nào để chuyển đổi một cột URL văn bản thành các siêu liên kết hoạt động trong Excel?

Tôi có một cột trong excel, trong đó tôi có tất cả các giá trị url của trang web. Câu hỏi của tôi là tôi muốn biến các giá trị url thành các liên kết hoạt động. Có khoảng 200 mục trong cột đó với các url khác nhau trong tất cả các ô. Có cách nào tôi có thể tạo các siêu liên kết hoạt động cho tất cả các ô mà không cần viết macro.

Nếu bạn không muốn tạo một macro và miễn là bạn không bận tâm đến một cột bổ sung, thì chỉ cần tạo một cột mới cùng với cột URL của bạn.

Trong loại cột mới trong công thức =HYPERLINK(A1)(thay thế A1 bằng bất kỳ ô nào bạn quan tâm). Sau đó sao chép công thức xuống phần còn lại của 200 mục.

LƯU Ý: Giải pháp này không hoạt động nếu ô A1 chứa một chuỗi dài hơn 255 ký tự. Nó dẫn đến một #VALUE!lỗi

Tạo macro như ở đây:

Trên menu Công cụ trong Microsoft Excel, hãy trỏ đến Macro, sau đó bấm Visual Basic Editor. Trên menu Chèn, bấm Mô-đun. Sao chép và dán mã này vào cửa sổ mã của mô-đun. Nó sẽ tự động đặt tên là HyperAdd.

Sub HyperAdd()

    'Converts each text hyperlink selected into a working hyperlink

    For Each xCell In Selection
        ActiveSheet.Hyperlinks.Add Anchor:=xCell, Address:=xCell.Formula
    Next xCell

End Sub

Khi bạn hoàn thành dán macro của mình, bấm Đóng và Quay lại Microsoft Excel trên menu Tệp.

Sau đó chọn các ô cần thiết và nhấp vào macro và nhấp chạy.

LƯU Ý KHÔNG chọn toàn bộ cột! Chọn CHỈ các ô bạn muốn được thay đổi thành các liên kết có thể nhấp khác, bạn sẽ kết thúc trong một vòng lặp không bao giờ hết và phải khởi động lại Excel! Làm xong!

Đây là một cách tôi tìm thấy. Tôi đang sử dụng máy Mac bằng Excel 2011. Nếu cột B có các giá trị văn bản bạn muốn là siêu liên kết, hãy đặt công thức này vào ô C1 (hoặc D1 hoặc bất cứ điều gì miễn là nó là cột miễn phí): =HYPERLINK(B1,B1) Điều này sẽ chèn một siêu liên kết với vị trí là văn bản liên kết và "tên thân thiện" là văn bản liên kết. Nếu bạn có một cột khác có tên thân thiện cho mỗi liên kết, bạn cũng có thể sử dụng cột đó. Sau đó, bạn có thể ẩn cột văn bản nếu bạn không muốn xem nó.

Nếu bạn có một danh sách ID của một cái gì đó và các url là tất cả http://website.com/folder/ID, chẳng hạn như:

A1  | B1
101 | http://website.com/folder/101
102 | http://website.com/folder/102
103 | http://website.com/folder/103
104 | http://website.com/folder/104

bạn có thể sử dụng một cái gì đó như =HYPERLINK("http://website.com/folder/"&A1,A1)và bạn sẽ không cần danh sách các url. Đó là tình huống của tôi và làm việc tốt.

Theo bài đăng này: http://excelhints.com/2007/06/12/hyperlink-formula-in-excel/ phương pháp này cũng sẽ hoạt động trong Excel 2007.

OK, đây là một giải pháp hokey, nhưng tôi không thể tìm ra cách để Excel đánh giá một cột URL dưới dạng siêu liên kết.

1. Tạo một công thức, ="=hyperlink(""" & A1 & """)"
2. Kéo xuống
3. Sao chép cột công thức mới
4. Dán Chỉ các giá trị đặc biệt trên cột ban đầu
5. Đánh dấu cột, nhấp Ctrl- H(để thay thế), tìm và thay thế =bằng= (bằng cách nào đó buộc phải đánh giá lại các ô).
6. Các tế bào bây giờ có thể được nhấp là siêu liên kết. Nếu bạn muốn kiểu màu xanh lam / gạch chân, thì chỉ cần tô sáng tất cả các ô và chọn kiểu Hyperlink.

Chỉ riêng kiểu siêu liên kết sẽ không chuyển đổi thành các liên kết có thể nhấp và hộp thoại "Chèn siêu liên kết" dường như không thể sử dụng văn bản làm địa chỉ cho một loạt các ô. Bên cạnh đó, F2và Enterthông qua tất cả các tế bào sẽ làm điều đó, nhưng điều đó thật tẻ nhạt đối với rất nhiều tế bào.

Cách khá dễ dàng cho danh sách khá ngắn:

1. Nhấp đúp chuột vào ô chứa url
2. Đi vào

Bạn có liên kết của bạn;)

Nếu việc thêm một cột bổ sung với các siêu liên kết không phải là một tùy chọn, thì phương án thay thế là sử dụng một trình soạn thảo bên ngoài để gửi siêu liên kết của bạn vào =hyperlink("và "), để có được=hyperlink("originalCellContent")

Nếu bạn có Notepad ++, đây là một công thức bạn có thể sử dụng để thực hiện thao tác này một cách tự động:

• Sao chép cột địa chỉ vào Notepad ++
• Giữ ALT- SHIFTnhấn, mở rộng con trỏ của bạn từ góc trên bên trái sang góc dưới bên trái và nhập =hyperlink(". Điều này thêm =hyperlink("vào đầu mỗi mục.
• Mở menu "Thay thế" ( Ctrl- H), kích hoạt các biểu thức thông thường ( ALT- G) và thay thế $(cuối dòng) bằng "\). Điều này thêm một trích dẫn đóng và dấu ngoặc đơn đóng (cần được thoát \khi biểu thức chính quy được kích hoạt) ở cuối mỗi dòng.
• Dán lại dữ liệu trong Excel. Trong thực tế, chỉ cần sao chép dữ liệu và chọn ô đầu tiên của cột nơi bạn muốn dữ liệu kết thúc.

Phương pháp này hoạt động với tôi bằng cách sử dụng chức năng siêu liên kết:

=HYPERLINK("http://"&B10,B10)

Trường hợp B10ô chứa phiên bản văn bản của URL (trong ví dụ này).

Với Excel 2007 trên Windows, tôi thấy các bước này đơn giản nhất;

1. Chọn các ô có URL không hoạt động
2. Sao chép
3. Dán dưới dạng siêu liên kết

Tôi đã sốc khi Excel không tự động làm điều này vì vậy đây là giải pháp của tôi, tôi hy vọng sẽ hữu ích cho những người khác,

1. Sao chép toàn bộ cột vào clipboard
2. Mở cái này trên Chrome hoặc Firefox của bạn

data:text/html,<button onclick="document.write(document.body.querySelector('textarea').value.split('\n').map(x => '<a href=\'' + x + '\'>' + x + '</a>').join('<br>'))">Linkify</button><br><textarea></textarea>

3. Dán cột trên trang bạn vừa mở trên trình duyệt và nhấn "Linkify"
4. Sao chép kết quả từ tab vào cột trên Excel

Thay vì bước hai, bạn có thể sử dụng trang bên dưới, đầu tiên, nhấp vào "Chạy đoạn mã" sau đó dán cột vào đó

<button onclick="document.write(document.body.querySelector('textarea').value.split('\n').map(x => '<a href=\'' + x + '\'>' + x + '</a>').join('<br>'))">Linkify</button><br><textarea></textarea>

Đối với tôi, tôi chỉ sao chép toàn bộ cột có URL ở định dạng văn bản vào một ứng dụng khác (giả sử là Evernote) và khi chúng được dán ở đó, chúng trở thành các liên kết và sau đó tôi chỉ sao chép chúng vào Excel.

Điều duy nhất ở đây là bạn cần đảm bảo dữ liệu bạn sao chép ngược lại với các cột còn lại.

Thử cái này:

= HYPERLINK ("mailto:" & A1, A1)

Thay thế A1 bằng văn bản của bạn trong ô địa chỉ email.

Tôi thấy rằng không có phương pháp nào ở đây hoạt động nếu siêu liên kết không bao gồm http: // vì chúng được liên kết với các vị trí địa phương.

Tôi cũng muốn đánh lừa kịch bản vì người dùng sẽ không thể tự duy trì nó và tôi sẽ không có mặt.

Nó sẽ chỉ chạy trên các ô trong một phạm vi đã chọn nếu chúng chứa một dấu chấm và không có dấu cách. Nó sẽ chỉ chạy tối đa 10.000 tế bào.

Sub HyperAdd()
Dim CellsWithSpaces As String
    'Converts each text hyperlink selected into a working hyperlink
    Application.ScreenUpdating = False
    Dim NotPresent As Integer
    NotPresent = 0

    For Each xCell In Selection
        xCell.Formula = Trim(xCell.Formula)
        If xCell.Formula = "" Or InStr(xCell.Formula, ".") = NotPresent Then
        'Do nothing if the cell is blank or contains no dots
        Else
            If InStr(xCell.Formula, " ") <> 0 Then
                CellsWithSpaces = CellsWithSpaces & ", " & Replace(xCell.Address, "$", "")
                 GoTo Nextxcell
            End If

            If InStr(xCell.Formula, "http") <> 0 Then
                Hyperstring = Trim(xCell.Formula)
            Else
                Hyperstring = "http://" & Trim(xCell.Formula)
            End If

            ActiveSheet.Hyperlinks.Add Anchor:=xCell, Address:=Hyperstring

        End If
        i = i + 1
        If i = 10000 Then Exit Sub
Nextxcell:
      Next xCell
    If Not CellsWithSpaces = "" Then
        MsgBox ("Please remove spaces from the following cells:" & CellsWithSpaces)
    End If
Application.ScreenUpdating = True
End Sub

1. Tạo một cột siêu liên kết mới tạm thời bằng công thức = HYPERLINK ()
2. Sao chép cột đó vào Microsoft Word (chỉ sao chép vào bảng tạm sau khi Word đang chạy).
3. Sao chép mọi thứ trong tài liệu từ mới (ctrl + a, sau đó ctrl + c).
4. Dán vào Excel, thay thế cột văn bản gốc. Xóa cột tạm thời với công thức.

Bạn có thể chèn công thức =HYPERLINK(<your_cell>,<your_cell>)vào ô liền kề và kéo nó dọc theo phía dưới. Điều này sẽ cung cấp cho bạn một cột với tất cả các liên kết. Bây giờ, bạn có thể chọn cột ban đầu của mình bằng cách nhấp vào tiêu đề, nhấp chuột phải và chọn Hide.

Đặt URL vào bảng HTML, tải trang HTML vào trình duyệt, sao chép nội dung của trang đó, dán vào Excel. Tại thời điểm này, các URL được bảo tồn như các liên kết hoạt động.

Giải pháp đã được đề xuất trên http://answers.microsoft.com/en-us/mac/forum/macoffice2008-macexcel/how-to-copy-and-paste-to-mac-excel-2008-a-list-of/ c5fa2890-acf5-461d-adb5-32480855e11e bởi (Jim Gordon Mac MVP) [ http://answers.microsoft.com/en-us/profile/75a2b744-a259-49bb-8eb1-7db61dae978

Tôi thấy rằng nó hoạt động.

Tôi đã có những URL này:

https://twitter.com/keeseter/status/578350771235872768/photo/1 https://instagram.com/p/ys5ASPCDEV/ https://igcdn-photos-ga.akamaihd.net/hphotos-ak-xfa1/t51 .2885-15 / 10881854_329617847240910_1814142151_n.jpg https://twitter.com/ranadotson/status/539485028712189952/photo/1 https://instagram.com/p/0OgdvyxMhW/ https://instagram.com/p

Tôi đặt chúng vào một tệp HTML (links.html) như thế này:

<table>
<tr><td><a href="https://twitter.com/keeseter/status/578350771235872768/photo/1">https://twitter.com/keeseter/status/578350771235872768/photo/1</a></td></tr>
<tr><td><a href="https://instagram.com/p/ys5ASPCDEV/">https://instagram.com/p/ys5ASPCDEV/</a></td></tr>
<tr><td><a href="https://igcdn-photos-g-a.akamaihd.net/hphotos-ak-xfa1/t51.2885-15/10881854_329617847240910_1814142151_n.jpg">https://igcdn-photos-g-a.akamaihd.net/hphotos-ak-xfa1/t51.2885-15/10881854_329617847240910_1814142151_n.jpg</a></td></tr>
<tr><td><a href="https://twitter.com/ranadotson/status/539485028712189952/photo/1">https://twitter.com/ranadotson/status/539485028712189952/photo/1</a></td></tr>
<tr><td><a href="https://instagram.com/p/0OgdvyxMhW/">https://instagram.com/p/0OgdvyxMhW/</a></td></tr>
</table>

Sau đó, tôi đã tải links.html vào trình duyệt của mình, sao chép, dán vào Excel và các liên kết đã hoạt động.

Cảm ơn bạn Cassiopeia cho mã. Tôi thay đổi mã của anh ấy để làm việc với các địa chỉ địa phương và thực hiện một số thay đổi nhỏ đối với các điều kiện của anh ấy. Tôi đã loại bỏ các điều kiện sau đây:

1. Thay đổi http:/thànhfile:///
2. Loại bỏ tất cả các loại điều kiện không gian trắng
3. Thay đổi điều kiện phạm vi ô 10k thành 100k

Sub HyperAddForLocalLinks()
Dim CellsWithSpaces As String
    'Converts each text hyperlink selected into a working hyperlink
    Application.ScreenUpdating = False
    Dim NotPresent As Integer
    NotPresent = 0

    For Each xCell In Selection
        xCell.Formula = Trim(xCell.Formula)
            If InStr(xCell.Formula, "file:///") <> 0 Then
                Hyperstring = Trim(xCell.Formula)
            Else
                Hyperstring = "file:///" & Trim(xCell.Formula)
            End If

            ActiveSheet.Hyperlinks.Add Anchor:=xCell, Address:=Hyperstring

        i = i + 1
        If i = 100000 Then Exit Sub
Nextxcell:
      Next xCell
    Application.ScreenUpdating = True
End Sub

Tôi đã có một danh sách các số được đưa vào url Tôi muốn liên kết nóng. Ví dụ: tôi có Cột A với các số câu hỏi (ví dụ: 2595692, 135171) và tôi muốn biến các số câu hỏi này thành các liên kết nóng và chỉ hiển thị các số câu hỏi.

Vì vậy, tôi đã xây dựng một siêu liên kết chỉ có văn bản trỏ đến Cột A và sao chép nó xuống cho tất cả các số câu hỏi của tôi:

= "= HYPERLINK (" & "" "http" "&" ":" "" & "" & "&" & "" "// stackoverflow.com/questions/"&A1&" "" " ")"

Sau đó, tôi sao chép - dán giá trị cột này của siêu liên kết văn bản sang cột khác.

Bạn kết thúc với một cột văn bản trông giống như sau:

= HYPERLINK ("http" & ":" & "// stackoverflow.com/questions/2595692",2595692)

Sau đó, tôi đã chọn các mục đã dán này và chạy Macro F2Entry theo sau:

Sub F2Enter()
Dim cell As Range
Application.Calculation = xlCalculationManual
For Each cell In Selection
    cell.Activate
    cell = Trim(cell)
Next cell
Application.Calculation = xlCalculationAutomatic
EndSub

Sau đó tôi đã xóa cột nhập văn bản và Cột A.

Tôi đã kết thúc với một cột số câu hỏi được liên kết nóng:

2595692

135171

Vân vân.

Chúc mừng

Nếu bạn sao chép nội dung văn bản vào một cột mới và sử dụng:

=HYPERLINK("http://"&B10,B10) 

trên cột ban đầu của bạn. Sau đó sử dụng $cho cột để nó trông như thế này:

=HYPERLINK("http://"&$B10,$B10)

Đó là cách duy nhất nó hoạt động với tôi trên Excel 2010 trên Windows 7. Bạn có thể sao chép công thức.

Đối với bất kỳ ai hạ cánh ở đây với Excel 2016, bạn chỉ cần tô sáng cột, sau đó nhấp vào Hyperlinktab nằm trên Homeruy-băng trong Styleshộp.

Chỉnh sửa: Thật không may, điều này chỉ cập nhật kiểu ô chứ không phải chức năng.

Cách dễ nhất ở đây

• Đánh dấu toàn bộ cột
• nhấp vào '' chèn ''
• nhấp vào '' Siêu liên kết ''
• nhấp vào '' địa điểm trong tài liệu này ''
• nhấp vào ok
• đó là tất cả

Cách đơn giản nhất trong Excel 2010: Chọn cột có văn bản URL, sau đó chọn Kiểu siêu liên kết từ tab Trang chủ. Tất cả các URL trong cột hiện là siêu liên kết.

Ngoài ra, nhấp đúp vào từng ô ở cuối văn bản URL và thêm khoảng trống hoặc chỉ cần nhập cũng sẽ tạo ra một siêu liên kết. Tương tự như cách bạn phải tạo liên kết URL trong email MS Outlook.

Có một cách rất đơn giản để làm điều này. Tạo một siêu liên kết và sau đó sử dụng Trình vẽ định dạng để sao chép định dạng. Nó sẽ tạo ra một siêu liên kết cho mọi mục.