Skiller nettstedets navn eller URL fra tekst

Tipset sendt av: Jay Shukla

Noen ganger har vi en situasjon som:

1. Yahoo nettsted www.yahoo.com
2. Googles nettsted www.google.com

Så hvordan skiller vi nettstedsnavnet fra den gjenværende teksten.

Trinn 1.

Velg kolonnen.

Gå til alternativet Erstatt under Rediger

Bytt deretter ut http:
med (mellomrom)… .http:

(F.eks .: =. Mellomrom)

Du vil oppdage at vi -navnene skilles på avstand

Steg 2

Gå til alternativet Tekst til kolonne under Data

og velg alternativet Fast bredde

få markøren til et bestemt sted der i kolonnen før det første nettstednavnet i hele kolonnen

klikk på neste u vil se at teksten før nettnavn er i svart

BLI FERDIG

Du finner nettnavnene atskilt fra teksten.

Nå for å gjøre det til en Hyper -lenke:

Trinn 1

Trykk på Alt + F11

vil du oppdage at en makro åpnes

Gå til Sett inn og velg deretter Modul

et annet nytt modulvindu dukker opp

Steg 2

Kopier lim inn formelen nedenfor:

------------------------------------------------------

Sub MakeHyperlinks_D ()
Dim cell As Range, Rng As Range
Sett Rng = Range ("A1: A" og Cells.Rows.Count). _
SpecialCells (xlConstants, xlTextValues)
Hvis Rng er ingenting da
MsgBox "ingenting i rekkevidde"
Avslutt Sub
Slutt om
For hver celle i Rng
If Trim (cell.Value) "" Da
ActiveSheet.Hyperlinks.Add Anchor: = cell, _
Adresse: = cell.Value, _
ScreenTip: = cell.Value, _
TextToDisplay: = cell.Value
Slutt om
Neste celle
Slutt Sub