پرسش سوال در مورد ساخت یوزرفرم با combobox

[اشکان لاکتنی]

سلام دوستان من یه مشکلی دارم که بدجور گیر کردم
یه فرم درست کردم که اطلاعات رو از یوزرفرم میخونه و داخل شیت اعمال میکنه
چندتا مشکل دارم
1-کمبوباکس نمیتونم فعال کنم و وقتی اعمال میشه، فیلد جستجو دیگه کار نمیکنه وقتی تو فیلد اول شماره کارجو رو میزنی جستجو میکنه و اگه ثبت شده باشه اطلاعات رو تو فیلدها مینویسه - شکل یوزر فرم هم گذاشتم
2-چطور میتونم تو یوزرفرم چند تا tab داشته باشم که هر tab تو یه شیت خاص اطلاعات رو ذخیره کنه
فایل هم که درست کردم گذاشتم میشه دوستانی که میتونید کمکم کنید
الان خیلی وقته دارم روش کار میکنم اما جواب نمیده متاسفانه
لطفا کمک کنید

[اشکان لاکتنی]

دوستان کسی نیست کمکم کنه؟

[iranweld]

دوستان کسی نیست کمکم کنه؟

با سلام

تعداد تکست باکس و نامگذاری آنها برای استفاده در حلقه یکسان نبود یعنی textbox9 وجود نداشت وتعداد textbox 17 تا معرفی شده بود که در فرم 16 تا بود
ضمنا ستون مدرک تحصیلی به انتهای جدول منتقل شد و بصورت ذیل فراخوانی شد

flag = True
            UserForm1.ComboBox1 = Range("q" & i + 1)
            For j = 2 To 16
                UserForm1.Controls("TextBox" & j).Value = Cells(i + 1, j).Value
            Next j 

[اشکان لاکتنی]

سلام و ممنونم
سوال بعدیم اینه که نمیخام combobox رو از شیت بخونه بلکه تو خود فرمول باشه فکر کنم اینطوری بود: combobox1;add item ""
میشه مدرک تحصیلی رو رو همین اعمل کنید
بعدش چطور میتونم تو یوزر فرم تو page 2 موارد رو تو یه شیت دیگه اعمال کنه و page3 تو یه شیت دیگه
بعد میتونید کاری کنید تاریخ روز رو هم بالای صفحه نمایش بده

[اشکان لاکتنی]

یعنی بتونم کمبو باکس های دیگه هم داشته باشم

[iranweld]

یعنی بتونم کمبو باکس های دیگه هم داشته باشم

برای اینکه کمبوباکس مستقیم بارگذاری شود

Private Sub UserForm_Initialize()

With ComboBox1

.AddItem "x1"
.AddItem "x2"
.AddItem "x3"
.AddItem "x4"
.AddItem "x5"

End With

End Sub 

[اشکان لاکتنی]

سلام
ممنونم از پیگیریتون
خواستم بدونم اگه textboxهای دیگ های رو بخام به Combobox تبدیل کنم باید چکارکنم؟
میشه رو فایل اکسل اجرا کنید
مثلا تو فیلد وضعیت اسخدامی-یا فیلدهای دیگه
یه سوال دیگه اگه بخوام دکمه Option button بزارم برای فیلد جنست واسه مرد یا زن چه کار باید بکنم؟

[iranweld]

ستون دیتاهایی را که میخواهید در فرم به کمبوباکس تبدیل کنید را به آخر جدول منتقل کنید. و تکست باکس آخر را حذف و تعداد تکست باکس ها را در فرمولها را یکی کم کنید

برای فیلد زن و مرد فایل پیوست را بررسی کنید

[اشکان لاکتنی]

آقا سلام
واقعا ممنونم تا اینجا تونستم پیش برم
اگر بخام کمبو باکس وابسته داشته باشم چطور میشه؟
و اگر tab2 ی.زرفرم رو بخام ای اطلاعات رو در یک شیت دیگه اعمال کنه؟
و یک موتور جستجو هم داشته باشم ؟
واقعا ممنون میشم راهنمایی کنید

[اشکان لاکتنی]

سلام
میشه به این فایل یه نگاهی بندازید واقعا ممنون میشم
Karjoo-001.xlsKarjoo-001.xls

[اشکان لاکتنی]

مشکلی که هست اینه که فیلدهایی که کمبو باکس هستش به جدول منتقل نمیشه
این رو چطور باید حل کنم؟

[iranweld]

با سلام

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

For j = 2 To 12
            
                UserForm1.Controls("TextBox" & j).Value = Cells(i + 1, j).Value
            Next j
            
            For j = 1 To 5
            
             UserForm1.Controls("Combobox" & j).Value = Cells(i + 1, j + 12).Value
             
        Next j 

[اشکان لاکتنی]

با سلام متاسفانه فیلدهایی که توسط کمبوباکس پر میشه به شیت منتقل نمیشه و فقط تکست باکس ها منتقل میشه
دلیلش چیه؟

[iranweld]

با سلام متاسفانه فیلدهایی که توسط کمبوباکس پر میشه به شیت منتقل نمیشه و فقط تکست باکس ها منتقل میشه
دلیلش چیه؟

ثبت میشود، فیلم پیوست را ملاحظه کنید

[اشکان لاکتنی]

ممنونم حل شد
سوال بعدیم اینه که اگه بخاوم تب 2 بره تو یه شیت دیگه اعما بشه چکار باید بکنم؟