[حل شده] لیست باکس

[zxcvbn]

سلام بر دوستان عزیز
چندین سوال در مورد لیست باکس ذهن منو به خودش مشغول کرده:
1- چطوری میشه سطرهاو ستون های لیست باکس بصورت خط کشی باشه.مثل جدول.نه یک صفحه مطلقا سفید
2- پهنای ستون ها و سطرها رو چطوری میشه به دلخواه خودمون در بیاریم؟
3- فونت و سایز متن های لیست باکس رو چطوری میشه تنظیم کرد؟
4- اگه یه ستون شامل یسری اعداد باشه ، چطوری باشه اونا رو بصورت سه رقم سه رقم نمایش داد؟
5- چطوری میشه در یک تکس باکس مجزا، جمع اعداد اون ستون رو نمایش داد؟

خداااااااااااااااااااا ! یعنی همه اینا شدنیه؟


لطفا در صورت پاسخ به سوالات، همراه با یک فایل اکسل با مثال پاسخ داده بشه.
ممنونم

[iranweld]

با سلام

چند مورد از پاسخ سوالهای شما در کدهای ذیل میباشد

چند مورد را هم میتوانید بر روی لیست باکس راست کلیک و از properties تنظیم کنید

Private Sub UserForm_Initialize()

Z = Cells(Rows.Count, "A").End(xlUp).Row

With ListBox1

.ColumnHeads = True

.ColumnCount = 2


.ColumnWidths = "100;50"


.RowSource = "=Sheet1!A2:B" & Z

.Font.Bold = True

.BorderColor = 3

.MultiSelect = fmMultiSelectSingle

.BoundColumn = 4

End With


End Sub 

[zxcvbn]

سلام دوست خوبم
فایل نمونه رو دیدم. ولی بنظر میاد مطابق با خواسته من نبود.
مثلا جدولی مشاهده نشد و کل لیست باکس سفید مطلق بود.
اندازه ای که شما برای عرض ستون ها در نظر گرفتی ، روی همه ستون ها یکسانه.من می خوام هر ستون سایز دلخواه و جداگانه داشته باشه.
در مورد فونت که اصلا چیزی ندیدم
جمع اعداد یک ستون در تکس باکس مجزا هم مشاهده نشد.
خیلی زحمت کشیدی ولی این فایل اصلا کمکم نکرد

[abootorab]

سلام دوست خوبم
فایل نمونه رو دیدم. ولی بنظر میاد مطابق با خواسته من نبود.
مثلا جدولی مشاهده نشد و کل لیست باکس سفید مطلق بود.
اندازه ای که شما برای عرض ستون ها در نظر گرفتی ، روی همه ستون ها یکسانه.من می خوام هر ستون سایز دلخواه و جداگانه داشته باشه.
در مورد فونت که اصلا چیزی ندیدم
جمع اعداد یک ستون در تکس باکس مجزا هم مشاهده نشد.
خیلی زحمت کشیدی ولی این فایل اصلا کمکم نکرد

با درود و تشکر از جناب iranweld
دوست عزیز بعضی از مواردی که فرمودین متاسفانه امکانپذیر نیست مثل خط کشی جدول لیست باکس.
ولی مواردی که امکانپذیر بود در فایلی به عنوان نمونه آماده و ضمیمه شد.

[zxcvbn]

با تشکر از شما جناب abootorab
فایلتون خیلی خوب بود
الان دیگه تکلیفمو با vba فهمیدم
آیا نرم افزار مجزای vba که خارج از اکسل کار میشه، بازک قابلیت خط کشی رو نداره؟

[abootorab]

با تشکر از شما جناب abootorab
فایلتون خیلی خوب بود
الان دیگه تکلیفمو با vba فهمیدم
آیا نرم افزار مجزای vba که خارج از اکسل کار میشه، بازک قابلیت خط کشی رو نداره؟

با درود
دوست عزیز با Visual Studio زیاد کار نکردم، از نظر ابزاری و کدنویسی یه مقدار با vba متفاوت هست ولی تا اونجا که بنده اطلاع دارم در این مورد فکر نکنم متفاوت باشه.

[majid_mx4]

با سلام
ضمن تشکر از دوست خوبم جناب آقای abootorab

دوست عزیز
در Visual Studio هیچ محدودیتی برای جداسازی ردیفها و ستونها ندارید و میتوانید حتی رنگ آن را نیز انتخاب کنید.
بعلاوه تمامی خواسته های شما

[zxcvbn]

از لطف همگی ممنونم