< návrat zpět

MS Excel


Téma: Formát buňky jako E mail adresa rss

Zaslal/a 7.4.2024 16:36

Ahojky.
Již dva dny se snažím o to, aby byl výsledek vzorce uložen jako E mailová adresa. Přikládám jednoduchý vzor. Ve skutečnosti se jedná asi o 100 sloupců a 300 řádků. Nemohu použít filtr v listu vzor, ale mohu filtr použít v listu 2. List vzor se stále mění doplňováním a mazáním jmen. Ve sloupci E je výsledek jaký bych požadoval ve sloupci B dosažen vzorcem ve sloupci B.
Bohužel jsem nenašel formát buňky jako E mail adresa.
Děkuji za každou odpověď.
Pepča

Příloha: rar56400_jmena.rar (17kB, staženo 9x)
Zaslat odpověď >

#056402
Začátečník
Jediné co mne narychlo napadá je jednorázově spustit:
Sub Email()

Dim hodnota As String
Dim i As Long

With List1
For i = 5 To .Cells(Rows.Count, 1).End(xlUp).Row
hodnota = .Cells(i, 2)
If hodnota <> Empty Then
.Hyperlinks.Add .Cells(i, 2), "mailto:" & hodnota
End If
Next i
End With

End Sub
citovat
#056407
avatar
Děkuji za odpověď. Ale potřeboval jsem aby hodnoty se změnily v listu 2 sloupec B. Možná jsem se špatně vyjádřil.
I tak děkuji za odpověď.
Pepčacitovat
#056408
elninoslov
=IF(Vzor!A4="";"";HYPERLINK("mailto:"&Vzor!C4;Vzor!C4))
=KDYŽ(Vzor!A4="";"";HYPERTEXTOVÝ.ODKAZ("mailto:"&Vzor!C4;Vzor!C4))

+ modrý a podčiarknutý font ?citovat
#056409
avatar
Děkuji to je přesně to co jsem potřeboval. Ještě jednou děkuji a smekám pane mistr.
Děkujicitovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje