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

موضوع: چگونگی عدم ورود اطلاعات خارج از لیست بویسیله ماکرو نویسی

  1. #1

    آخرین بازدید
    2017/10/21
    تاریخ عضویت
    October 2017
    نوشته ها
    4
    امتیاز
    11
    سپاس
    0
    سپاس شده
    1 در 1 پست
    تعیین سطح نشده است

    چگونگی عدم ورود اطلاعات خارج از لیست بویسیله ماکرو نویسی

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

نام:  error.jpg
مشاهده: 10
حجم:  146.7 کیلو بایتی خارج از لیست مورد نظر فرم با ارور مواجه میشه . برای جلوگیری از ورود کد کالا خارج از لیست چه دستوری رو باید وارد کنم.
    این هم کدیه که نوشته شده :
    Private Sub CommandButton3_Click()
    num = Application.WorksheetFunction.CountA(Range("a:a")) + 1
    If TextBox2.Text <> Empty Then
    Sheets("sheet1").Cells(num, 2).Value = TextBox2.Value
    TextBox3.Value = Sheets("sheet1").Cells(num, 3).Value
    Else
    MsgBox "کدکالا را مشخص نمایید "
    End If
    TextBox1.SetFocus
    End Sub
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.
    پاسخ مورد نظر براي اين تاپيك ارسال شده است.

  2.  

  3. #2


    آخرین بازدید
    2024/01/21
    تاریخ عضویت
    November 2013
    محل سکونت
    تهران
    نوشته ها
    1,519
    امتیاز
    6121
    سپاس
    2,884
    سپاس شده
    4,889 در 1,381 پست
    سطح اکسل
    71.67 %

    سلام،
    بايد يا از کمبوبکس استفاده کنيد که فقط بتوان از ليست مورد نظر کد را فراخوان کرد و يا به يک نحوي جلوي ورود کد خارج ليست را گرفت، با مشخصاتي که فرستاديد خيلي مسئله مفهوم نيست، يک فايل خام نمونه مي توانيد بفرستيد؟
    ویرایش توسط Ali Parsaei : 2017/10/10 در ساعت 16:52

  4. سپاس ها (1)


  5. #3

    آخرین بازدید
    2017/10/21
    تاریخ عضویت
    October 2017
    نوشته ها
    4
    امتیاز
    11
    سپاس
    0
    سپاس شده
    1 در 1 پست
    تعیین سطح نشده است

    باسلام و تشکر بابت پاسخگویی شما فایل رو به پیوست ارسال کردم با کلیک بر روی نام کالا اگر کد کالای وارد شده درون لیست موجود( list )نباشد با ارور مواجه میشویم
    فايل هاي پيوست شده فايل هاي پيوست شده
    • نوع فایل: zip input.zip اطلاعات (244.0 کیلو بایت, 16 نمایش)

  6. #4


    آخرین بازدید
    2024/01/21
    تاریخ عضویت
    November 2013
    محل سکونت
    تهران
    نوشته ها
    1,519
    امتیاز
    6121
    سپاس
    2,884
    سپاس شده
    4,889 در 1,381 پست
    سطح اکسل
    71.67 %

    يک مقدار فرمتان ايراد ساختاري دارد،
    با اين وجود من يک بررسي کلي کردم، اگر خط پنجم کد خود را اينطور تغيير دهيد علي الحساب ديگر کد متوقف نخواهد شد، نهايت اينکه مقدار خطاي داخل سل را در قسمت نام کالا نشان مي دهد و مي فهميد که کد اشتباه است، البته اين کار اصولي نيست:
    کد PHP:
    TextBox3.Text Sheets("sheet1").Cells(num3).Text 
    يک مقدار فرمتان را هم تغيير دادم، فايل ضميمه را ببينيد، البته چون دستکاري اش کرده ام خيلي قسمتها احتمالا" کار نخواهد کرد، ولي منظورم فقط اين بود که ببينيد اين طور هم مي شود کار کرد:
    فايل هاي پيوست شده فايل هاي پيوست شده
    • نوع فایل: xlsm Input.xlsm اطلاعات (407.0 کیلو بایت, 15 نمایش)

  7. سپاس ها (2)


  8. #5

    آخرین بازدید
    2017/10/21
    تاریخ عضویت
    October 2017
    نوشته ها
    4
    امتیاز
    11
    سپاس
    0
    سپاس شده
    1 در 1 پست
    تعیین سطح نشده است

    سپاس فراوان از محبت شما


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

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

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

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

  1. پرسش جستجوی اطلاعات در لیست باکس و نمایش آن در لیست باکس یا...
    توسط kamyar در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 11
    آخرين نوشته: 2019/02/27, 11:11
  2. استفاده از لیست ویو در یوزرفرم به جای لیست باکس
    توسط bahman_220 در انجمن فرم ها در ويژوال بيسيك - Forms in VBA
    پاسخ ها: 0
    آخرين نوشته: 2016/12/28, 15:44
  3. پیروی یک لیست (data validation ) از داده انتخاب شده لیست قبل
    توسط mahdi-68 در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 4
    آخرين نوشته: 2016/11/03, 21:54
  4. استفاده همزمان از سلول که فرمول می نویسیم
    توسط moslemi در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 2
    آخرين نوشته: 2014/06/16, 11:50
  5. فوری ... چگونه در رجیستری بنویسیم و یا بخوانیم ؟
    توسط afshin160 در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 2
    آخرين نوشته: 2013/01/24, 19:18

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

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

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

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

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