توجه ! این یک نسخه آرشیو شده میباشد و در این حالت شما عکسی را مشاهده نمیکنید برای مشاهده کامل متن و عکسها بر روی لینک مقابل کلیک کنید : حاصل جمع
سلام حاصل جمع دو عدد تکس باکس و قرار گرفتن در خانه های اکسل
generalsamad
2015/12/10, 22:50
با سلام
نیاز به ایجاد پست جدید نبوده میتونستید
فایلتون رو توی همون پست قرار دهید
Private Sub CommandButton1_Click()
EmptyRow = Cells(Rows.Count, "B").End(xlUp).Row + 1
k = EmptyRow
Range("B" & k).Value = Val(TextBox1.Text) + Val(TextBox2.Text)
TextBox1.Text = ""
TextBox2.Text = ""
End Sub
فایل ضمیمه گردید
در صورت حل موضوع لطفا در پست اول تیک سبز حل شد را بزنید
vBulletin® v4.2.5, Copyright ©2000-2024, Jelsoft Enterprises Ltd.