Activare Hyperlink

[Hexman]

Salutare,

Prin Data -> New Query->From Web, import in fisierul excel, valori dintr-un fisier php.
Intr-o coloana returnez valori de tipul =HYPERLINK("....";"link") insa nu sunt functionale link-urile decat dupa ce aplic pe respectiva coloana un replace de "=".
Cum as putea activa hyperlink-urile fara a mai fi nevoie sa fac un artificiu de inclocuire a semnului "=" tot cu "=".

M-am gandit la un macro

Cod: Selectaţi tot

Columns("C:C").Select
    Selection.Replace What:="=", Replacement:="=", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False

insa nu stiu cum sa il execut la fiecare refresh al tabelului.

Multumesc!

[Indigo-ONE]

Putine informatii...

poti incerca cu:

thisworkbook.refreshall

sau refresh la toate tabelele, ceva de genul:

Cod: Selectaţi tot

Sub RefreshTabel()
Dim tbl as Excel.ListObject
For Each tbl In Worksheets("numeFoaie").ListObjects
tbl.QueryTable.Refresh BackgroundQuery:=False
Next 
Set tbl = Nothing
End Sub

[Indigo-ONE]

Dublura...
Rog un moderator sa stearga aceasta postare