VBA Userform no longer populating cells in spreadsheet?

[Claire Jackson]

I had an excel workbook which had a userform in it which was working perfectly until I pointed to a new datafile. Now everything works ie bringing static data into the form but it's not populating the cells back into the excel workbook? I've attached both files for you to check what I'm doing wrong..

This is the code:

Private Sub Cmd_Access_Click()

Dim Job_Name As Variant
Dim Cur_Comp As Date
Dim ws As Worksheet
Dim What_Stage As String

Set ws = Worksheets("Sheet1")
With ws
.Range("B15").Value = Txt_Rev_Comp_Date.Text
.Range("B17").Value = Txt_Delay_Reason.Text
.Range("B19").Value = Txt_Cur_Percentage.Text
.Range("A23").Value = Txt_Job_Update.Text
.Range("A33").Value = Txt_Asbestos.Text
.Range("A37").Value = Txt_HS_Issues.Text
.Range("A41").Value = Txt_Security.Text
.Range("A47").Value = Txt_Further_Info.Text
.Range("A51").Value = Txt_Complaint.Text
.Range("H1").Value = Txt_Job_Ref.Text

 

[Claire Jackson]

This is the file it reads from (Link to file remove by moderator)

The data in weekly job updates up to cell H13 are populated from this file. All cells beneath row 13 are populated from the userform.

 

[Claire Jackson]

OK I've found the problem. Basically once the userform gets the data added if the user clicks on the validate data again it then populates the form Not sure why it doesn’t populate when only the Save & Email button is pressed.

Just not sure how to rectify it now..

 

[Anthony47]

Glad to see you are getting on to the right path...
The code behind "PDF & EMAIL" button only create a Pdf and prepare the email with that pdf attached. It does nothing to populate Sheets1 cells

I think you should refocus how the form was designed and how the workprocess copes with it

Bye

 

[Fluff]

@Claire Jackson
I have removed the link to your file in post#11 as it contains personal information.
In future please ensure all data is sanitised before posting to the board.
Thanks

 

[Claire Jackson]

All sorted now, thanks to all.