How can I have an email automatically sent to me if two conditions occur?

I am trying to create a macro that will help notify me when a "safe launch" period has ended in our manufacturing facility. The safe launch just means we sample more during the initial roll out of new parts. To be considered safely launched, a part number must be ran for 6 months and for 10 separate orders. My spreadsheet consists of rows that are headed by the part number. The column headers are the date that the part numbers were first ran and the numbers 1-10. As an order for a specific part number is successfully ran, the operator will type an X in the next column. Once the 10th X is marked down and the initial date is 6 months old, I would like to receive an email saying that the part has met the safe launch requirements and I can cut back on the sampling plan. Right now I have the spreadsheet conditionally formatted so that if the date is 180 days ago and the 10th column has an X in it, the entire row turns green. I have tried to find examples of similar situations online but have not been successful. Does anyone know how one would go about doing this? The goal is to send an email when two conditions are met. The conditions are a date being older than 6 months and an X is typed in the 10th column. Spreadsheet attached.

You could use this code that check situaation and send email before than you close the workbook.
The code put the word 'sent' in M column to indicate that email has been sent and it's not necessary to send another time.
To use the code right click on the name of your worksheet in the bottom, paste the code and then click on Tools menu, choose Reference and select Microsoft Outlook xx.x Object Library.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
   Dim objOutlook As Object
   Dim objMailMessage As Outlook.MailItem
   Dim emlBody, ctr As Integer
   Dim r As Long, lastRow As Long
   Dim c As Integer, mySh As Worksheet
   
   Set objOutlook = CreateObject("Outlook.Application")
   Set mySh = ThisWorkbook.ActiveSheet
   
   Application.ScreenUpdating = False
   
   lastRow = mySh.Cells(Rows.Count, 1).End(xlUp).Row
   For r = 2 To lastRow
      ctr = 0
      If mySh.Cells(r, 2) <= Int(Now()) - 180 And mySh.Cells(r, "m") = "" Then
         For c = 1 To 10
            If mySh.Cells(r, c + 2) <> "" Then
               ctr = ctr + 1
            End If
         Next c
      End If
      If ctr = 10 Then
         mySh.Cells(r, "m") = "sent"
         'send email
         Set objMailMessage = objOutlook.CreateItem(0)
      
         With objMailMessage
            'Mail address:    
            .To = "myEmail.com"

            'Mail body:
            .Body = "Part number: " & mySh.Cells(r, 1) & " is safely launched, " _
               & "it started on date: " & mySh.Cells(r, 2) _
               & ", " & Int(Now()) - mySh.Cells(r, 2) & " days ago."

            'Mail subject:
           .Subject = "Part number " & mySh.Cells(r, 1) & " is safely launched."

           'to show email
           '.Display

           'to send email
           .Send         '.Attachments.Add ActiveWorkbook.FullName
        End With
     End If
   Next
   Application.ScreenUpdating = False
End Sub

Regards,
Antonio

On my computer it works, and if you delete apostophe in front of .Display and put apostophe in front of .Send you will see the email so you can check it before to send. I'm sorry that it doesn't work in your computer... do you usually use Outlook as mail client?
Regards,
Antonio