I have a sheet with in column A my e-mail adresses.
With my macro I can send an attachment to all these e-mail adresses,with one touch on a button.
Now a must make an input of the range.
Can somebody change my macro,so that automaticly the range is : A5 to the last row that is filled with an e-mail adresses.
Piece of my macro:
Dim olApp As Object, olMail As Object
Dim rngeAddresses As Range, rngeCell As Range
Set olApp = CreateObject
"Outlook.Application")
Set rngeAddresses = Application.InputBox(prompt:="Give the range of your e-mail adresses."
For Each rngeCell In rngeAddresses.Cells
Many thanks.
With my macro I can send an attachment to all these e-mail adresses,with one touch on a button.
Now a must make an input of the range.
Can somebody change my macro,so that automaticly the range is : A5 to the last row that is filled with an e-mail adresses.
Piece of my macro:
Dim olApp As Object, olMail As Object
Dim rngeAddresses As Range, rngeCell As Range
Set olApp = CreateObject
"Outlook.Application")
Set rngeAddresses = Application.InputBox(prompt:="Give the range of your e-mail adresses."
For Each rngeCell In rngeAddresses.Cells
Many thanks.