VBA.Mania

vbamania.pl

Dziś jest niedziela, 15 września 2024 roku.

Ustaw jako stronę startową

Ulubione

Napisz

Powrót

Powrót do serwisu

Regulamin

RSS

	tytuł wątku:
Wątki dyskusji	Hyperlink do adresu pocztowego na Userformie otwarty rozpoczął: aj postów: 6

napisał: pil postów: 154 umieszczony: 1 lipca 2005 09:54
	:D Jeszcze raz bardzo dziękuję.

napisał: aj postów: 28 umieszczony: 30 czerwca 2005 23:09
	Oto znalezione przeze mnie rozwiązanie: Niech będzie jak w Twoim przykładzie: na formularzu mamy kontolkę typu Label o nazwie oAdres i o treści będącej adresem internetowym. Piszemy taka procedurę: Kod VBA: Private Sub oAdres_Click() On Error Resume Next X = ShellExecute(hwnd, "Open" _ , "mailto:adres@costam.pl, &O0, &O0, 2) End Sub Przy czym na samym początku kodu formularza wpisujemy dodatkowo: Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long w jednej linijce lub odpowiednio z łącznikiem _ aj

napisał: admin postów: 613 umieszczony: 30 czerwca 2005 22:11
	Ja mam bardzo nieładne rozwiązanie, bo używające IE, a nie domyślnej przeglądarki internetowej systemu. Oto i one: Na formularzu mamy kontolkę typu Label o nazwie oAdres i o treści będącej adresem internetowym. Piszemy na niej procedurę zdarzeniową: Private Sub oAdres_Click() Dim WebBrowser Set WebBrowser = CreateObject("InternetExplorer.Application") WebBrowser.Navigate oAdres.Caption End Sub I już. PS. Ale to bardzo nieładne rozwiązanie.

napisał: pil postów: 154 umieszczony: 29 czerwca 2005 08:51
	:o - możesz podać ? Z góry wielkie dzięki pil

napisał: aj postów: 28 umieszczony: 28 czerwca 2005 14:10
	Dzięki już znam odpowiedź aj

napisał: aj postów: 28 umieszczony: 23 czerwca 2005 13:23
	Czy ktoś wie w jaki sposób stworzyć na Userformie linka do adresu pocztowego. Tak żeby po kliknięciu na niego otwierał mi się Outlook z adresem docelowym?

wstecz 1 dalej

wszystkich stron: 1