اذهب الي المحتوي
أوفيسنا

مساعدة فى استيراد بيانات من جدول الي فورم


الردود الموصى بها

برجاء المساعدة فى استيراد بيانات من جدول الي فورم معين وبعد التعديل عليها من داخل الفورم نقوم بتصديرها مرة اخري

مرفق ملف به مثال جدول + فورم + تفاصيل الشرح

ولكم فائق الشكر والاحترام

Get_Mod.rar

رابط هذا التعليق
شارك

أخي العزيز

رجاء الاطلاع على المرفق وقد تم إلغاء مفتاح استدعاء البيانات حيث الاستدعاء يتك بشكل تلقائي بمجرد إختيار الإسم من ال COMBOBOX كما أن التعديل متاح للإسم أيضاً لا أدري إن كان هذا يمثل إضافة مفيدة بالنسبة لك أم لا ولكن أخبرني إن كان غير مطلوب تعديل الإسم .

تحياتي

أبو عبدالله

Get_Mod.rar

رابط هذا التعليق
شارك

الله ينور عليك والله هو دا المطلوب بالضبط لكن فى مشكلة لو جربت التعديل علي خليه بيسأل للتأكيد وبضغط اوك فبيعدل عليها ولكن بعد التعديل بيعطي ايرور ويعلم علي الامر دا


    Me.TextBox1.Text = fAddr.Offset(0, -1).Value

رابط هذا التعليق
شارك

بصراحة ممتاز

وجزاك الله كل خير لكن استفسار بسيط

هل فى طريقة تخلي الكومبو بوكس لما يعرض الداتا يعرض الخلايا الممتلئة فقط ويتغاضي عن الخلايا الفارغة ام شرط انو يعرض كل الخلايا

وجزاك الله كل خير

رابط هذا التعليق
شارك

أخي العزيز

أنا استخدم اكسيل 2007 وما قصدته هو تعديل تعريف النطاق NAMES من NAME MANAGER وليس بالكود - يعني من NAME MANAGER اختر النطاق NAMES ثم من EDIT ومن REFERS TO الصق =OFFSET(Sheet1!$B$2;0;0;COUNTA(Sheet1!$B:$B);1) مكان الموجود بالحقل .

المرفق تم التطبيق به .

تحياتي

Get_Mod-1.rar

رابط هذا التعليق
شارك

فى الحقيقة انا عاجز عن الشكر

تسلم علي مجهودك وتعبك معايا وجزاك الله كل خير

لكن مازالت هناك مشكلة حاول اضافة اى كلمة فى الخانات السفلي ولن تظهر فى القائمة للاسف

وان ظهرت تظهر فى الوسط الخلايا الفارغة

Get_Mod-1.rar

تم تعديل بواسطه DBA.Oracle
رابط هذا التعليق
شارك

أخي العزيز

أظن أنه من المنطقي أنك تتعامل مع جدول به بيانات متصلة ولم تشير من قبل بأنه وارد ترك فراغات بين كل سجل وآخر وعلى هذا الأساس تم التعامل مع طلبك وتغيير تعريف النطاق NAMES من تعريف نطاق عادي إلى التعريف الأخير الذي أرفقته لك بردي الأخير وهو ما يطلق عليه ال DYNAMIC RANGE لن يعالج الفراغات الموجودة بين صفوف السجلات ، وأنا حقيقة لا أفهم السبب وراء رغبتك في ترك فراغات إذا كنا نتحدث عن جدول كل صف فيه يمثل سجل معلوماتي ، وهذا التوضيح حسب ما لدي من معلومات وأتمنى ممن لديه حل لطلبك أن يتدخل مشكوراً .

تقبل تحياتي

أبو عبدالله

رابط هذا التعليق
شارك

اخى ابو عبد الله

جزاك الله كل خير علي مجهودك معي

واعتذر عن عدم توضيح الفكرة بالطريقة الصحيحة و أرضي بما قدمته لي من مساعدة ولا اطمع فى المزيد لذا لا تعتقد ان معلوماتك ذهبت بلا فائدة بالعكس فلقد قمت بتقديم معلومات مهمة جدا اليوم ولك جزيل الشكر علي ذلك ولا املك غير الدعاء لك ولوالديك

