رفتن به صفحه خاص

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

    • 2013/03/03
    • 31
    #1

    رفتن به صفحه خاص

    اساتید گرامی
    با سلام و احترام
    قطعا سوالی که میپرسم برای شما بسیار ساده و پیش پا افتاده است .
    مطالب را گشتم ولی متأسفانه جوابش رو پیدا نکردم برای همین مزاحم شدم .
    من یه دستوری نیاز دارم که
    نام برخی از صفحات فایل در یک کوبوباکس موجود است .
    و آن کومبوباکس به خانه G1 مرتبط است .
    میخواهم یک sHAPE به فایل اضافه کنم و به آن کدی مربوط کنم که هر موقع آن را اجرا کردم به صفحه مربوطه که نام آن صفحه در همان لحظه در کومبوباکس فعال است بروم .
    با سپاس .
    برچسب ها: به, خاص, رفتن
    • khakzad

      • 2010/03/17
      • 2034
      • 85.00
      #2
      سلام
      از این کد استفاده کنید
      بعد این کد رو به shape مورد نظر assign کنید
      کد:
      Sub shape()
Dim m As String
m = Sheets(1).Range("a1")
Sheets(m).Select


End Sub

      حالا بجای a1 سل مورد نظر خودتون که مرجع کمبوباکس هست رو قرار بدید
      [CENTER][B][COLOR=#008000][SIZE=3]محصولات و جزوات آموزش تخصصی [URL="https://excelpedia.net/"]اکسل[/URL] در:

      [URL="https://excelpedia.net/category/excel-functions/"]برترین مرجع تخصصی پارسی اکسل[/URL]
      [URL="http://www.exceliran.com/shop/"]جامعه اكسل ايرانيان: فروشگاه[/URL][/SIZE][/COLOR][/B]
      :wcom:

      [B][URL="https://excelpedia.net/"]آموزش اکسل تخصصی[/URL] و [URL="https://excelpedia.net/excel-ninja/"]پیشرفته[/URL] - [URL="https://excelpedia.net/"]تهران[/URL][/B]
      [EMAIL="h.khakzad@yahoo.com"]h.khakzad@yahoo.com[/EMAIL]
      [/CENTER]

        کامنت

        • hooman_tt

          • 2013/03/03
          • 31
          #3
          با عرض سلام و تشکر از زحمات شما
          دستورات شما رو اجرا کردم ولی از خط sheets(m).select موقع اجرا خطا میگیرد .
          متشکر میشوم راهنمایی بفرمائید .

            کامنت

            • khakzad

              • 2010/03/17
              • 2034
              • 85.00
              #4
              من سل مرجع رو A1 قرار دادم اونم از شیت 1
              اینها رو چک کنید
              شما گفته بودید g1
              دقت کنید ببینید کدوم شیت هست.

              کلا میاد اسم شیت که داخل g1 هست رو میریزه داخل متغیر و بع د هم انتخاب شیت
              [CENTER][B][COLOR=#008000][SIZE=3]محصولات و جزوات آموزش تخصصی [URL="https://excelpedia.net/"]اکسل[/URL] در:

              [URL="https://excelpedia.net/category/excel-functions/"]برترین مرجع تخصصی پارسی اکسل[/URL]
              [URL="http://www.exceliran.com/shop/"]جامعه اكسل ايرانيان: فروشگاه[/URL][/SIZE][/COLOR][/B]
              :wcom:

              [B][URL="https://excelpedia.net/"]آموزش اکسل تخصصی[/URL] و [URL="https://excelpedia.net/excel-ninja/"]پیشرفته[/URL] - [URL="https://excelpedia.net/"]تهران[/URL][/B]
              [EMAIL="h.khakzad@yahoo.com"]h.khakzad@yahoo.com[/EMAIL]
              [/CENTER]

                کامنت

                • hooman_tt

                  • 2013/03/03
                  • 31
                  #5
                  با سلام مجدد
                  تمام دستورات شما اجرا کردم . باز هم error میده فقط از حط زیر استباه میگیره !!!
                  sheets(m).select

                    کامنت

                    • 4017

                      • 2010/10/03
                      • 114
                      #6
                      نوشته اصلی توسط hooman_tt
                      با سلام مجدد
                      تمام دستورات شما اجرا کردم . باز هم error میده فقط از حط زیر استباه میگیره !!!
                      sheets(m).select





                      كاملا درسته داداش. اونجا كه نوشته a1 بايد خروجي كمبوباكست باشه و همون اسم شيت ميشه
                      فايل پيوستو ببين
                      فایل های پیوست شده
                      [color=#1e90ff]اگر تنهاترين تنهايان شوم بازهم خدا هست،
                      او جانشين تمام نداشته هاي من است...![/color]

                        کامنت

                        • hooman_tt

                          • 2013/03/03
                          • 31
                          #7
                          با کمال تشکر از شما سروران عزیز

                            کامنت

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