قائمة التحقق من الصحة --خاصة-

[ريان أحمد]

السلام عليكم

أريد من فضلكم قائمة تحتوي على أرقام في خلايا مختلفة

va.rar

تم تعديل نوفمبر 8, 2012 بواسطه ريان أحمد

[أم عبد الله]

السلام عليكم ورحمة الله وبركاته أخي / ريان أحمد

القائمة المنسدلة على حد علمي البسيط لا تكون في خلايا متفرقة لذلك جمعتها لك في عمود واحد وعملت لك القائمة تفضل الملف.

va1.rar

[رجب جاويش]

بعد اذن أخى الفاضل /fzsss

يمكن تجميع الخلايا المتفرقة من خلال هذا الكود

Sub ragab()

E = 4

For C = 6 To 26

For R = 1 To Cells(Rows.Count, C).End(xlUp).Row

If Cells(R, C).Value <> Empty Then

Cells(E, 4) = Cells(R, C)

E = E + 1

End If

Next

Next

End Sub

وهو يعمل على تجميع الخلايا المتفرقة فى أى خلية من خلايا الأعمدة من F حتى Z ويمكن تغيرها

ويقوم بعمل قائمة مرنة فى العمود D المخفى

واستخدام هذه القائمة فى عمل قائمة الـ DATA VALIDATION المطلوبة

قائمة منسدلة من عدة خلايا متفرقة.rar

[أم عبد الله]

أستاذنا الجليل / رجب جاويش

زادك الله علماً وجعله في ميزان حسناتك وأنا على أبواب علم أساتذة المنتدى الرائع وجزاك الله خيراً.

وسؤالي هل يمكن تحويل هذا الكود إلى معادلات. ولك كل التحية والتقدير.

[الخالدي]

السلام عليكم ورحمة الله وبركاته

حل اخر بكود في حدث الورقة

Private Sub Worksheet_Selectionchange(ByVal Target As Range)

If Target.Address <> [B6].Address Then Exit Sub

For Each cl In Range("J2,F8,J9,M11,F15,G16,J16,H28")

Arr = Arr & cl & ","

Next

    With [B6].Validation

	    .Delete

	    .Add Type:=3, Formula1:=Arr

	    .ErrorMessage = "ادخال غير صحيح"

	    .ShowError = True

    End With

Arr = ""

End Sub

قائمة منسدلة من خلايا متفرقة.rar

[ريان أحمد]

أستاذي رجب وأستاذي الخالدي شكرا جزيلا وجزاكم الله كل خير

[رجب جاويش]

أخى الفاضل /fzsss

شكرا جزيلا أخى الفاضل على هذه الكلمات الطيبة

أعتقد أن هذا العمل أسهل كثيرا بالأكود لذا لم أفكر أصلا فى تنفيذه بالمعادلات

[رجب جاويش]

الاستاذ الكبير / الخالدى

تسلم ايديك وتسلم لمساتك السحرية على الأكواد

[رجب جاويش]

أخى الفاضل / ريان أحمد

شكرا جزيلا أخى الفاضل وجزاك الله كل خير

[ريان أحمد]

السلام عليكم

أخي كيف أعدل الكود حيث يصبح القائمة في ورقة والخلايا التي في القائمة في ورقة أخرى

[رجب جاويش]

تفضل أخى

قائمة منسدلة من عدة خلايا متفرقة.rar

[ريان أحمد]

شكرا جزيلا أستاذي

هل هناك حل آخر

المشكلة أنه لديا في الصفحة التي فيها الخلايا عدة أرقام غير معنية بقائمتي وتواريخ ونصوص غير معنية بالقائمة

تم تعديل نوفمبر 11, 2012 بواسطه ريان أحمد

[رجب جاويش]

أخى الفاضل

أرجو توضيح ما تقصده أكثر

[ريان أحمد]

شاهد المرفق

ere.rar

تم تعديل نوفمبر 12, 2012 بواسطه ريان أحمد

[رجب جاويش]

تفضل أخى

قائمة منسدلة من عدة خلايا متفرقة.rar

[ريان أحمد]

شكرا جزيلا وجزاك الله كل خير وبارك الله في عمرك وفي صحتك