رابط هذا التعليق
شارك

اخى عبد الله

وجدت الحل والحمد لله من مثال سابق من موقع اجنبي

استبدلت استخدام الرو سورس بهذا ونفعت الحمد لله ولك جزيل الشكر علي مجهودك معي


Private Sub ComboBox1_Enter()

Dim i As Integer

Dim final As Integer

Dim tareas As String


ComboBox1.BackColor = &H80000005


For i = 3 To ComboBox1.ListCount



               ComboBox1.RemoveItem 0


           Next i


For i = 4 To 1000

If Sheet1.Cells(i, 3) = "" Then

final = i - 3

Exit For

End If

Next






For i = 4 To 1000

tareas = Sheet1.Cells(i, 3)

If tareas <> "" Then

ComboBox1.AddItem (tareas)

Else

End If

Next




End Sub

رابط هذا التعليق
شارك

أخي العزيز

أشكرك جداً على المعلومة ولكن لدى نقل الكود لاخر مرفق بالمشاركة تحدث مشكلة عند استدعاء الفورم ويعطي error بنفس الكود فأرجو التكرم بإرفاق ملف مطبق عليه الكود كي تتضح الفائدة من الكود .

تقبل شكري

أبو عبدالله

رابط هذا التعليق
شارك

اخي عبد الله

الكود موجود فى هذا الملف فى يوزر فورم 28

بس بدون التعديل اللى انا ضيفته ليجعله لا يضيف الخلايا الفارغة

الملف دا جميل جدا هو من موقع اجنبي ولكن احد الاخوة الافاضل فى المنتدي فك الحماية عنه

ولك جزيل الشكر

Macro_Excel_Stocks_warehouses_unlocked.rar

رابط هذا التعليق
شارك

تفضل اخي عبد الله مرفق مثال بالكود المعدل

وهذا هو ما كنت اقصده فى طلبي ولك فائق الاحترام وكل الشكر علي معاونتك ليlast.rar

تم تعديل بواسطه DBA.Oracle
رابط هذا التعليق
شارك

اخى الكريم ابو عبد الله ممكن تعديل كود الفورم ليتهامل مع ارقام لانة يتعامل مع حروف فقط الموجودة فى نطاق names

اريد الخانة 2 و3و4 تعرض بيانات b2 b3 b4 وتعدل كذلك بيانات لb2 b3 b4 والخانة الاولى اختار منها ارقام وليس حروف والثانية اعدل على الارقام الموجودة فى a2 ولكم جزير الشكر

رابط هذا التعليق
شارك

أخي العزيز / DBA.Oracle

أشكرك على المرفق والفكرة جداً قيمة .

تقبل تحياتي

أبو عبدالله

أخي العزيز / key_ro

أرجو توضيح طلبك بشكل أوضح واتمنى يكون على الملف المرفق حتى أستطيع المساعدة إن شاء الله .

تحياتي

رابط هذا التعليق
شارك

أخي العزيز / DBA.Oracle

أشكرك على المرفق والفكرة جداً قيمة .

تقبل تحياتي

أبو عبدالله

أخي العزيز / key_ro

أرجو توضيح طلبك بشكل أوضح واتمنى يكون على الملف المرفق حتى أستطيع المساعدة إن شاء الله .

تحياتي

اشكرك جدا على الاهتمام ومرفق ملف به المطلوب

Get_Mod-1.rar

رابط هذا التعليق
شارك

  • 3 years later...

أخي العزيز / key_ro

رجاء الاطلاع على المرفق .

تحياتي

أبو عبدالله

السلام عليكم

أستاذنا / عبد الله

أنا اريد ان اضيف اكثر من Label  و  TextBoxوهذا سهل

هل ممكن ان نجعل Label  في الفورم ان يأخذ اسم العمود بالتدريج مباشرة بدلا من دخولي الى البرمجة و اضافة الاسم يدويا

اي اجعل الجدول من  5 اعمدة مثلا     الاسم - الترتيب - الصف - الدرجة - اسم الاب

لكن Label و TextBox في الفورم 6     فاول ما اضيف اسم للعمود 6 بالجدول  اريده ان يظهر بالفورم

 

 

ارجو ان تكون وصلت فكرتي

وشكرا

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information