تنظیم data validation با کد؟؟؟

[mastg]

آیا با کد میشه کاری رو که در "دیتا ولیدیشن" انجام میدم، انجام داد.
اینکه مقدار یک "سلول"، از یک "لیست" مثلا به نام "list1" گرفته بشه.
list1 هم a1 تا a5 هست؟؟

[Ali Parsaei]

سلام،
سوالات در مورد "کد" مربوط به تالار ويژوال بيسيک مي باشد، لطفا" در آن تالار سوالتان را مطرح فرماييد.
تنظيم ديتاوليديشن با کد هم امکان پذير است، يک ماکرو ضبط کنيد و بعد ديتاوليديش مورد نظرتان را ايجاد کرده و ماکرو را خاتمه دهيد، سپس کد ماکرو را نگاه کنيد و متوجه مي شويد که چطور بايد کدنويسي کنيد، ريزه کاري اش را هم با تغيير در همان کد اصلي که از ماکرو به دست مي آوريد مي توانيد تنظيم کنيد.

[iranweld]

با سلام

در تکمیل فرمایشات جناب آقای مهندس پارسا میتوانید در محیط vb یک محدوده تعریف کنید و هم میتوانید از لیست تعریف شده در محیط اکسل (Define Name) استفاده کنید

در دو مثال ذیل در اولی شما محدوده مورد نظر را تعریف میکنید و در مثال دومی از لیست موجود در محیط اکسل استفاده مینماید

Sub test1()

Dim LIST1, CELL As Range

Set LIST1 = Sheet1.Range("A1:A5")


For Each CELL In LIST1

MsgBox CELL

Next

End Sub 

مثال دوم

Sub TEST2()

Dim CELL As Range

For Each CELL In [LIST2]

MsgBox CELL

Next

End Sub 

[امين اسماعيلي]

ba drod

a kash , hade aghal mizashtin to talar marbote soal matrah beshe , bad javab midadin.