با درود
من جدولی رو از طریق userform مطابق با کد زیر ایجاد کردم
درصورتی که بخوام اطلاعاتی از این فرم رو ویرایش یا حذف کنم باید از چه دستوری استفاده کنم
(جدول حاوی نام=textbox1،نام خانوادگی=textbox2 و... می باشد)
سپاس فراوان
من جدولی رو از طریق userform مطابق با کد زیر ایجاد کردم
درصورتی که بخوام اطلاعاتی از این فرم رو ویرایش یا حذف کنم باید از چه دستوری استفاده کنم
(جدول حاوی نام=textbox1،نام خانوادگی=textbox2 و... می باشد)
سپاس فراوان
کد:
Private Sub CommandButton1_Click() If TextBox1.Text = "" Then MsgBox "insert name" Exit Sub End If Dim i As Long i = Range("a" & Rows.Count).End(xlUp).Row + 1 Range("a" & i).Value = TextBox1.Text Range("b" & i).Value = TextBox2.Text Range("c" & i).Value = TextBox3.Text TextBox1.Text = "" TextBox2.Text = "" TextBox3.Text = "" End Sub
کامنت