Làm sao kiểm tra hyperlink có mở được không?

[atuan45clc]

Chào các bác,

Em có 1 bảng Excel như sau:

Cột Hyperlink là hàm lấy giá trị của các cột trước.
Tùy vào các folder lưu trên máy tính mà có dòng có Hyperlink, dòng bị lỗi như sau:


Em muốn hỏi có các nào check được ô nào Hyperlink bị lỗi hay không mà kg cần phải kích vào đường dẫn đó ạ?

 

[ndu96081631]

Chào các bác,

Em có 1 bảng Excel như sau:

View attachment 194150 Cột Hyperlink là hàm lấy giá trị của các cột trước.
Tùy vào các folder lưu trên máy tính mà có dòng có Hyperlink, dòng bị lỗi như sau:

View attachment 194151
Em muốn hỏi có các nào check được ô nào Hyperlink bị lỗi hay không mà kg cần phải kích vào đường dẫn đó ạ?

Cái này phải dùng code VBA mới làm được! Bạn thấy sao?

 

[be_09]

Chào các bác,

Em có 1 bảng Excel như sau:

Cột Hyperlink là hàm lấy giá trị của các cột trước.
Tùy vào các folder lưu trên máy tính mà có dòng có Hyperlink, dòng bị lỗi như sau:

Em muốn hỏi có các nào check được ô nào Hyperlink bị lỗi hay không mà kg cần phải kích vào đường dẫn đó ạ?

Hỏi 1 câu, khi đọc xong chẳng hiểu bạn muốn cái gì luôn.
Nhìn cột cột F thấy có Link thì nghĩ ngay đến việc dùng hàm Hyperlink, khi click vào link để mở File. nếu đúng vậy thì tham khảo cách làm trong File.
- F1 là nơi chứa đường dẫn Folder chứa File muốn tạo Hyperlink.
- Cột E là tên File chứa trong Folder đó.

Lưu ý: Cuối Link là đuôi File cần tạo Hyperlink, trong File tôi dùng Link đến File PDF, nếu File bạn muốn Link là File Word thì đổi đuôi File.

 

[batman1]

Lưu ý: Cuối Link là đuôi File cần tạo Hyperlink, trong File tôi dùng Link đến File PDF, nếu File bạn muốn Link là File Word thì đổi đuôi File.

Người ta có link tới thư mục chứ không phải link tới tập tin.

Mà người ta hỏi vấn đề khác hoàn toàn. Là không nhấn vào link mà vẫn biết là "thư mục nào đó tồn tại hay không tồn tại"

 

[be_09]

Người ta có link tới thư mục chứ không phải link tới tập tin.
Mà người ta hỏi vấn đề khác hoàn toàn. Là không nhấn vào link mà vẫn biết là "thư mục nào đó tồn tại hay không tồn tại"

Trước khi trả lời Tôi có nêu câu này (Hỏi 1 câu, khi đọc xong chẳng hiểu bạn muốn cái gì luôn).
Có nghĩa: Tôi chỉ hiểu bạn ấy muốn nối các chuổi để tạo Hyperlink và làm sao để tạo Hyperlink mà không bị lỗi. Vì vậy, tôi đưa File lên để bạn ấy hiểu làm thế nào để tạo Hyperlink cho đúng, nếu chưa đúng thì chủ Topic sẽ tự khắc la làng lên và nêu vấn đề cụ thể hơn.

 

[atuan45clc]

Cái này phải dùng code VBA mới làm được! Bạn thấy sao?

Dạ, em mù tịt VBA, bác có thể chỉ giáo thêm kg ạ?

Người ta có link tới thư mục chứ không phải link tới tập tin.

Mà người ta hỏi vấn đề khác hoàn toàn. Là không nhấn vào link mà vẫn biết là "thư mục nào đó tồn tại hay không tồn tại"

Cái em cần đúng như ý bác này ạ. Vì có rất nhiều dòng nên em kg muốn kiểm tra từng hyperlink một. Hyperlink này chỉ dẫn đến thư mục thôi, kg dẫn đến từng file. Trong tạo thư mục con có thể bị lỗi nên hyperlink bị lỗi. Khi kích Hyperlink báo lỗi sẽ biết được để sửa các thư mục con. Em chú thích hơi kém nên các bác thông cảm ạ.

 

[be_09]

