نمایش نتایج: از شماره 1 تا 2 , از مجموع 2

موضوع: پیمایش شیت ها

Hybrid View

پست قبلی پست قبلی   پست بعدی پست بعدی
  1. #1


    آخرین بازدید
    2022/12/05
    تاریخ عضویت
    October 2011
    محل سکونت
    مشهد
    نوشته ها
    4,374
    امتیاز
    12614
    سپاس
    4,596
    سپاس شده
    11,990 در 3,203 پست
    سطح اکسل
    70.00 %

    پیمایش شیت ها

    با سلام
    در ارتباط با سوالی در مورد ایجاد حلقه برای شیت ها خدمت دوستان باید بگم برای پیمایش بر روی شیت ها میشه از دو راه استفاده کرد ، فرض کنید برای اضافه کردن نام شیت ها به یک combobox چطور میشه عمل کرد؟دو نوع حلقه for و for each میشه استفاده کرد که میتونید این دو راه رو از طریق کد های زیر امتحان کنید:
    [align=left]
    کد PHP:
    Private Sub UserForm_initialize()
    Dim i As Integer
    For 1 To Sheets.Count
    ComboBox1
    .AddItem Sheets(i).Name
    Next i
    End Sub 
    [/align]

    [align=left]
    کد PHP:
    Private Sub UserForm_initialize()
    Dim shname As Object
    For Each shname In Sheets
    ComboBox1
    .AddItem shname.Name
    Next shname
    End Sub 
    [/align]
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

  2. #2


    آخرین بازدید
    2023/05/03
    تاریخ عضویت
    January 2012
    محل سکونت
    استان اردبیل / شهرستان پارس آباد (مغان)
    نوشته ها
    1,213
    امتیاز
    2633
    سپاس
    1,399
    سپاس شده
    2,089 در 665 پست
    سطح اکسل
    73.00 %

    Javid Mokhtari به Yahoo ارسال پیام

    RE: پیمایش شیت ها

    با سلام.
    خب،روش های زیادی میشه به کار برد.مثل روش زیر:
    [align=left]
    کد PHP:
    ComboBox1.Clear
    1
    Do While Application.Sheets.Count <> 1
    ComboBox1
    .AddItem Sheets(i).Name
        i 
    1
    Loop 
    [/align]


    اما روش هایی که آقای وطن پرست گفتن آسانتر و معمول تر هستش.

  3. سپاس ها (1)



اطلاعات موضوع

کاربرانی که در حال مشاهده این موضوع هستند

در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)

موضوعات مشابه

  1. درست کردن نوار پیمایش در یوزر فرم
    توسط مینو در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 4
    آخرين نوشته: 2013/01/21, 14:37
  2. محاسبه حقوق ماهیانه و حق مسکن
    توسط mr.excel در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 9
    آخرين نوشته: 2012/07/28, 17:42
  3. خلاصه کردن پیکره دستور if با استفاده از IIF
    توسط komeilex در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 3
    آخرين نوشته: 2012/07/14, 10:22

بازدید کنندگان با جستجو های زیر این صفحه را پیدا کرده اند

انجمن اكسل ايران , اكسل , اكسس , سوال و جواب اكسل , سوال اكسس , انجمن اكسل ايران , توابع اكسل, آموزش اكسل, آموزش اكسس, VBA, ويژوال بيسيك

علاقه مندی ها (Bookmarks)

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •  
  • BB code ها فعال هستند
  • شکلک ها فعال هستند
  • کد [IMG] فعال است
  • کد [VIDEO] فعال است
  • کد HTML غیر فعال است