Mở liên kết excel trong chrome

Laura muốn đưa một siêu kết nối vào một trang tính. Tuy nhiên, cô ấy muốn siêu liên kết "buộc" mục tiêu của URL được hiển thị trong một trình duyệt cụ thể. Chẳng hạn, cô ấy muốn siêu liên kết bằng cách nào đó xác định rằng mục tiêu được mở trong Internet Explorer

Không có cách nào để làm điều này trong Excel; . Tuy nhiên, có một cách giải quyết mà bạn có thể thử. Bạn có thể tạo một macro thực sự mở một địa chỉ mục tiêu bằng một trình duyệt cụ thể

Ví dụ: hãy xem xét macro sau. Nó tự động mở một phiên bản của Internet Explorer và mở một trang web trong trình duyệt đó

Sub LaunchIE()
    Dim IE As Object
    Set IE = CreateObject("InternetExplorer.Application")
    IE.navigate "http://excel.tips.net/"
    IE.Visible = True
    Set IE = Nothing
End Sub

Macro có thể dễ dàng được gán cho một phím tắt. Tuy nhiên, nó không quá linh hoạt khi nói đến trình duyệt nào đang được sử dụng (luôn luôn là Internet Explorer) và trang web nào được hiển thị (luôn luôn là trang ExcelTips). Bạn có thể làm cho nó linh hoạt hơn một chút theo cách này

Sub showURL(browser As String, URL As String)
    Dim pPath As String
    Dim bPath As String

    'Use this to resolve the correct program file path
    'it is different on 32-bit and 64-bit systems
    pPath = Environ("ProgramFiles")

    If browser = "Firefox" Then
        bPath = pPath & "\Mozilla Firefox\Firefox.exe"
    ElseIf browser = "IE" Then
        bPath = pPath & "\Internet Explorer\iexplore.exe"
    Else
        Exit Sub
    End If

    Call Shell(bPath & " " & URL, vbNormalFocus)
End Sub

Sub Testing()
    Call showURL("Firefox", "http://www.tips.net")
    Call showURL("IE", "http://excel.tips.net")
End Sub

Lưu ý rằng quy trình chính—showURL, quy trình thực hiện tất cả công việc—có thể hoạt động với Internet Explorer hoặc Firefox. Quy trình Kiểm tra hiển thị cách khởi chạy trình duyệt;

Khi OpenPages được đặt thành không cho phép Internet Explorer và sẽ chỉ sử dụng Chrome, các liên kết đến OpenPages trong báo cáo được lưu trong Excel sẽ không mở đúng cách, hiển thị thông báo rằng trình duyệt không được hỗ trợ

Gây ra

Excel buộc tải bản xem trước của liên kết khi được nhấp vào, sử dụng kết nối dành riêng cho IE và điều này khiến OpenPages từ chối yêu cầu. Từ chối đó được chuyển đến Chrome khi Excel cấp quyền kiểm soát yêu cầu, dẫn đến lỗi

Giải quyết vấn đề

Dường như không có bất kỳ cách giải quyết nào cho hành vi này từ Excel,

Thay vào đó, các báo cáo có thể được xuất ở định dạng HTML hoặc IE có thể được đặt lại làm trình duyệt được phép

Cũng có thể sao chép và dán URL từ Excel, URL này sẽ hoạt động bình thường

[{"Sản phẩm". {"mã số". "SSFUEU","nhãn". "IBM OpenPages with Watson"},"Đơn vị kinh doanh". {"mã số". "BU059","nhãn". "Phần mềm IBM w\/o TPS"},"Thành phần". "Không áp dụng","Nền tảng". [{"mã số". "PF025","nhãn". "Nền tảng độc lập"}],"Phiên bản". "Phiên bản độc lập","Phiên bản". "","Ngành kinh doanh". {"mã số". "LOB10","nhãn". "Dữ liệu và AI"}}]

Nó có thể phụ thuộc vào số lượng cổng bạn có, nhưng bạn có thể tạo một nút cho mỗi cổng. Đó là, tạo một hình dạng, cung cấp cho nó một số phong cách và một số văn bản (hãy sáng tạo, những nút nhỏ màu xám mặc định đó rất xấu). Tôi lưu trữ một hình dạng mẫu sang một bên (ví dụ: trong cột TTT) và sử dụng Hộp tên để nhanh chóng chuyển đến nó. Mỗi lần tôi cần một nút mới, tôi thay đổi văn bản, cắt nó, ctrl+Home vào khu vực bảng điều khiển của tôi, dán và sắp xếp nó với phần còn lại. Nếu bạn nhấp chuột phải vào một hình dạng trong excel, bạn có thể gán macro. Điều đó sẽ ngăn nhu cầu có một trình kích hoạt sự kiện riêng (có thể gây ra nhiều xung nhịp mỗi khi bạn nhấp xung quanh)

Tôi sẽ không đi sâu vào mã hóa, nhưng lệnh "Shell" trong VBA cho phép bạn khởi chạy chrome (và các ứng dụng khác). Chỉ cần xác định 2 biến chuỗi, một cho URL và một cho vị trí chương trình (biến thứ hai này có thể là một hàm công khai nên bạn không cần phải tiếp tục mã hóa nó). Quá trình này sẽ mất một chút thời gian để thiết lập nút đầu tiên và đoạn mã đầu tiên, nhưng sau đó, chủ yếu là sao chép và dán

Một mẹo nếu bạn đi theo con đường này, Để đính kèm macro vào một hình dạng (biến nó thành một nút), nó phải hiển thị. Điều này có thể làm quá tải danh sách macro của bạn một cách nhanh chóng. Vì vậy, sau khi nó được gắn vào hình dạng, hãy thay đổi macro thành "Private Sub" để giữ cho mọi thứ gọn gàng hơn

Tôi có một "Trình khởi chạy" được tích hợp trong ứng dụng cá nhân của mình. xlsb với khoảng 50 nút (cùng với bộ hẹn giờ tôi đã tạo và phần ghi chú). Toàn bộ công việc khiến tôi mất một tuần để thiết lập, từng chút một, khi quy trình làm việc bắt đầu. Cuối cùng, nó giúp tôi không phải tương tác với hệ thống tệp/thư mục và mở tất cả các tài liệu/URL/chương trình cần thiết cho một tác vụ cụ thể. Tiết kiệm TẤN thời gian (số lần nhấp) và giúp tôi ngăn nắp, hoàn toàn xứng đáng (và nếu bạn gửi cho ai đó, mọi thứ vẫn hoạt động)