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

موضوع: سوال درباره ی فعال کردن یک سلول خاص با کلیک بر دکمه های مربوط به سطر و ستون آن

  1. #1


    آخرین بازدید
    2012/06/11
    تاریخ عضویت
    December 2010
    نوشته ها
    5
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    Lightbulb سوال درباره ی فعال کردن یک سلول خاص با کلیک بر دکمه های مربوط به سطر و ستون آن

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

  2.  

  3. #2


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

    shamsololama به Yahoo ارسال پیام

    RE: سوال درباره ی فعال کردن یک سلول خاص با کلیک بر دکمه های مربوط به سطر و ستون آن

    با درود فراوان

    برای اینکه به سلولی خاص مثلا m200 برویم این قابلیت در خود اکسل وجود دارد و کافیست در کارد Namebox خانه کوچکی روبروی فرومول بار( که وقتی روی هر سل کلیک می کنیم نام سلول را نشان میدهد) با نوشتن نام هر سلول و زدن اینتر به سلول مورد نظر میرود مثلا اگر در آن بنویسید M200 و اینتر را بفشارید به سلول M200 خواهید رفت
    و اینکه با نوشتن نام سلول کاری باز شود و مقدار ورودی را از شما بخواهد اگر منظور شما این است که برای نوشتن چیزی در یک سل کادری باز شود و هرچیزی که بنویسیم در سلول مورد نظر وارد شود بله اینکار شدنی است و کافیست که از دو اینپود باکس استفاده کنی که اولی مقداری را که می خوای وارد سلول کنی از شما بپرسد و دومی سلولی که مد نظر شماست را بپرسد و یا اینکه از Userform استفاده کنید

  4. #3


    آخرین بازدید
    2012/06/11
    تاریخ عضویت
    December 2010
    نوشته ها
    5
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    RE: سوال درباره ی فعال کردن یک سلول خاص با کلیک بر دکمه های مربوط به سطر و ستون آن

    ممنونم از پاسختون.
    ابگذارید سئوالم رو به شکل دیگه ای مطرح کنم.باید با کلیک روی سلول اول سطر و بعد اول ستون سلول مربوط یه آن سطر/ستون خاص انتخاب بشه.یعنی به فرض با کلیک روی سلول c1 و بعد a10 سلول c10 انتخاب بشه.
    متشکرم.

  5. #4


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

    shamsololama به Yahoo ارسال پیام

    RE: سوال درباره ی فعال کردن یک سلول خاص با کلیک بر دکمه های مربوط به سطر و ستون آن

    با درود فراوان

    چون نمی دانستم این را در چه برنامه ای و به چه منظوری نیاز دارید یک نمونه فایل را در ضمیمه گذاشته ام که امیدوارم همان چیزی باشد که مد نظر شماست

    در این فایل وقتی اول ستون را انتخاب کنی و بعد سطر تقاطع این دو را یافته و انتخاب میکند


    فایل ضمیمه:

    [attachment=114]
    فايل هاي پيوست شده فايل هاي پيوست شده

  6. #5


    آخرین بازدید
    2012/06/11
    تاریخ عضویت
    December 2010
    نوشته ها
    5
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    RE: سوال درباره ی فعال کردن یک سلول خاص با کلیک بر دکمه های مربوط به سطر و ستون آن

    یک دنیا ممنونم.شما هم کار منو راه انداختید هم باعث شدید بطور جدی بدنبال یادگیری VBA در اگسل بیفتم.
    باز هم ممنون.
    ای کاش درباره ی کدش هم توضیح اندکی میدادید.
    [align=left][align=left]
    کد:
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Range("it65500") <> "" And Range("it65501") <> "" Then
    
    Range("it65500") = ""
    Range("it65501") = ""
    
    Range("it65500") = Application.Selection.Column
    
    ElseIf Range("it65500") = "" Then
    Range("it65500") = Application.Selection.Column
    
    ElseIf Range("it65500") <> "" Then
    Range("it65501") = Application.Selection.Row
    
    Cells(Range("it65501"), Range("it65500")).Select
    Range("it65500") = ""
    Range("it65501") = ""
    Else
    Cells(Range("it65501"), Range("it65500")).Select
    Range("it65500") = ""
    Range("it65501") = ""
    End If
    End Sub
    [/align][/align][hr]
    یک دنیا ممنونم.شما هم کار منو راه انداختید هم باعث شدید بطور جدی بدنبال یادگیری VBA در اکسل بیفتم.
    باز هم ممنون.
    ای کاش درباره ی کدش هم توضیح اندکی میدادید.
    [align=left][align=left]
    کد:
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Range("it65500") <> "" And Range("it65501") <> "" Then
    
    Range("it65500") = ""
    Range("it65501") = ""
    
    Range("it65500") = Application.Selection.Column
    
    ElseIf Range("it65500") = "" Then
    Range("it65500") = Application.Selection.Column
    
    ElseIf Range("it65500") <> "" Then
    Range("it65501") = Application.Selection.Row
    
    Cells(Range("it65501"), Range("it65500")).Select
    Range("it65500") = ""
    Range("it65501") = ""
    Else
    Cells(Range("it65501"), Range("it65500")).Select
    Range("it65500") = ""
    Range("it65501") = ""
    End If
    End Sub
    [/align][/align]

  7. #6


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

    shamsololama به Yahoo ارسال پیام

    RE: سوال درباره ی فعال کردن یک سلول خاص با کلیک بر دکمه های مربوط به سطر و ستون آن

    با درود فراوان

    در ین خط کدمان را در زیر روال SelectionChange صفحه مورد نظرمان قرار داده ایم
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)



    در این خط دو سل را در نظر گرفته ایم که اگر خالی نبودند کد را اجرا کند
    If Range("it65500") <> "" And Range("it65501") <> "" Then

    در این دوخط در صورت برقرار بودن شرط بالا دوسل مورد نظر را خالی میکند
    Range("it65500") = ""
    Range("it65501") = ""

    در این خط از دوسلی که انتخاب کرده ایم سل اول یعنی it65500 برابر با شماره ستون سلی که با موس انتخاب کرده ایم می شود در واقع یعنی شماره ستون ما در آن ذخیره می شود
    Range("it65500") = Application.Selection.Column

    در صورتی که شرط بالا برقرار نباشد شرط زیر را برسی میکند که اگر سل اول یعنی it65500 خالی بود کد بعد از آن را اجرا کند
    ElseIf Range("it65500") = "" Then

    در این خط در صورت برقرار بودن شرط بالا سل اول را برابر با شماره ستون قرار می دهد
    Range("it65500") = Application.Selection.Column

    و باز هم اگر شرط دوم هم برقرار نبود این شرط بررسی میکند که اگر سل اول خالی نبود یعنی شماره ستون در آن نوشته شده بود کد بعد از آن را اجرا کند
    ElseIf Range("it65500") <> "" Then

    در صورت برقرار بودن شرط بالا یعنی شرط سوم سل دوم را برابر با شماره ردیف قرار میدهد
    Range("it65501") = Application.Selection.Row

    در این خط چون هم شماره ستون که در سل اول نوشته شده و شماره ردیف که در سل دوم نوشته شده را داریم پس با کد Cells(Column,Row که در این کد قرار داده و آن را انتخاب می کند که در اصل هدف ماست
    Cells(Range("it65501"), Range("it65500")).Select

    در این دو خط دو سا مورد نظر را که با شماره ردیف و شماره ستون پرشده بود را خالی میکنیم تا آماده شود برای انتخاب بعد
    Range("it65500") = ""
    Range("it65501") = ""

    در صورتی که هیچ کدام از شرط های بالا برقرار نباشد کد زیر اجرا میشود
    Else
    در این خط سل تقاطع ستون و ردیف را انتخاب می کند
    Cells(Range("it65501"), Range("it65500")).Select
    دوسل را خالی میکند
    Range("it65500") = ""
    Range("it65501") = ""
    پایان شرط ها
    End If
    پایان محدوده کد
    End Sub


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

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

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

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

  1. کپی خانه‌های انتخابی از ستونی به ستون دیگر
    توسط eppagh در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 1
    آخرين نوشته: 2012/07/04, 14:31
  2. سوال در تغییر هدر ستون در اکسل
    توسط r.karbar در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 4
    آخرين نوشته: 2012/06/24, 23:13
  3. تعداد در يك ستون به شرط ستون ديگر
    توسط karbar در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 7
    آخرين نوشته: 2012/05/24, 22:56
  4. پاسخ ها: 1
    آخرين نوشته: 2010/12/30, 08:29
  5. دستور حرکت مکان نما از یک ستون به ستون دیگر
    توسط sh_amar در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 13
    آخرين نوشته: 2010/12/02, 21:11

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

غیر فعال کردن شرط در ویژوال بیسیک

رفتن به یک سلول خاص در اکسل

غیر فعال کردن یک سلول با شرط در اکسل

در اکسل چطور در یک باکس به خط بعد برویم

چکونه در ایکسل با انتخاب یک سل به صفحه مورد نظر برویم؟

برقراری شرط در اکسل

چگونه در اکسل با کلیک به سلول یا نمودار دلخواه برویم

سلول فعال در اكسل

باز شدن جدول با کلیک روی سلولدر اکسل چگونه به خانه بالاتر برویم باز کردن یک رکورد در اکسل با دکمهنحوه فعال کردن دکمه جستجو در اکسلچگونه از یک صفحه به صفحه دیگر در اکسل برویمچگونه با برنامه اکسل از یک صفحه به صفحه دیگربرویمفعال کردن inside یک سلول در اکسلدر جدول اکسل چگونه به خانه های مختلف برویمچطوری در اکسل به یک سلول دلخواه حرکت کنیمچاپ سطرهای فعال با دکمه در اکسلانتخاب سلولهای خاص در اکسل و ردیف کردن انها در یک سلول علت نرفتن به به یک سلول خاص در اکسلاکتیو کردن یک سل در اکسلرفتن به سلول مورد نظر در اکسلنمایش سلول به سلول در یک ستون از اکسل بوسیله یک دکمه از طریق vbaچطوری در سلول اکسل اینتر رو فعال کنمرفتن به صفحه مورد نطر با کلیک در اکسل

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

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

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