صفحه 1 از 2 12 آخرینآخرین
نمایش نتایج: از شماره 1 تا 10 , از مجموع 15

موضوع: ديكشنري

Hybrid View

پست قبلی پست قبلی   پست بعدی پست بعدی
  1. #1


    آخرین بازدید
    2012/05/27
    تاریخ عضویت
    April 2012
    نوشته ها
    22
    امتیاز
    3
    سپاس
    0
    سپاس شده
    2 در 2 پست
    تعیین سطح نشده است

    ديكشنري

    فرض كنيد
    در شيت اول در ستون اول يك سري كلمه فارسي داريم(در هر سلول مي تواند چند كلمه باشد)
    در شيت دوم در ستون اول ان تمام كلمات فارسي و در ستون دوم معاني آنها وجود دارد.

    مي خوام در شيت اول در ستون دوم معادل انگليسي هر كلمه نوشته بشه.

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

  2. #2


    آخرین بازدید
    2022/07/10
    تاریخ عضویت
    May 2012
    نوشته ها
    13
    امتیاز
    2
    سپاس
    0
    سپاس شده
    2 در 1 پست
    سطح اکسل
    72.00 %

    RE: ديكشنري

    مریم جان در زیر ماژولی برای درخواست شما قرار دادم که خودم هم تستش کردم و جواب داده . که در برنامه زیر مقدار 11 که a رو کوچیکتر از آن قرار دادم شماره سطر آخرین واژه ی موجود شما در بانک دیکشنریتون هستش و باید متناسب با اطلاعات خوتون آپدیتش بکنید. در ادامه لیست خودم هم قرار میدم . البته لازم به ذکر هستش که من اطلاعاتم رو از سطر 2 شروع کردم و دلیل اینکه مقادیر ابتدایی a و i برابر 2هست نیز همین هستش.
    [hr]
    Sub f()
    a = 2
    i = 2
    Do While Sheet1.Cells(i, 1) <> ""
    If Sheet1.Cells(i, 1) = Sheet2.Cells(a, 1) Then
    Sheet1.Cells(i, 2) = Sheet2.Cells(a, 2)
    i = i + 1
    a = 2
    Else
    If a < 11 Then
    a = a + 1
    Else
    i = i + 1
    a = 2
    End If
    End If
    Loop
    End Sub[hr]
    bank
    y آ
    w ل
    u ب
    t ی
    r س
    q ش
    p ت
    o ن
    i م
    e ک






    test
    q ش
    w ل
    e ک
    z
    r س
    t ی
    y آ
    u ب
    i م
    o ن
    p ت

  3. #3


    آخرین بازدید
    2012/05/27
    تاریخ عضویت
    April 2012
    نوشته ها
    22
    امتیاز
    3
    سپاس
    0
    سپاس شده
    2 در 2 پست
    تعیین سطح نشده است

    RE: ديكشنري

    نقل قول نوشته اصلی توسط ali66
    مریم جان در زیر ماژولی برای درخواست شما قرار دادم که خودم هم تستش کردم و جواب داده . که در برنامه زیر مقدار 11 که a رو کوچیکتر از آن قرار دادم شماره سطر آ---ین واژه ی موجود شما در بانک دیکشنریتون هستش و باید متناسب با اطلاعات خوتون آپدیتش بکنید. در ادامه لیست خودم هم قرار میدم . البته لازم به ذکر هستش که من اطلاعاتم رو از سطر 2 شروع کردم و دلیل اینکه مقادیر ابتدایی a و i برابر 2هست نیز همین هستش.
    [hr]
    Sub f()
    a = 2
    i = 2
    Do While Sheet1.Cells(i, 1) <> ""
    If Sheet1.Cells(i, 1) = Sheet2.Cells(a, 1) Then
    Sheet1.Cells(i, 2) = Sheet2.Cells(a, 2)
    i = i + 1
    a = 2
    Else
    If a < 11 Then
    a = a + 1
    Else
    i = i + 1
    a = 2
    End If
    End If
    Loop
    End Sub[hr]
    bank
    y آ
    w ل
    u ب
    t ی
    r س
    q ش
    p ت
    o ن
    i م
    e ک






    test
    q ش
    w ل
    e ک
    z
    r س
    t ی
    y آ
    u ب
    i م
    o ن
    p ت
    برنامه ي بالا فقط در حالتي جواب ميده كه توي هر سلول يك مقدار باشه. اگر در يك سلول داشته باشيم y o u براش چيزي در نظر نميگيره.
    با تشكر از وقتي كه گذاشتيد[hr]
    نقل قول نوشته اصلی توسط s.cheraghi
    با سلام و تشکر از علی آقا

    یک فایل براتون آماده کردم
    امیدوارم کمکتون کنه

    Dictionary
    با تشكر فراوان از آقاي چراغي.
    بايد معذرت بخوام چون انگار سوالم رو واضح مطرح نكردم. برنامه شما دقيقا كارو برعكس انجام ميده و ديكشنري ميسازه. در صورتي كه مي خواستم از اطلاعات شيت 2 (ديكشنري) استفاده بشه و معادل اطلاعات داخل ستون اول از شيت اول در ستون دوم شيت1 درج بشه.

    [hr]
    نقل قول نوشته اصلی توسط shamsololama
    نقل قول نوشته اصلی توسط maryam62
    فرض كنيد
    در شيت اول در ستون اول يك سري كلمه فارسي داريم(در هر سلول مي تواند چند كلمه باشد)
    در شيت دوم در ستون اول ان تمام كلمات فارسي و در ستون دوم معاني آنها وجود دارد.

    مي خوام در شيت اول در ستون دوم معادل انگليسي هر كلمه نوشته بشه.

    dictionary
    با درود فراوان
    من فایل شما رو نتونستم ببینم فکر کنم جایی که آپلود کردی برای من فیلتر بود

    ولی در مورد پیدا کردن یک کلمه در یک لیست و اینکه معنی آن را پیدا کرده و مقابل آن بنویسد راهای زیادی هست که می توان از حلقه های مثل For و یا For Each استفاده کرد اما با شرایطی که شما گفته اید که در یک سل می تواند چند کلمه باشد اگر از چند کلمه یکی از آنها را در نظر داشته باشیم نمی توان سل شیت یک را یا سل شیت دو مقایسه کرد چون در آن حالت کل سل را در نظر میگیرد و نیاز هست حتما دوسل کاملا شبیه به هم باشد
    مثلا در شیت یک اگر داشته باشیم "شاگرد-محصل- دانش آموز" و این را بخواهیم در شیت دو پیدا کنید و مقابل این سل در شیت یک بنویسید ممکن است هیچ کلمه ای را معادل آن پیدا نکند اگر در شیت دو این کلمات را به همین صورت در یک سل ننوشته باشید
    پس نیاز هست که از این چند کلمه هرکدام را جدا گانه در نظر بگیرد و جستجو کند
    و همچنین برعکس آن اگر در شیت دو نیز چند کلمه هم معنی را در یک سل نوشته باشید باز هم با این مشکل بر خواهید خورد
    که یا میوانید کلمات هر سل را ابتدا جدا کرد و سپس برای جستجو از فایند در کد استفاده کینم که اگر در شیت دو هم چند کلمه در یک سل بود با مشکلی مواجه نشود

    با تشكر از نكاتي كه ذكر كرديد.
    آدرس فايل: http://s3.picofile.com/file/7372377953/Dictionary1.xlsx.html
    [hr]
    نقل قول نوشته اصلی توسط jansiz hayat
    با سلام.
    این فایل به عنوان نمونه می باشد در صورت تایید اشکالاتش رفع خواهد شد:
    Dic
    با تشكر فراوان از وقتي كه گذاشتيد، برنامتون جواب داد.

  4. #4


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

    یوزرفرم پیشرفته
    آخرین بازدید
    2018/06/18
    تاریخ عضویت
    February 2011
    محل سکونت
    تهران
    نوشته ها
    311
    امتیاز
    1448
    سپاس
    129
    سپاس شده
    560 در 159 پست
    تعیین سطح نشده است

    s.cheraghi به Yahoo ارسال پیام

    RE: ديكشنري

    با سلام و تشکر از علی آقا

    یک فایل براتون آماده کردم
    امیدوارم کمکتون کنه

    Dictionary

  5. #5


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

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

    RE: ديكشنري

    نقل قول نوشته اصلی توسط maryam62
    فرض كنيد
    در شيت اول در ستون اول يك سري كلمه فارسي داريم(در هر سلول مي تواند چند كلمه باشد)
    در شيت دوم در ستون اول ان تمام كلمات فارسي و در ستون دوم معاني آنها وجود دارد.

    مي خوام در شيت اول در ستون دوم معادل انگليسي هر كلمه نوشته بشه.

    dictionary
    با درود فراوان
    من فایل شما رو نتونستم ببینم فکر کنم جایی که آپلود کردی برای من فیلتر بود

    ولی در مورد پیدا کردن یک کلمه در یک لیست و اینکه معنی آن را پیدا کرده و مقابل آن بنویسد راهای زیادی هست که می توان از حلقه های مثل For و یا For Each استفاده کرد اما با شرایطی که شما گفته اید که در یک سل می تواند چند کلمه باشد اگر از چند کلمه یکی از آنها را در نظر داشته باشیم نمی توان سل شیت یک را یا سل شیت دو مقایسه کرد چون در آن حالت کل سل را در نظر میگیرد و نیاز هست حتما دوسل کاملا شبیه به هم باشد
    مثلا در شیت یک اگر داشته باشیم "شاگرد-محصل- دانش آموز" و این را بخواهیم در شیت دو پیدا کنید و مقابل این سل در شیت یک بنویسید ممکن است هیچ کلمه ای را معادل آن پیدا نکند اگر در شیت دو این کلمات را به همین صورت در یک سل ننوشته باشید
    پس نیاز هست که از این چند کلمه هرکدام را جدا گانه در نظر بگیرد و جستجو کند
    و همچنین برعکس آن اگر در شیت دو نیز چند کلمه هم معنی را در یک سل نوشته باشید باز هم با این مشکل بر خواهید خورد
    که یا میوانید کلمات هر سل را ابتدا جدا کرد و سپس برای جستجو از فایند در کد استفاده کینم که اگر در شیت دو هم چند کلمه در یک سل بود با مشکلی مواجه نشود

  6. #6


    آخرین بازدید
    2023/05/03
    تاریخ عضویت
    January 2012
    محل سکونت
    استان اردبیل / شهرستان پارس آباد (مغان)
    نوشته ها
    1,213
    امتیاز
    2633
    سپاس
    1,399
    سپاس شده
    2,089 در 665 پست
    سطح اکسل
    73.00 %

    Javid Mokhtari به Yahoo ارسال پیام

    RE: ديكشنري

    با سلام.
    این فایل به عنوان نمونه می باشد در صورت تایید اشکالاتش رفع خواهد شد:
    Dic

  7. #7


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

    یوزرفرم پیشرفته
    آخرین بازدید
    2018/06/18
    تاریخ عضویت
    February 2011
    محل سکونت
    تهران
    نوشته ها
    311
    امتیاز
    1448
    سپاس
    129
    سپاس شده
    560 در 159 پست
    تعیین سطح نشده است

    s.cheraghi به Yahoo ارسال پیام

    RE: ديكشنري

    پوزش بابت فایل اشتباه

  8. #8


    آخرین بازدید
    2022/07/10
    تاریخ عضویت
    May 2012
    نوشته ها
    13
    امتیاز
    2
    سپاس
    0
    سپاس شده
    2 در 1 پست
    سطح اکسل
    72.00 %

    RE: ديكشنري

    نه مریم جان
    من این برنامه رو برای تعداد کاراکترهای متفاوت تست کرده ام و جواب داده
    البته باید بگم که واژه ای که در شیت 1 قرار داره می باید به لحاظ تعداد کاراکتر و نحوه نوشتن با بانک دیکشنری شما کاملا یکسان باشه و اگر فرمول exact رو بنویسی مقدار true به شما بده.
    اگر به گونه دیگری باشد برنامه جواب نمی ده.
    در ادامه تستی که برای این برنامه و بانک دیکشنری رو قرار دادم و شما می تونی کاملا نتیجه رو ببینی .
    test
    bank
    dic

  9. #9


    آخرین بازدید
    2012/05/27
    تاریخ عضویت
    April 2012
    نوشته ها
    22
    امتیاز
    3
    سپاس
    0
    سپاس شده
    2 در 2 پست
    تعیین سطح نشده است

    RE: ديكشنري

    نقل قول نوشته اصلی توسط ali66
    نه مریم جان
    من این برنامه رو برای تعداد کاراکترهای متفاوت تست کرده ام و جواب داده
    البته باید بگم که واژه ای که در شیت 1 قرار داره می باید به لحاظ تعداد کاراکتر و نحوه نوشتن با بانک دیکشنری شما کاملا یکسان باشه و اگر فرمول exact رو بنویسی مقدار true به شما بده.
    اگر به گونه دیگری باشد برنامه جواب نمی ده.
    در ادامه تستی که برای این برنامه و بانک دیکشنری رو قرار دادم و شما می تونی کاملا نتیجه رو ببینی .
    test
    bank
    dic
    بازم متشكرم اما من در اين حالت جواب نگرفتم
    [hr]
    نقل قول نوشته اصلی توسط jansiz hayat
    با سلام.
    این فایل به عنوان نمونه می باشد در صورت تایید اشکالاتش رفع خواهد شد:
    Dic
    برنامه ميتونه طوري تغيير كنه كه جايي كه رشته پيدا ميشه position اون رو برگردونه و در سلول نتيجه، معادل كلمه هم دقيقا در همان مكان قرار بگيره تا ترتيب كلمات حفظ بشه.

  10. #10


    آخرین بازدید
    2022/07/10
    تاریخ عضویت
    May 2012
    نوشته ها
    13
    امتیاز
    2
    سپاس
    0
    سپاس شده
    2 در 1 پست
    سطح اکسل
    72.00 %

    RE: ديكشنري

    پس احتمالا اگر من منظور شما رو درست متوجه شده باشم می خوای دیکشنری باشه که با استفاده از بانک لغات شما یک جمله رو برگردون کنه (حالا از فارسی به انگلیسی و یا بالعکس)؟
    حالا اگر اینطوری هستش دلیل انجام چنین کاری رو می تونم بدونم چیه؟


صفحه 1 از 2 12 آخرینآخرین

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

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

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

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

  1. ثبت اطلاعات با يكبار تغير
    توسط tohidi6405 در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 3
    آخرين نوشته: 2013/11/05, 16:06
  2. نمايش ساختار بانك اطلاعاتي مايكروسافت پروجكت در اكسل
    توسط mrexcel در انجمن آموزش ساير موضوعات در اكسل
    پاسخ ها: 0
    آخرين نوشته: 2010/10/26, 08:42

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

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

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

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

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