Separarea numelui site-ului web sau a adresei URL de text

Sfatul trimis de: Jay Shukla

Uneori avem o situație precum:

1. Site-ul Yahoo www.yahoo.com
2. Site-ul Google www.google.com

Deci, cum separăm numele site-ului web din textul rămas.

Pasul 1.

Selectați Coloana.

Accesați opțiunea Înlocuiți din Editare

Apoi înlocuiți http:
cu (spații)… .http:

(De ex.: … = Spații)

Veți descoperi că numele noi sunt separate la distanță

Pasul 2

Mergeți opțiunea Text către coloană sub Date

și selectați opțiunea Lățime fixă

obțineți marcatorul la o anumită locație în coloana dinaintea primului nume al site-ului web din întreaga coloană

faceți clic pe următor și veți vedea că textul dinaintea numelor web este în negru

FINALIZAREA

Veți găsi numele dvs. web separate de text.

Acum, pentru a face un link Hyper:

Pasul 1

Apăsați Alt + F11

veți descoperi că se va deschide un Macro

Mergeți la Insert și apoi selectați Module

apare o altă fereastră de modul nou

Pasul 2

Copiați și lipiți formula menționată mai jos:

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

Sub MakeHyperlinks_D ()
Dim celula ca interval, Rng ca interval
Setați Rng = Range („A1: A” & Cells.Rows.Count). _
SpecialCells (xlConstants, xlTextValues)
Dacă Rng nu este nimic atunci
MsgBox „nimic în raza de acțiune”
Ieșiți din Sub
End If
Pentru fiecare celulă din Rng
Dacă Trim (cell.Value) "" Atunci
ActiveSheet.Hyperlinks.Add Anchor: = celulă, _
Adresa: = cell.Value, _
ScreenTip: = cell.Value, _
TextToDisplay: = cell.Value
End If
Următoarea celulă
Sfârșitul Sub