With Office 365, it’s your data and your responsibility to protect it. NEW Veeam Backup for Microsoft Office 365 eliminates the risk of losing access to your Office 365 data.
Private Sub tbxActivity_AfterUpdate() Dim lngDays As Long Dim strMeActivity As String Dim strWhere As String On Error GoTo UnknownActivity lngDays = DLookup("[NormalDaysRequired]", "tblActivities", "Description = '" & Me![Activity] & "'") tbxDateToComplete = tbxDateCreated + lngDays End GoTo Completed UnknownActivity: tbxDateToComplete = tbxDateCreated + 1 Completed: End Sub
Join the community of 500,000 technology professionals and ask your questions.