Nói chung chẳng cần kiểm tra cái gì cả, chỉ kiểm tra lại cách thực hiện để tạo Hyperlink, nếu làm đúng thì di chuyển được đến đó, nếu làm sai thì bị lỗi và không di chuyển được.
Có nghĩa là cách làm của bạn ở bài 1 để tạo Hyperlink là chưa đúng cách nên bị lỗi (chỉ có vậy thôi), tham khảo File bài 3 là làm được theo cách thủ công.
Còn cái hình này là sử dụng VBA (A tên Folder cha, B tên Folder con, nếu có cháu thì cột C ) nghĩa là có thể tạo Hyperlink đến tất cả Folder, tất cả các File trong từng Folder đó. Nhưng bạn chờ 2 người bạn trích dẫn giúp cho.

 

[quanluu]

Chào các bác,

Em có 1 bảng Excel như sau, cột G có chữ OK là thư mục cột F tồn tại và có thể click vào đó để mở

View attachment 194150 Cột Hyperlink là hàm lấy giá trị của các cột trước.
Tùy vào các folder lưu trên máy tính mà có dòng có Hyperlink, dòng bị lỗi như sau:

View attachment 194151
Em muốn hỏi có các nào check được ô nào Hyperlink bị lỗi hay không mà kg cần phải kích vào đường dẫn đó ạ?

Bạn dùng code sau

Sub check()
    Dim i As Integer
    Set fso = CreateObject("Scripting.FileSystemObject")
    For i = 2 To Range("F" & Rows.Count).End(3).Row
        If fso.FolderExists(Cells(i, 6)) Then
            Cells(i, 7) = "OK"
        End If
    Next
End Sub

 

[ndu96081631]

Bài trên tôi nêu vầy: đưa File lên để bạn ấy hiểu làm thế nào để tạo Hyperlink cho đúng.
Có nghĩa là cách làm của bạn để tạo Hyperlink là chưa đúng cách nên bị lỗi (chỉ có vậy thôi), tham khảo File bài 3 là làm được theo cách thủ công.
Còn cái hình này là sử dụng VBA (A tên Folder cha, B tên Folder con, nếu có cháu thì cột C ) nghĩa là có thể tạo Hyperlink đến tất cả Folder, tất cả các File trong từng Folder đó. Nhưng bạn chờ 2 người bạn trích dẫn giúp cho.

View attachment 194162

Tức là vầy nè anh: file có sẵn, link cũng đã tạo trước đó rồi. Giờ người ta muốn biết link nào còn "sống" link nào đã "chết". Chỉ vậy thôi chứ người ta không cần cách tạo ra link đâu anh.
Dạng bài này em nhớ không lầm đã làm lâu lắm rồi, để trưa rảnh sẽ gửi lên

 

[ndu96081631]

Bạn dùng code sau

Sub check()
    Dim i As Integer
    Set fso = CreateObject("Scripting.FileSystemObject")
    For i = 2 To Range("F" & Rows.Count).End(3).Row
        If fso.FolderExists(Cells(i, 6)) Then
            Cells(i, 7) = "OK"
        End If
    Next
End Sub

Code này chẳng liên quan gì đến hyperlink cả

 

[quanluu]

Code này chẳng liên quan gì đến hyperlink cả

Nếu thư mục tồn tại thì hyperlink cho thư mục đó sẽ mở được chứ anh

 

[be_09]

Tức là vầy nè anh: file có sẵn, link cũng đã tạo trước đó rồi. Giờ người ta muốn biết link nào còn "sống" link nào đã "chết". Chỉ vậy thôi chứ người ta không cần cách tạo ra link đâu anh.
Dạng bài này em nhớ không lầm đã làm lâu lắm rồi, để trưa rảnh sẽ gửi lên

Nói chung là do cách làm, nếu làm đúng thì Link sống, nếu làm không đúng thì Link chết, chứ anh chẳng cần kiểm tra từng cái Link làm chi cho mất công, nếu có vài trăm dòng không lẽ đi kiểm tra từng cái.
Anh chỉ kiểm tra và sửa cái Link đầu tiên, nếu di chuyển được đến cái Folder đó là Link sống, sau đó Fill xuống là có tất cả các Link đến Folder (chỉ trừ khi gõ nhập tên Folder sai). Vậy tốt nhất là dùng VBA, nó tự lấy tên Folder và tạo Hyperlink.

 

[ndu96081631]

Nếu thư mục tồn tại thì hyperlink cho thư mục đó sẽ mở được chứ anh

Nếu tôi gõ chuỗi "NDU" vào 1 cell rồi tạo hyperlink cho cell đó thì bạn tính sao? Hàm của bạn khi ấy chỉ nhìn thấy "NDU" chứ có thấy đường dẫn nào đâu mà biết sống hay chết?
Ngoài ra đã gọi là hyperlink thì nó cũng có thể link đến cell trong file chứ không hẳn là link ra bên ngoài đâu.
Nói chung là không biết được

 

[hoanganhvo2612]

