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

موضوع: اكسل سخنگو - Speech in Excel

  1. #1


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

    Cap اكسل سخنگو - Speech in Excel

    سلام دوستان


    امروز ميخوام يه قابليتي رو در اكسل بهتون معرفي كنم البته شايد قبلا اينو شنيده باشيد.
    اكسل اين قابليت رو داره كه كلمات انگليسي كه شما مينويسيد رو براتون بخونه
    از اين قابليت براي خيلي كارها ميتونين استفاده كنيد. مثلا ميتونين يك پيام خوش آمدگويي بذارين يا پيام هايي كه ميخواين سيستم به كاربر بده بصورت صوتي بده يا ...


    خب بريم سر اصل مطلب:
    قبلا تو يك تاپيك اشاره اي به اين قابليت شده (البته نه در محيط VBA) كه من اينجا فقط لينكشو ميذارم
    اکسل سخنگو


    اما اينجا ميخوام اين قابليت رو در قالب VBA براتون توضيح بدم:
    ساختار به صورت Application.Speech هست كه شامل يك متود (speak) و دو مشخصه (properties) يكي Direction و يكي ديگر SpeakCellOnEnter كه به تفصيل توضيح ميدم
    ابتدا متود speak:
    با استفاده از اين متود شما ميتونيد كلمات و يا عبارات مورد نظر خود را پخش كنيد:
    مثال:

    کد:
    Sub sayhello()
        Application.Speech.Speak "Hello ExcelIran"
    End Sub

    شما ميتونين بجاي اينكه متن بدين يك سلول رو مشخص كنيد تا براتون بخونه. مثلا اينطوري:

    کد:
    Application.Speech.Speak Range("A1")
    مثلا اگه بخواين براتون ساعت رو اعلام كنه اونم با فرمتي كه دوست دارين اينطوري عمل كنيد:

    کد:
    Sub saytime()
    Application.Speech.Speak Format(Time, "hh mm ss")
    End Sub

    خب حالا اگه ميخواين به محض ورود يك متن اجرا بشه كافيه كدي كه گفتم رو در ايونت Workbook_Open بذارين. ميشه اينطوري:

    کد:
    Private Sub Workbook_Open()
        Application.Speech.Speak "Hello ExcelIran"
    End Sub

    خب حالا بريم سراغ مشخصه ها:
    Direction:
    اين مشخصه دو حالت داره:
    1- xlSpeakByColumns
    2- xlSpeakByRows
    كاربردش اينه كه وقتي شما چند سلول رو ميخواين براتون بخونه تعيين ميكنين اول سطرها خونده بشه يا اول ستون ها
    مثال:

    کد:
    Sub setdirection()
    Application.Speech.Direction = xlSpeakByRows
    End Sub

    SpeakCellonEnter:
    اين مشخصه هم دو حالت داره:
    1- True
    2- False
    در صورتي كه حالت True باشه هر چيزي كه در هر سلولي بنويسيد براتون ميخونه.كافيه يك بار ماكروي زير رو اجرا كنيد بعد ديگه فقط كافيه تو يك سلول بنويسين.
    مثال:

    کد:
    Sub speakcell()
    Application.Speech.SpeakCellOnEnter = True
    End Sub
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.


  2.  


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

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

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

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

  1. مديا پلير در اكسل - Excel Media Player
    توسط Amir Ghasemiyan در انجمن برنامه های کاربردی اکسل
    پاسخ ها: 2
    آخرين نوشته: 2022/05/27, 14:02
  2. پاسخ ها: 21
    آخرين نوشته: 2019/02/17, 12:10
  3. باز شدن يك فايل اكسل به همراه فايل اكسل ديگر
    توسط alitaheri در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 4
    آخرين نوشته: 2014/05/29, 23:06
  4. ذره بين اكسلي - Excel Magnifier
    توسط Amir Ghasemiyan در انجمن برنامه های کاربردی اکسل
    پاسخ ها: 1
    آخرين نوشته: 2014/05/29, 21:39

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

اکسل با گفتاری

اکسل گفتاری

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

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

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

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