एक्सेल VBA - इससे पहले कि

Question

बचाने

मैं अपने मैक्रो कॉल करने के लिए बस से पहले मैं अपने दस्तावेज़ को बचाने पर चारों ओर देख रहा है चलाने के लिए मैक्रो। मैंने यह पाया, लेकिन जब मैंने अपना कोड अंदर रखा, तो यह कुछ भी नहीं करता है। तो मुझे लगता है कि मुझे कुछ याद आ रहा है।

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) 

Set shtVO = Sheets("Voice orders") 
endRowVO = shtVO.Range("E" & Rows.Count).End(xlUp).Row 

For Row = 11 To endRowVO 
    If IsEmpty(shtVO.Cells(Row, 23).Value) = False Then 
     If shtVO.Cells(Row, 3).Value <> shtVO.Cells(Row, 23) Then 
      If shtVO.Cells(Row, 1).Value Like "*MIG*" Then 
      Else 
       shtVO.Cells(Row, 1).Value = shtVO.Cells(Row, 1).Value + "MIG" 
      End If 
     End If 
    End If 
Next Row 

End Sub 

Answer 1

प्लेस ThisWorkbook मॉड्यूल