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

موضوع: جادوگر چند زبانه

  1. #1
    mokaram آنلاین نیست.
    مدير تالار اکسل و بانک اطلاعاتی


    محصولات کاربر

    ويدئوي ايجاد سطح دسترسي
    آخرین بازدید
    2023/04/20
    تاریخ عضویت
    February 2011
    محل سکونت
    ســــاوه
    نوشته ها
    1,805
    امتیاز
    6409
    سپاس
    8,100
    سپاس شده
    5,163 در 1,502 پست
    سطح اکسل
    74.00 %

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

    Cap جادوگر چند زبانه

    با سلام

    خیلی از ماها موقع نصب نرم افزار رو سیستممون بارها مشاهده کردیم که برای اینکار یه فرمی برامون باز میشه و مرحله به مرحله با زدن دکمه Next جلو می ریم و اطلاعات خواسته شده را تکمیل می کنیم تا نصب به اتمام برسه در واقع همه اینکار ها را ما تو یه فرم می بینیم
    یه همچین کاری را تو اکسل می تونید از طریق فایل پیوست مشاهده کنید
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.
    فايل هاي پيوست شده فايل هاي پيوست شده



  2.  

  3. #2


    آخرین بازدید
    2023/04/24
    تاریخ عضویت
    April 2014
    محل سکونت
    كرج
    نوشته ها
    892
    امتیاز
    4526
    سپاس
    2,297
    سپاس شده
    2,910 در 801 پست
    سطح اکسل
    64.00 %

    سلام
    چطور شد !!!
    متوجه نشدم ، چطوری فرم زبانش عوض میشه !!!؟؟؟؟
    لطفا یه آموزش بزارید .

  4. سپاس ها (3)


  5. #3
    mokaram آنلاین نیست.
    مدير تالار اکسل و بانک اطلاعاتی


    محصولات کاربر

    ويدئوي ايجاد سطح دسترسي
    آخرین بازدید
    2023/04/20
    تاریخ عضویت
    February 2011
    محل سکونت
    ســــاوه
    نوشته ها
    1,805
    امتیاز
    6409
    سپاس
    8,100
    سپاس شده
    5,163 در 1,502 پست
    سطح اکسل
    74.00 %

    mokaram به Yahoo ارسال پیام
    آقا حقیقتش منم هر چی ور رفتم سوادم به اون حد نرسید که بفههم چی میگه ولی خب گفتیم این فایل را بزاریم تا بقیه که اش چیزی سر در میارن به ما هم بگن
    ویرایش توسط mokaram : 2014/12/07 در ساعت 11:16



  6. #4


    آخرین بازدید
    2023/08/14
    تاریخ عضویت
    March 2010
    محل سکونت
    تهران
    نوشته ها
    2,034
    امتیاز
    4508
    سپاس
    2,467
    سپاس شده
    4,096 در 1,241 پست
    سطح اکسل
    85.00 %

    khakzad به Yahoo ارسال پیام
    سلام خدمت دوستان
    ی چیزایی ازش دراوردم
    البته خیلی کمه و لی کم کم درست میشه

    اینکه عوض میشه، بخاطر استفاده از multipage هست.
    اگر روی کادر کلیک کنید و طیق شکل عمل کنید می بینید که 4 صفحه موجود هست که تو هرکدوم یک مرحله گنجونده شده




  7. #5


    آخرین بازدید
    18 ساعت پیش
    تاریخ عضویت
    September 2013
    محل سکونت
    بچه محل آقا امام رضا
    نوشته ها
    4,469
    امتیاز
    12312
    سپاس
    8,924
    سپاس شده
    10,583 در 3,742 پست
    سطح اکسل
    100.00 %

    نقل قول نوشته اصلی توسط misammisam نمایش پست ها
    سلام
    چطور شد !!!
    متوجه نشدم ، چطوری فرم زبانش عوض میشه !!!؟؟؟؟
    لطفا یه آموزش بزارید .

    سلام ميثم جان
    اينطوري شد:
    کد:
    Private Sub obEnglish_Click()
        UserLanguage = 1
        ChangeLanguage
    End Sub
    با زدن مثلا دكمه انگليسي اين سابروتين انجام ميشه. كه ميبينين به متغير UserLanguage مقدار يك و بعد هم سابروتين زير اجرا ميشه:
    کد:
    Sub ChangeLanguage()
        Dim ctl As Control
        Dim Cap As String
    
    
        For Each ctl In Me.Controls
            If HasCaption(ctl) Then
                Cap = Translate(ctl.Name, UserLanguage)
                If Cap <> "" Then ctl.Caption = Cap
            End If
        Next ctl
    
    
    '   Update the caption
        Cap = APPNAME & " - Step " _
          & MultiPage1.Value + 1 & " of " _
          & MultiPage1.Pages.Count
        Me.Caption = Translate(Cap, UserLanguage)
    End Sub
    تو اين كد هر چي كنترلر هست caption مربوطه تغيير ميكنه. براي تغييرش هم از فانكشن زير استفاده ميشه:
    کد:
    Function Translate(text, language) As String
        Dim txt As String
        On Error Resume Next
        txt = Application.WorksheetFunction.VLookup(text, Sheets("shtLocalization").Range("A1:e32"), language + 1, False)
        If Err <> 0 Then Translate = "" Else Translate = txt
    End Function
    در اين فانكشن هم همونطور كه متوجه شدين ميره از شيت shtLocalization كه شيت مخصوص ترجمه هست اطلاعات رو با vloockup در مياره

    اين بود كليتي از كار اين فايل



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

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

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

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

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

کلمات کلیدی این موضوع

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

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

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