محصول به سبد خرید شما اضافه شد.
پنل کاربری
0
0

باسلام بنده حدود ۱۵شیت کاری دارم میخواستم یک یوزرفرم طراحی کنم برای درج اطلاعات توی آنها بدون باز کردن شیت ها یعنی یک یوزرفرم برای همه‌ی ۱۵تا شیت مثلا وقتی اطلاعات رو توی یوزرفرم ثبت میکنم با وارد کردن کد پرسنلی در تکست باکس مربوطه همه اطلاعات یوزرفرم بازدن دکمه ثبت منتقل بشه به شیت مربوط به آن کد پرسنلی

به اشتراک گذاشتن
  • شما باید برای ارسال دیدگاه شوید
فیلتر
مرتب‌سازی بر اساس: بیشترین رأی
ارسال پاسخ
0
0

سلام علي

با فرض اينكه نام شيت هاي شما همان كدهاي پرسنلي و نام تکس باکس مربوط به کد پرسنلی در یوزرفرم txt_P_Code باشد. در رویداد مربوط به دکمه ثبت این کد ها را بنویسید

     Dim sht_Name As String

     sht_Name = Me.txt_P_Code.Text

    With Worksheets(sht_Name)

             .Range(“A1”) = Me.txt_Name.Text

    End With

 

فايل پیوست را ببینید

بارگزاری فایل
userform_Sheet1.ir.xlsm
  • شما باید برای ارسال دیدگاه شوید
نمایش 1 نتیجه
پاسخ شما
نویسنده مهمان
اگر حساب کاربری دارید . در هر صورت می توانید به عنوان کاربر مهمان سوال یا پاسخ خود را ارسال نمایید
نام*
ایمیل*
بارگزاری فایل
نام فایل اندازه
در حال حاضر هیچ فایلی بارگذاری نشده است.
حداکثر تعداد فایل ها 4، حداکثر اندازه فایل 2MB.
فرمت های فایل پشتیبانی شده: txt pdf zip jpg png jpeg xlsx xlsm

محصولات

مطالب پربازدید

keyboard_arrow_up