با درود
من جدولی رو از طریق 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



کامنت