
Sub CreaMail()
Const Url1 = "h t t p s://mail.google.com/mail/u/0/#inbox?compose=14a1adbfa31dabd8"
Dim ChromePath As String
ChromePath = """C:Program Files (x86)GoogleChromeApplicationchrome.exe"""
Shell (ChromePath & Url1 & NomeImmagine)
End Sub
|
