Excel Forum - Porady, Pomoc,  Excel Help, Excel FAQ Strona Główna
 FAQ  RegulaminRegulamin  Szukaj   Użytkownicy   Grupy   Rejestracja   Profil   Twoje wiadomości   Zaloguj 


Poprzedni temat «» Następny temat
ID tematu: 67915 Skopiuj do schowka automatyczne usunięcie hiperłącza w komórce
Autor Wiadomość
Marcindworzan 
Stały bywalec Excelforum


Wersja: Win Office 2016
Posty: 355
Wysłany: 21-04-2020, 22:16   automatyczne usunięcie hiperłącza w komórce

Witam,
w jaki sposób mógłbym automatycznie usunąć hiperłącze w komórce np. A7 i A8, w których będą wpisywane adresy e-mail? Mam tu na myśli inny sposób niż opisany w tym temacie. Nie chciałbym ingerować w ustawienia programu Excel, gdyż plik będzie otwierany na różnych komputerach.
ID posta: 386091 Skopiuj do schowka
 
 
ąćęłńóś
ExcelSpec


Pomógł: 333 razy
Posty: 1647
Wysłany: 21-04-2020, 23:01   

Marcindworzan napisał/a:
automatycznie usunąć hiperłącze
: (
? jak automatycznie, co miałoby być wyzwalaczem tegoż usuwania ?

Kod:
Sub aaa()
    With Sheets("Arkusz1")
        '.Range("A7").Hyperlinks.Delete
        '.Range("A8").Hyperlinks.Delete
        'lub
        .Range("A7,A8").Hyperlinks.Delete
    End With
End Sub
ID posta: 386097 Skopiuj do schowka
 
 
Marcindworzan 
Stały bywalec Excelforum


Wersja: Win Office 2016
Posty: 355
Wysłany: 21-04-2020, 23:05   

Sęk w tym, że nie byłoby wyzwalacza. W takim razie nie obejdzie się bez makra.
Dziękuję.
ID posta: 386098 Skopiuj do schowka
 
 
Maciej Gonet 
Excel Expert


Wersja: Win Office 365
Pomógł: 2688 razy
Posty: 8185
Wysłany: 21-04-2020, 23:17   

Co to znaczy automatycznie? Makrem?
Przykładowo usunięcie hiperłączy z komórek, w których już są. Po zaznaczeniu:
Kod:
Selection.Hyperlinks.Delete
Można też wskazać konkretne komórki.
Wyłączenie automatycznej konwersji adresów na hiperłącza:
Kod:
Application.AutoFormatAsYouTypeReplaceHyperlinks = False
Potem przez True można przywrócić działanie standardowe. To jest ustawienie aplikacji, więc odnosi się do wszystkich otwartych skoroszytów, ale dotyczy ręcznego wpisywania, a nie kopiowania hiperłączy.
ID posta: 386100 Skopiuj do schowka
 
 
Marcindworzan 
Stały bywalec Excelforum


Wersja: Win Office 2016
Posty: 355
Wysłany: 22-04-2020, 07:01   

@Maciej Gonet rozumiem, że kod:
Kod:
Application.AutoFormatAsYouTypeReplaceHyperlinks = False

mam wstawić do TenSkoroszyt w kodzie:
Kod:
Private Sub Workbook_Open()
Application.AutoFormatAsYouTypeReplaceHyperlinks = False
End Sub

?
ID posta: 386113 Skopiuj do schowka
 
 
Maciej Gonet 
Excel Expert


Wersja: Win Office 365
Pomógł: 2688 razy
Posty: 8185
Wysłany: 22-04-2020, 07:32   

Tak, możesz tak zrobić, tylko pamiętaj, że to jest ustawienie pamiętane, więc jeśli program jest przeznaczony dla innej osoby, trzeba na koniec "posprzątać", czyli przywrócić ustawienia domyślne. Najbardziej eleganckie rozwiązanie to sprawdzenie na początku jak użytkownik miał ustawioną tę opcję, zapamiętanie tego ustawienia w zmiennej globalnej, a przy zamykaniu skoroszytu odtworzenie pierwotnej wartości.
ID posta: 386116 Skopiuj do schowka
 
 
Marcindworzan 
Stały bywalec Excelforum


Wersja: Win Office 2016
Posty: 355
Wysłany: 22-04-2020, 09:12   

Myślę, że z tym zapamiętywaniem ustawienia nie będzie problemu. Wspominany kod:
Kod:
Application.AutoFormatAsYouTypeReplaceHyperlinks = False

jak rozumiem dotyczy tylko i wyłącznie adresów email (@) lub ewentualnie stron internetowych (www / https)?
ID posta: 386126 Skopiuj do schowka
 
 
Maciej Gonet 
Excel Expert


Wersja: Win Office 365
Pomógł: 2688 razy
Posty: 8185
Wysłany: 22-04-2020, 09:43   

Tak, dotyczy wszystkich odwołań protokołów sieciowych, które domyślnie są zamieniane na hiperłącza, ale tylko tych, które są wpisywane ręcznie do komórek. Jeśli hiperłącze zostanie skopiowane z innego arkusza, to nie zostanie zmienione. Do tego jest ten drugi wariant kodu.
ID posta: 386128 Skopiuj do schowka
 
 
Marcindworzan 
Stały bywalec Excelforum


Wersja: Win Office 2016
Posty: 355
Wysłany: 22-04-2020, 11:09   

Ok, wszystko jasne. Dziękuję.
ID posta: 386134 Skopiuj do schowka
 
 
Wyświetl posty z ostatnich:   
Odpowiedz do tematu
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Nie możesz załączać plików na tym forum
Możesz ściągać załączniki na tym forum
Dodaj temat do Ulubionych
Wersja do druku

Skocz do:  

Powered by phpBB modified by Przemo © 2003 phpBB Group
Theme xandgreen created by spleen& Programosy modified v0.3 by warna
Opieka techniczna www.wip.pl

Archiwum

Strona używa plików cookies.

Kliknij tutaj, żeby dowiedzieć się jaki jest cel używania cookies oraz jak zmienić ustawienia cookie w przeglądarce.
Korzystając ze strony użytkownik wyraża zgodę na używanie plików cookies, zgodnie z bieżącymi ustawieniami przeglądarki.
Sprawdź, w jaki sposób przetwarzamy dane osobowe