Excel i hyperlinki. Pomożecie?

[Gość: Użyszkodnik]

Stworzyłem sobie plik xls gdzie wprowadziłem 1000 adresów stron internetowych.
Te linki program automatycznie wprowadził jako zwykły tekst. Teraz jednak
chciałbym zamienić je ( najlepiej "hurtowo" ) na hyperlinki.

Czy da się to zrobić?
A może można wprowadzić np. jakieś makro, które sprawi, że tekst w określonych
komórkach będzie automatycznie wprowadzany jako hyperlinki? Może ktoś mi w tym
pomóc?

Pomożecie?






Ps. A może to się da "hurtowo" zrobić w Open Office?

[Gość: a]

Dla zaznaczonego obszaru:


Sub HyperAdd()
For Each xCell In Selection
ActiveSheet.Hyperlinks.Add
Anchor:=xCell,Address:=xCell.Formula
Next xCell
End Sub

[Gość: a]

3 i 4tą linijkę musisz złączyć po spacji.

[Gość: Gość]

Senk ju wery macz.
Tylko, że potrzebuję bardziej dokładnego wytłumaczenia.

1.Zaznaczam wszystkie komórki z linkami
2.Gdzie wklejam tą funkcję? Do tego miejsca, gdzie jest "fx" czyli "insert
function"?
A może jescze gdzie indziej?

G.

[Gość: a]

alt + F11, klikasz dwa razy na arkusz, którego ma dotyczyć formuła,
wklejasz kod, znowu alt + F11, na arkuszu zaznaczasz obszar, który ma
być skorygowany, znowu alt+F11 naciskasz "start" i gotowe.

[Gość: Użyszkodnik]

Działa!
Ogromnie dziękuje!