Transfer Userform Data to Cells on Worksheet

Hello! I have been working on a spreadsheet, and teaching myself vba a bit in the process.
I have been able to get the basics of what I was trying to accomplish, which is to track projects, and have column a change color to represent
each stage of the project, as the proper field is completed going across the row.

I realized that this will get to be cumbersome, and decided it would be best to use a userform for entering new projects. I have spent hours today watching youtube tutorials, reading through web sites, and just cannot seem to figure out where to start.

I have attached the file to this post. Would anyone be kind enough to help me out? Once I learn something, I am very good at making the correlations and being able to adapt it, it just seems there are not a ton of well done tutorials on how to do this, rather more that show you an example that does not translate well into a different project.

Any help would be greatly appreciated

.
This is a sample that is fully functional. You can easily adapt the code to meet your project.

Option Explicit
Private Sub btnCancel_Click()
    Unload Me
End Sub

Private Sub btnOK_Click()
    Dim ws As Worksheet
    Set ws = ActiveSheet
    Dim newRow As Long
    
    newRow = Application.WorksheetFunction.CountA(ws.Range("A:A")) + 1
    
    'The next two lines can be expanded as many times as needed for all the entry fields in your project
    
    ws.Cells(newRow, 1).Value = Me.txtFirstName.Value
    ws.Cells(newRow, 2).Value = Me.txtSurname.Value
    
End Sub
Sub CommandButton1_Click()
    Selection.EntireRow.Delete
End Sub

Download Sample Workbook : https://www.amazon.com/clouddrive/sh...VuDU7hFlFDiXy9

could you please tell me what the A:A is referencing in the line below?

newRow = Application.WorksheetFunction.CountA(ws.Range("A:A")) + 1

.

Option Explicit

Private Sub CommandButton1_Click()
    Dim ws As Worksheet
    Set ws = ActiveSheet
    Dim newRow As Long
    
    newRow = Application.WorksheetFunction.CountA(ws.Range("B:B")) + 1
    
    'The next two lines can be expanded as many times as needed for all the entry fields in your project
    
    ws.Cells(newRow, 2).Value = Me.TextBox1.Value
    ws.Cells(newRow, 3).Value = Me.TextBox2.Value
    ws.Cells(newRow, 4).Value = Me.TextBox3.Value
    ws.Cells(newRow, 5).Value = Me.TextBox4.Value
    ws.Cells(newRow, 6).Value = Me.ListBox1.Value
    ws.Cells(newRow, 7).Value = Me.TextBox6.Value
    ws.Cells(newRow, 8).Value = Me.TextBox6.Value
    
End Sub

See the attached as I had to recreate your main sheet so you can add data via the UserForm.

Logit has been a tremendous help with this!

I do have a small problem remaining. It appears that my data is being placed in Column A, when it needs to be in Column B. Looking at the code, I cannot see why? Can you take a quick peak and possibly see the problem?

Also, it appears that my vba for the color changing of the project status is now not working. Could this be a conflict with the code? (Screenshot attached)

Thanks so much! I've got the form working, but now have 2 small issues that have popped up with data populating in column A, instead of Column B, as well my vba to change colors of column A on the change of project status is no longer working, which i believe is a result of the wrongful poplation in column A. Screenshot and file attached below. Do you have any advice on this?

.
Notice that the code begins with Col 2 :

    ws.Cells(newRow, 2).Value = Me.TextBox1.Value
    ws.Cells(newRow, 3).Value = Me.TextBox2.Value
    ws.Cells(newRow, 4).Value = Me.TextBox3.Value
    ws.Cells(newRow, 5).Value = Me.TextBox4.Value
    ws.Cells(newRow, 6).Value = Me.ListBox1.Value
    ws.Cells(newRow, 7).Value = Me.TextBox6.Value
    ws.Cells(newRow, 8).Value = Me.TextBox6.Value

A = 1
B = 2
C = 3
etc
etc

I am getting there! It stinks to be trying to learn this at 48 years old
I have fixed that issue, but am still left with my VBA not working for the color changing Status, which is the main purpose.
Is there anything obvious as to why it doesn't work with the user form?

.
If you are working with the last workbook I posted, some of the coding you have within the workbook was either moved or edited in order for the UserForm to work correctly.
You will need to re-enter the code and correct any flaws so the Color Coding and the UserForm can work without error.

Well that's not good. I don't have the skill set to figure that out just yet, so I will go back to using it without the user form until I can get it going. Sidenote: As useful as vba is in excel, i wish there were some classes available to learn it locally. Thank you for all of your help. You have been tremendous.

.
You mentioned you are 48 years old. I'm 70. Been learning VBA for two years. It is a hurdle at first but with perseverance everything begins to make sense. And there is
always a learning curve. It never ends.

Google and the Forum Boards are your friends. I found Google at first to be most helpful. And when entering a search criteria ... using key words instead of whole or partial sentences seems
to work best.

Example : "How do I get data from a User Form to be entered on the sheet starting in Column A on Row 13 ?"

That can be reduced to : TextBox Data, User Form, Row X

Stick with it. If you are like me, finding the solution is a challenge ... like a puzzle that needs to be solved. I simply MUST solve this challenge.

Cheers.