Transfering Data From Userform To Sheet Under Relevant Column And Row

[bakerman]

But that part of code is still in your Userform_Initialize procedure so it will always throw an error when starting-up your UF.
The way you filled in your sheets is also wrong. I suppose you will have to use the value of your Lenticular set -object to write to the correct sheet.
It will become something like this

    With Sheets(ComboBox2.Value)
    lngCol = .Rows("2:2").Find(What:="SET " & ComboBox2.Text, LookAt:=xlWhole).Column
       With .Cells(.Rows.Count, lngCol).End(xlUp).Offset(1)
            .Resize(, 6) = Array(ComboBox1.Value, ComboBox3.Value, ComboBox4.Value, ComboBox5.Value, TextBox1.Text, TextBox2.Text)
        End With
    End With