Svetainės pavadinimo arba URL atskyrimas nuo teksto

Patarimą pateikė: Jay Shukla

Kartais turime tokią situaciją:

1. „Yahoo“ svetainė www.yahoo.com
2. „Google“ svetainė www.google.com

Taigi, kaip atskirti svetainės pavadinimą nuo likusio teksto.

1 žingsnis.

Pasirinkite stulpelį.

Eikite į „Redaguoti“ parinktį „Pakeisti“

Tada pakeiskite http:
su (tarpais)… .http:

(Pvz.: … = Tarpai)

Pamatysite, kad mūsų vardai yra atskirti per atstumą

2 žingsnis

Eikite į tekstą į stulpelio parinktį dalyje Duomenys

ir pasirinkite parinktį Fiksuotas plotis

nukreipti žymeklį į konkrečią vietą, kurioje yra stulpelis, prieš pirmąjį svetainės pavadinimą visame stulpelyje

spustelėkite kitą u pamatysite, kad tekstas prieš žiniatinklio pavadinimus yra juodas

BAIGTI

Rasite savo žiniatinklio pavadinimus atskirtus nuo teksto.

Dabar, kad tai būtų „Hyper“ nuoroda:

1 žingsnis

Paspauskite Alt + F11

pamatysite, kad atsidarys makrokomandos

Eikite į įterpimą, tada pasirinkite modulį

pasirodo kitas naujo modulio langas

2 žingsnis

Nukopijuokite žemiau pateiktą formulę:

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

Sub MakeHyperlinks_D ()
Pritemdyti langelį kaip diapazoną, Rng kaip diapazoną
Nustatykite Rng = Diapazonas („A1: A“ ir langeliai. Eilutės. Skaičius). _
Specialiosios ląstelės (xlConstants, xlTextValues)
Jei Rng yra nieko, tada
„MsgBox“ nieko nėra diapazone
Išeiti iš Sub
Pabaiga Jei
Kiekvienai langeliui Rng
Jei Trim (cell.Value) "" Tada
ActiveSheet. Hipersaitai. Pridėti inkarą: = ląstelė, _
Adresas: = langelis. Vertė, _
Ekrano patarimas: = ląstelė. Vertė, _
TextToDisplay: = ląstelė. Vertė
Pabaiga Jei
Kitas langelis
Pabaiga Sub