Vihje esitas: Jay Shukla
Mõnikord on meil selline olukord:
1. Yahoo veebisait www.yahoo.com
2. Google'i veebisait www.google.com
Niisiis, kuidas me eraldame veebisaidi nime ülejäänud tekstist.
Samm 1.
Valige veerg.
Mine menüüsse Redigeeri suvand Asenda
Seejärel asendage http:
koos (tühikutega)… .http:
(Nt: … = tühikud)
Leiad, et meie nimed eraldatakse kaugele
2. samm
Minge teksti veergu suvandi Andmed all
ja valige suvand Fikseeritud laius
viige marker kindlasse kohta, kus veerus on kogu veeru esimene veebisaidi nimi
klõpsa järgmisel u näed, et tekst enne veebinimesid on must
LÕPETAMA
Leiate oma veebinimed tekstist eraldatuna.
Nüüd muutke see hüperlingiks:
Samm 1
Vajutage klahve Alt + F11
leiad, et avaneb makro
Minge sisesta ja seejärel valige Moodul
ilmub veel üks uue mooduli aken
2. samm
Kopeerige allolev valem:
------------------------------------------------------
Sub MakeHyperlinks_D ()
Hämardage rakk vahemikuna, Rng kui vahemik
Määra Rng = vahemik ("A1: A" ja lahtrid. Ridade arv). _
SpecialCells (xlConstants, xlTextValues)
Kui Rng pole midagi, siis
MsgBox "vahemikus pole midagi"
Välju sub
Lõpp Kui
Iga lahtri jaoks Rng
If Trim (cell.Value) "" Siis
ActiveSheet.Hüperlingid. Lisa ankur: = lahter, _
Aadress: = lahter. Väärtus, _
Ekraanivihje: = rakk. Väärtus, _
TextToDisplay: = lahter.Väärtus
Lõpp Kui
Järgmine lahter
End Sub
-----------------------------------------------------
ja seejärel minge faili sulgemiseks ja väljumiseks
4. samm
Minge Tööriistad> Makrod> Makrod
leiate oma veebisaidid hüperlingiga.
LIHTNE JA TOOR, AGA TÕHUS.
Jay.