تنظیم هدر در لیست باکس

Collapse
X
Collapse
 
  • صفحه از 1
  • زمان
  • نمایش
حذف همه
new posts
قبلی template بعدی
  • saber2q

    • 2012/04/13
    • 90
    #1

    تنظیم هدر در لیست باکس

    سلام
    من برای لیست باکسم میخوام با استفاده از دستور Column Head عنوان سر ستون ها رو تنظیم کنم و برای این کار از دستور زیر استفاده کردم:
    کد:
    ListBox2.RowSource = Sheet3.Range("a1:e1").Name
    اما این دستور اجرا نمیشه ولی وقتی به جای name از address استفاده میکتم (مانند دستور زیر):

    کد:
    ListBox2.RowSource = Sheet3.Range("a1:e1").address
    کد اجرا میشه ولی خب آدرس ستونها (column A - Column B -...) نوشته میشه، آیا راهی هست که آدرس ستون ها را با نام دلخواه مشخص کنم؟ یا با چه روشی میتونم برای نام ستون های لیست باکسم از نام های مورد نظر خودم استفاده کنم؟
    لطفا پشنهاد استفاده از لیبل رو ندید چون مناسب کارم نیست.

    با تشکر
    برچسب ها: هیچ‌کدام
    • MEYTI

      • 2010/11/11
      • 362
      #2
      RE: تنظیم هدر در لیست باکس

      سلام دوست عزيز شما با دستور RowSource منبع ديتاي ليست باكستو مشخص ميكني نه هدرتو
      ولي اگه تو همين كد، رنجتو از A2 شروع كني سطر اولو به عنوان هيدر در نظر ميگيره مثل كد زير
      کد:
      ListBox1.RowSource = Sheet3.Range("a2:e10").Address
      [B][COLOR=#000080]مهدی کریمی[/COLOR][/B]

        کامنت

        • saber2q

          • 2012/04/13
          • 90
          #3
          RE: تنظیم هدر در لیست باکس

          نوشته اصلی توسط MEYTI
          سلام دوست عزيز شما با دستور RowSource منبع ديتاي ليست باكستو مشخص ميكني نه هدرتو
          ولي اگه تو همين كد، رنجتو از A2 شروع كني سطر اولو به عنوان هيدر در نظر ميگيره مثل كد زير
          کد:
          ListBox1.RowSource = Sheet3.Range("a2:e10").Address
          این کاری که میگی رو انجام دادم ولی هدرها سفید میمونه و هیچی توش نمیاد.

          کد:
           
Private Sub CommandButton1_Click()
ListBox1.ColumnHeads = True
ListBox1.ColumnCount = 10
ListBox1.RowSource = Sheet16.Range("a2:g2").Address
End Sub

            کامنت

            قبلی template بعدی
            چند لحظه..