Nếu tôi gõ chuỗi "NDU" vào 1 cell rồi tạo hyperlink cho cell đó thì bạn tính sao? Hàm của bạn khi ấy chỉ nhìn thấy "NDU" chứ có thấy đường dẫn nào đâu mà biết sống hay chết

...

 

[ndu96081631]

Theo dữ liệu của bạn ấy thì hiển thị chính là tên thư mục mà anh, vì em thấy có hàm hyperlink. Còn nếu chữ hiển thị không phải là thư mục cần hyperlink thì cần phải tìm đường dẫn cụ thể của nó. Em sẽ xem xét thêm vấn đề này.

Các bạn có thể viết code để giải quyết một vấn đề cụ thể nào đó, còn tôi thì thích giải pháp tổng quát. Tuy không dám chắc đáp ứng được 100% trường hợp nhưng ít ra sẽ phục cho cho đa số mọi người
Chỉ vậy thôi!

 

[hoanganhvo2612]

Các bạn có thể viết code để giải quyết một vấn đề cụ thể nào đó, còn tôi thì thích giải pháp tổng quát. Tuy không dám chắc đáp ứng được 100% trường hợp nhưng ít ra sẽ phục cho cho đa số mọi người
Chỉ vậy thôi!

Em thấy có function này, không biết có được không anh?

Function HyperLinkText(rg As Range)
Dim sFormula As String, S As String
Dim L As Long
Dim H As Hyperlink, HS As Hyperlinks

sFormula = rg.Formula
L = InStr(1, sFormula, "HYPERLINK(""", vbBinaryCompare)
If L > 0 Then
S = Mid(sFormula, L + 11)
S = Left(S, InStr(S, """") - 1)
Else
Set HS = rg.Worksheet.Hyperlinks
For Each H In HS
If H.Range = rg Then
S = H.Address
End If
Next H
End If

HyperLinkText = S

End Function

 

[atuan45clc]

Tức là vầy nè anh: file có sẵn, link cũng đã tạo trước đó rồi. Giờ người ta muốn biết link nào còn "sống" link nào đã "chết". Chỉ vậy thôi chứ người ta không cần cách tạo ra link đâu anh.
Dạng bài này em nhớ không lầm đã làm lâu lắm rồi, để trưa rảnh sẽ gửi lên

Do folder con trong máy tính bị lập sai nên em cần tìm xem hyperlink nào chết để sửa các folder con trong máy tính. Chả lẽ ngồi check từng dòng một.

Nói chung là do cách làm, nếu làm đúng thì Link sống, nếu làm không đúng thì Link chết, chứ anh chẳng cần kiểm tra từng cái Link làm chi cho mất công, nếu có vài trăm dòng không lẽ đi kiểm tra từng cái.
Anh chỉ kiểm tra và sửa cái Link đầu tiên, nếu di chuyển được đến cái Folder đó là Link sống, sau đó Fill xuống là có tất cả các Link đến Folder (chỉ trừ khi gõ nhập tên Folder sai). Vậy tốt nhất là dùng VBA, nó tự lấy tên Folder và tạo Hyperlink.

Vấn đề là làm sao tìm đc các folder bị lỗi bác ạ?

 

[be_09]

Do folder con trong máy tính bị lập sai nên em cần tìm xem hyperlink nào chết để sửa các folder con trong máy tính. Chả lẽ ngồi check từng dòng một.

Vấn đề là làm sao tìm đc các folder bị lỗi bác ạ?

Tôi đã nêu rõ tại bài 12: Chỉ kiểm tra và sửa cái Link đầu tiên, nếu di chuyển được đến cái Folder đó là Link sống, sau đó Fill xuống là có tất cả các Link đến các Folder (chỉ trừ khi gõ nhập tên Folder sai).

 

[atuan45clc]

Tôi đã nêu rõ tại bài 12: Chỉ kiểm tra và sửa cái Link đầu tiên, nếu di chuyển được đến cái Folder đó là Link sống, sau đó Fill xuống là có tất cả các Link đến các Folder (chỉ trừ khi gõ nhập tên Folder sai).

Có lẽ anh vẫn chưa hiểu yêu cầu của em. Công thức hyperlink đúng nhưng folder tạo sai nên báo lỗi. Em cần biết link nào bị lỗi mà kg phải check từng dòng một.

 

[quanluu]

Do folder con trong máy tính bị lập sai nên em cần tìm xem hyperlink nào chết để sửa các folder con trong máy tính. Chả lẽ ngồi check từng dòng một.

Vấn đề là làm sao tìm đc các folder bị lỗi bác ạ?

Bạn clik shape Run và chạy xem thế nào