صفحه 2 از 2 نخستنخست 12
نمایش نتایج: از شماره 11 تا 14 , از مجموع 14

موضوع: دستور حرکت مکان نما از یک ستون به ستون دیگر

  1. #11


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

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

    RE: دستور حرکت مکان نما از یک ستون به ستون دیگر

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

    حرکت مکان نما بر اساس نوع تشویقی A , B ,C را در فایل ضمیمه قرار داده ایم می توانید ببینید و اگر در کدنویسی آن مشکل و یا سئوالی داشتید بپرسید


    فایل نمونه

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

  2.  

  3. #12


    آخرین بازدید
    2021/07/17
    تاریخ عضویت
    October 2010
    محل سکونت
    تهران
    نوشته ها
    168
    امتیاز
    73
    سپاس
    2
    سپاس شده
    58 در 39 پست
    تعیین سطح نشده است

    RE: دستور حرکت مکان نما از یک ستون به ستون دیگر

    سلام استاد گرامي
    فايل ضميمه شما را ديدم يكي و دو سئوال برايم پيش آمده اول اينكه ستون كمكي (ستون A ) را براي چي درست كرديد ؟
    دوم اينكه شما فرموديد در تابع offset عدد اول نشان دهنده تعداد رديف هاي جابه جايي نسبت به سل انتخاب شده ماست و علامت منفي آن حركت به بالا را نشان ميدهد حال آنكه در فايل شما پس از انتخاب ستون 4 (ستون تشويقي ) ما نياز داريم كه يك رديف به پايين بياييم پس چرا شما از 1- در تابع Offset استفاده كرديد ؟
    ممنون از كمك شما

  4. #13


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

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

    RE: دستور حرکت مکان نما از یک ستون به ستون دیگر

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

    همانطور که می بینید کدهای خود را در زیر روال
    Private Sub Worksheet_Calculate()
    نوشته ایم و این به این معنی است که کد ما زمانی اجرا می شود که در صفحه Calculate صورت بگیرد وقتی در ستون تشویقی یک نوع تشویقی را وارد میکنیم در ستون A که برابر با ستون تشویقی قرار داده ایم نیز تغییر صورت میگیرد و برابر با ستون تشویقی می شود یعنی Calculate صورت گرفته در نتیجه کد اجرا شده و مکان نما را به ستون مورد نظر ما خواهد برد


    در مورد سئوال دوم شما فرض کنیددر ستون تشویقی در سل D5 یک تشویقی را وارد می کنید یعنی در سطر پنجم حالا بعد از ورود تشویقی شما اینتر می زنید در نتیجه به یک سل پائین تر یعنی D6 می روید یعنی در سطر ششم و حالا نیاز داریم که مکان نما در ستون F و سطر پنج انتقال یابد یعنی سل F5 در صورتی که حالا در سطر ششم هستیم درنتیجه باید یک سطر بالاتر برویم و بعد دوخانه به سمت راست که برای بالا رفتن این یک سطری که گفته شدهد در آفست از 1- استفاده میشودتا مارایک سطر بالاتر یعنی سلی که به تازگی در آن تشویقی وارد کرده ایم ببرد و 2 در آفست هم برای اینکه ما را دو خانه به سمت راست ببرد.

    Private Sub Worksheet_Calculate()
    On Error Resume Next
    این خط شرطی است که می گوید اگر در ستون چهار قرار داشتیم کد را اجرا کن
    If Application.Selection.Column = 4 Then

    این خط شرطی است که بعد از اینتر که یک خانه پائین آمده ایم میگوید یک سطر بالا (یعنی خانه ای که به تازگی در آن تشویقی وارد کرده ایم) آیا برابر با A هست ؟اگر بود کد را اجرا کن
    If Selection.Offset(-1, 0) = "A" Then
    این خط در صورتی که شر بالا برقرار بود یک سطر بالابرو (تا در خانه ای قرار بگیریم که به تازگی در آن تشویقی وارد کرده ایم)و 3 ستون به سمت راست
    Selection.Offset(-1, 3).Select


    و کدهای زیر هم به همین ترتیب

    ElseIf Selection.Offset(-1, 0) = "B" Then
    Selection.Offset(-1, 4).Select
    ElseIf Selection.Offset(-1, 0) = "C" Then
    Selection.Offset(-1, 5).Select

    Else
    MsgBox "نوع تشویقی را صحیح وارد کنید"
    End If
    End If
    End Sub






    کد:

    Private Sub Worksheet_Calculate()
    On Error Resume Next
    If Application.Selection.Column = 4 Then
    If Selection.Offset(-1, 0) = "A" Then
    Selection.Offset(-1, 3).Select
    ElseIf Selection.Offset(-1, 0) = "B" Then
    Selection.Offset(-1, 4).Select
    ElseIf Selection.Offset(-1, 0) = "C" Then
    Selection.Offset(-1, 5).Select

    Else
    MsgBox "نوع تشویقی را صحیح وارد کنید"
    End If
    End If
    End Sub


    اگر مشکلی بود تا توضیح بیشتری بدهم

  5. #14


    آخرین بازدید
    2021/07/17
    تاریخ عضویت
    October 2010
    محل سکونت
    تهران
    نوشته ها
    168
    امتیاز
    73
    سپاس
    2
    سپاس شده
    58 در 39 پست
    تعیین سطح نشده است

    RE: دستور حرکت مکان نما از یک ستون به ستون دیگر

    سلام برشما استاد ارجمند
    درسته حالا نحوه كاركرد تابع offset را فهميدم و با تغييرات مورد نيازي كه در فايل خودم دادم به آنچه مي خواستم رسيدم بازم از سعه صدر شما در پاسخ دادن به سئوالاتم بيسار متشكرم


صفحه 2 از 2 نخستنخست 12

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

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

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

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

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

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

مشکل حرکت کلید مکان نما در اکسل

کد ماکروی حرکت از یبک صفحه به صفحه دیگر در اکسل

انواع نما در excel

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

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

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