Hi
Below is the full code which is contained within a UserForm – I have highlighted where I’ve tried to update the code to still work with XLS Padlock: -
Private Sub cmdExport_Click()
Dim i As Integer, sht As String
Application.ScreenUpdating = False
Application.EnableEvents = False
'save...