On helppo tehdä ohjelma, joka siirtää formilta emailin [email protected] Taul1 sarakkeeseen d10:stä alaspäin, mutta miten saat siihen "alleviivauksen" eli linkin, jota napauttamalla saa lähetettyä sähköpostin.
Ongelma ratkeaa, kun painaa joka solussa F2 ja enteriä. Miten teet tämän automaattisesti?
Ongelma ratkeaa, kun painaa joka solussa F2 ja enteriä. Miten teet tämän automaattisesti?
Vastaukset 2
Vanhimmat
os = "[email protected]"
ActiveSheet.Hyperlinks.Add Anchor:=Cells(rivi, sarake), _
Address:="mailto:" & os, TextToDisplay:=os
Kiitos