從單元格創建一個範圍對象功能

最有可能是一個非常簡單的解決方案，但我正在瘋狂地嘗試所有不同的範圍和單元格組合以解決此問題。從單元格創建一個範圍對象功能

基本上我試圖添加一個超鏈接到被動態選擇的單元格。

這工作不錯，我結束了，像這樣的細胞相互作用：

ActiveSheet.Cells（1，colnum）「colNum從Application.Match

採取

現在我要將超鏈接添加到那個小區。從我在網上看到的所有例子中，你需要添加它像這樣：

If vItm = "Ticket No" Then 
With ActiveSheet 
    ref = .Cells(2, colNum).Address 
    .Hyperlinks.Add Anchor:=**Range(ref)**, Address:="URLGOESHERE=" & dict(vItm), _ 
     TextToDisplay:=dict(vItm) 
    End With 
End If

我認爲這是失敗的部分是錨：=因爲它需要一個範圍對象。我找不到使用單元格（2，colNum）作爲範圍對象的方法。我試過「。地址」，這是我的希望，但仍然失敗。

請把我從痛苦中解脫出來，教育我！

錯誤是「無效的過程調用或參數」

來源

2017-09-22 Chris

錯誤不在您的主播中。使用您的設置我成功創建了一個鏈接到Google：'.Hyperlinks.Add Anchor：= Range（ref），Address：=「https://www.google.com/」，_ TextToDisplay：=「google」' –

感謝斯科特，出於某種原因完全洞察了Anchor。這是我試圖加入字符串與＆而不是+ ...唉！ – Chris

正在使用的與僅在ActiveSheet，不在該範圍部分。
嘗試：

If vItm = "Ticket No" Then 
    ref = ActiveSheet.Cells(2, colNum).Address 
    With ActiveSheet.Cells(2, colNum) 
     .Hyperlinks.Add Anchor:=ref, Address:="URLGOESHERE=" & dict(vItm), _ 
     TextToDisplay:=dict(vItm) 
    End With 
End If

來源

2017-09-22 16:14:18 Cyril

似乎沒有任何區別。我確實嘗試了將它在With下移動，不知道它是如何結束在之前。 – Chris

@Chris接受你的編輯並更改Anchor以特定顯示「ref」。 – Cyril

感謝Cyril。看起來問題在於連接的URL失敗，而不是範圍！我想尖叫......花費比我更關心的承認嘗試使這項工作。謝謝你的幫助 – Chris

從單元格創建一個範圍對象功能

回答

相關問題