hello
i have this code what i want after fill data and press command button on userform first show me message what i filled data based on sheet show details from col a: col e based what i writing in multiple combobox and textbox and after this it add values to column e and show another message show me what happened after sum quantity show details from column a : e then copy to sheet
Code
- Private Sub CommandButton1_Click()
- Dim LAS, i As Integer
- LAS = Cells(Rows.Count, 5).End(xlUp).Row
- With sheet1
- .Range("A" & LAS + 1) = Me.ComboBox1.Value
- .Range("B" & LAS + 1) = Me.ComboBox2.Value
- .Range("C" & LAS + 1) = Me.ComboBox3.Value
- .Range("D" & LAS + 1) = Me.ComboBox4.Value
- .Range("A" & LAS + 2) = Me.ComboBox5.Value
- .Range("B" & LAS + 2) = Me.ComboBox6.Value
- .Range("C" & LAS + 2) = Me.ComboBox7.Value
- .Range("D" & LAS + 2) = Me.ComboBox8.Value
- .Range("E" & LAS + 1) = Me.TextBox1.Value
- .Range("E" & LAS + 2) = Me.TextBox2.Value
- End With
- End Sub