کلید ض+ctrl به جای ctrl +q

Collapse
X
 
  • زمان
  • نمایش
حذف همه
new posts
  • beheshty

    • 2014/03/04
    • 48

    کلید ض+ctrl به جای ctrl +q

    سلام دوستان
    من از فایلی استفاده میکنم که زیاد به وارد کردن تاریخ روز در جلوی مقدارها سلول دارم و از کلید ترکیبی ctrl +q برای درج تاریخ شمسی استفاده میکنم
    اما مشکلی که هست اینه که باید هر بار کیبرد را انگلیسی کنم و تاریخ را درج و دباره فارسی کنم برای ادامه کار
    آیا راهی هیت که بشه از حالت فارسی هم از تابع تاریخ جلالی استفاده کرد؟
    Last edited by beheshty; 2014/07/28, 03:40. دلیل: حــــــــــــــــــل نشده
  • misammisam
    مدير تالار حسابداری و اکسل

    • 2014/04/04
    • 892
    • 64.00

    #2
    با سلام
    كافيه يه ماكرو براي همين ctrl+ q ذخيره كني و كليد تركيبيشو بزاري روي ض + ctrl
    [CENTER][SIGPIC][/SIGPIC]
    [/CENTER]
    [CENTER][FONT=Tahoma][FONT=Tahoma][FONT=Tahoma][FONT=Tahoma][FONT=Tahoma][INDENT]
    [CENTER][SIZE=3][URL="https://affstat.adro.co/click/adf04053-f8a6-439a-9ac4-e6a7e6f4b455"][B]اينجا كليك نكنيا ![/B][/URL][/SIZE]
    [/CENTER]
    [/INDENT]

    [/FONT][/FONT][/FONT][/FONT][/FONT]
    [/CENTER]

    کامنت

    • beheshty

      • 2014/03/04
      • 48

      #3
      نوشته اصلی توسط misammisam
      با سلام
      كافيه يه ماكرو براي همين ctrl+ q ذخيره كني و كليد تركيبيشو بزاري روي ض + ctrl
      چه جوری باید این کارو انجام بدم با ظبط ماکرو که نشد
      تو کجای افزونه Persian Function For EXCEL_V2 دستور درج تاریخ با ctrl+ qآمده که برم و اوضش کنم من هرچه تو کدها نگاه کردم چیزی ندیدم

      کامنت

      • Amir Ghasemiyan

        • 2013/09/20
        • 4598
        • 100.00

        #4
        نوشته اصلی توسط beheshty
        چه جوری باید این کارو انجام بدم با ظبط ماکرو که نشد
        تو کجای افزونه Persian Function For EXCEL_V2 دستور درج تاریخ با ctrl+ qآمده که برم و اوضش کنم من هرچه تو کدها نگاه کردم چیزی ندیدم

        شما بايد يك سابروتين تعريف كنيد. مثلا به اين صورت:
        کد:
        Sub jtoday()ActiveCell.Formula = "=j_today()"
        End Sub
        بعد از تب developer گزينه macros از ليست jtoday رو انتخاب كنيد و options رو بزنين و در قسمت مربوطه حرف ض رو وارد كنيد.
        Click image for larger version

Name:	Untitled.png
Views:	1
Size:	26.6 کیلو بایت
ID:	123410

        کامنت

        • Javid Mokhtari
          مدير تالار ويژوال بيسيك

          • 2012/01/16
          • 1212
          • 73.00

          #5
          نوشته اصلی توسط beheshty
          چه جوری باید این کارو انجام بدم با ظبط ماکرو که نشد
          تو کجای افزونه Persian Function For EXCEL_V2 دستور درج تاریخ با ctrl+ qآمده که برم و اوضش کنم من هرچه تو کدها نگاه کردم چیزی ندیدم
          با سلام.احتمالا ضبط ماکرو رو درست انجام نمی دید.
          [FONT=Tahoma][INDENT][CENTER][SIZE=3][FONT=courier new][B][FONT=comic sans ms][SIZE=3][FONT=arial]دوره های آموزش رایگان اکسل از صفر تا پیشرفته بصورت تصویری
          بیش از [COLOR=#008000]60[/COLOR] جلسه آموزش ویدئویی رایگان

          شرکت در دوره:
          [/FONT][/SIZE]
          [SIZE=5] [FONT=Tahoma][FONT=courier new][B][URL]https://javidsoft.ir/courses/[/URL][/B][/FONT][/FONT][/SIZE][/FONT]
          [/B][/FONT][/SIZE]
          [/CENTER]
          [/INDENT]
          [/FONT]

          کامنت

          • beheshty

            • 2014/03/04
            • 48

            #6
            نوشته اصلی توسط amir ghasemiyan

            شما بايد يك سابروتين تعريف كنيد. مثلا به اين صورت:
            کد:
            Sub jtoday()ActiveCell.Formula = "=j_today()"
            End Sub
            بعد از تب developer گزينه macros از ليست jtoday رو انتخاب كنيد و options رو بزنين و در قسمت مربوطه حرف ض رو وارد كنيد.
            [ATTACH=CONFIG]4227[/ATTACH]
            این کار مشکل منو حل نمیکنه چون بعد از اجرای ماکرو در خانه مورد نظر فرمل =j_today() درج میشه و من میخوام در آن خانه نتیجه فرمل یعنی تاریخ روز درج بشه و فردا اون تاریخ عوض نشه
            مثلا تارخ فروش کالا در مقابلش درج میشه و باید ثابت باشه

            کامنت

            • Amir Ghasemiyan

              • 2013/09/20
              • 4598
              • 100.00

              #7
              نوشته اصلی توسط beheshty
              این کار مشکل منو حل نمیکنه چون بعد از اجرای ماکرو در خانه مورد نظر فرمل =j_today() درج میشه و من میخوام در آن خانه نتیجه فرمل یعنی تاریخ روز درج بشه و فردا اون تاریخ عوض نشه
              مثلا تارخ فروش کالا در مقابلش درج میشه و باید ثابت باشه

              خب پس كار راحت تر شد :دي

              کد:
              ActiveCell.Value = J_TODAY()

              کامنت

              • beheshty

                • 2014/03/04
                • 48

                #8
                نوشته اصلی توسط amir ghasemiyan

                خب پس كار راحت تر شد :دي

                کد:
                ActiveCell.Value = J_TODAY()
                لطفا یه فایل نمونه قرار دهید من هر کار میکنم خطا میده

                کامنت

                • Amir Ghasemiyan

                  • 2013/09/20
                  • 4598
                  • 100.00

                  #9
                  نوشته اصلی توسط beheshty
                  لطفا یه فایل نمونه قرار دهید من هر کار میکنم خطا میده
                  بفرماييد خدمت شما
                  فایل های پیوست شده

                  کامنت

                  چند لحظه..