Good morning,
I am trying to get a single pushbutton on a form to increment cell d5 by one and also send an email with just 1 click
Sub roundedRectangle1_click()
sheet1.Range("E6"),Value=Sheet1.Range("e6").Value+1
End Sub
Sub rounded Rectangle1_Click()
Active WorkBook.SendMail Recipients:="email address", subject"Form No.1"
End Sub
But it only seems to run 1 routine only?
Any help greatly appreciated please.
Bookmarks