PDA

توجه ! این یک نسخه آرشیو شده میباشد و در این حالت شما عکسی را مشاهده نمیکنید برای مشاهده کامل متن و عکسها بر روی لینک مقابل کلیک کنید : [حل شده] کدی که بتونم بجای این استفاده کنم چیهRange("ao1").Cells(x, 1) = CLng(TextBox11)


mehey
2015/09/05, 12:00
کدی که بتونم بجای این استفاده کنم چیه

Range("ao1").Cells(x, 1) = CLng(TextBox11)
مشکل اینه که وقتی از این کد استفاده می کنم باید همه تکس باکس هایی که این کد رو دارن پر باشه ولی من نیاز ندارم همه تکس باکسها تکمیل بشه
با تشکر
mehey
2015/09/05, 13:21
On Error GoTo ErrorHandler
Range("ev1").Cells(x, 1) = CLng(TextBox54)
Exit Sub
ErrorHandler:
Resume Next
مشکلم برطرف شد اومدم خطاشو با این کد غیر فعال کردم