salehamr

مطلوب كود إخفاء أعمدة في الإكسل بإستخدام الرقم عوضاً عن الرمز

كمثال :

إخفاء العمود رقم 5 ، 6 

إخفاء الأعمدة من رقم 7 إلى 15

اخي الفاضل رعاك الله فكرة جيدة وشكراً

أخي الكريم لكم الشكر على تفضلكم بالرد ولكني أستخدم آكسس 2003 وبالمناسبة كيف يمكن تحويل الأكواد للعمل على آكسس 2010.

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

بإستخدام ToolBox _ tab control يمكن عمل صفحات متعددة والسؤال كيف يمكن التعامل مع كل صفحة بالإضافة والتعديل و.... وأن يكون لكل صفحة مصدر بيانات مستقل

على سبيل المثال : كيف يمكن عمل نموذج بإسم ( الموظفين ) به عدة صفحات :

Page1: البيانات الرئيسية للموظف :رقم ، إسم ، عنوان ، تلفون ، .......

Page2: نموذج الإجازات : نوع الإجازة ، تاريخ تقديمها ، الفترة ، .....

Page3: نموذج للمغادرات

وهكذا

الشكر المسبق لكل من يساهم في الإجابة أرجو الله أن تكون في ميزان حسناتكم .

أخوتي لكم الشكر على ما قدمتموه من أفكار جميلة جزاكم الله خيراً

أرجو المساعدة كيف يمكن عمل مربع تحرير وسرد يكون مصدر بياناته أسماء النماذج والجداول والإستعلامات والتقارير في قاعدة الببانات.

ولكم منا كل التحية والتقدير وجزاكم الله خيراً .

[

left]Dim objConnect As OleDbConnection

Dim objCommand As OleDbCommand

objConnect = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;data source =supermarket2003.mdb")

objConnect.Open()

Dim sql As String

txtnum هو عبارة عن textbox في شاشة الvb و item_name, item_no هو اسم fields في جدول ال product

sql = "SELECT item_name FROM product where item_no = txtnum.text"

objCommand = New OleDbCommand(sql, objConnect)

Dim objReader As OleDbDataReader = objCommand.ExecuteReader[/left

عندما يصل الى هذه الجملة يعطي الخطأ التالي = No value given for one or more required parameters]

شكراً للأخ خبور خير على رده ولكن المطلوب قد يكون أوضح عند ملاحظة المرفق حيث لم أتمكن من الكتابة بالعربي كعنوان لــ Lable

gلم أتمكن من إرفاق الملف حيث تظهر لي العبارة التالية

Error You aren't permitted to upload this kind of file

_____.rar

شكراً للأخ خبور خير على رده ولكن المطلوب قد يكون أوضح عند ملاحظة المرفق حيث لم أتمكن من الكتابة بالعربي كعنوان لــ Lable

gلم أتمكن من إرفاق الملف حيث تظهر لي العبارة التالية

Error You aren't permitted to upload this kind of file

شكراً للأخ خبور خير على رده ولكن المطلوب قد يكون أوضح عند ملاحظة المرفق حيث لم أتمكن من الكتابة بالعربي كعنوان لــ Lable

تظهر إسم ورقة العمل المكتوب بالعربي في ألـ VBA Project : على النحو

(?????)Sheet10

بينما المكتوب باللغة الإنجليزية يظهر صحيحاً كما هو مكتوب برجاء إعلامي عن السبب والحل مع الشكر الجزيل

مما يتسبب في تعطيل الأكواد المعرفة على أسماء أوراق العمل المدرجة بالعربي

هل من مجيب جزاكم الله خيراً

في حال كان ملف إكسل مفتوح وأرغب في إدراج زر يقوم بفتح ملف وورد محدد على صفحة معينة مع إبقاء ملف الإكسل مفتوح

لطفاً ما هو الكود مشفعاً بمثال عملي مع جزيل الشكر

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

كيف يمكن إستخدام دالتي MIN و Max بشرط كما هو الحال في Sumif و Countif

السادة مشرفي الآكسس المحترمين السؤال جدير بالإهتمام وأرجو ممن وجد الحل أن لا يبخل بالإجابة شاكرين للجميع حسن التعاون

ندعو الله أن ينصر إخواننا في غزة وفلسطين وأن يحقن دماؤهم ويمددهم بمدد من عنده ، تغمد الله شهداؤنا بالرحمة وألهم ذويهم الصبر والسلوان وأن يشفي جراح إخواننا وأن يرينا في أعدائنا عجائب قدرته " ياحي قيوم برحمتك نستغيث يا الله يا الله يا الله "

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

جزاكم الله خيراً

الشكر الموصول للأخ اكسيلجي على الرد السريع في زمن قياسي جزاك الله عنا كل خير وإلى جميع مشرفي هذا المنتدى الجميل تقبل الله طاعاتكم وكل عام وأنتم بخير :

تضمن ردكم أخي :

ترتيب للبيانات في ألــ ListBox تصاعدياً حسب حقل يتم إختياره من كمبو بوكس فماذا لو أردنا أن يكون الترتيب تنازلياً

البحث ضمن بأي جزء من الحقل فماذ لو كنا نريد البحث ببداية الحقل ، بنهاية الحقل أيضاً

ترويسة البيانات في ألــ ListBox من خلال label فهل يمكن أن تكون ضمن ألــ ListBox كباقي البيانات

شاكراً لك ولكل من تسعفه خبرته في الإجابة على الإستفسارات أعلاه جعلها الله في ميزان حسناتكم وتقبل الله طاعاتكم

تحية طيبة الى الاخ اكسيلجي وإلى جميع مشرفي هذا المنتدى الجميل تقبل الله طاعاتكم وكل عام وأنتم بخير إسمحوا لي بهذا الإستفسار حول نفس المثال :

هل يمكن :

عمل ترتيب للبيانات في ألــ ListBox تصاعدياً أو تنازلياً حسب حقل يتم إختياره من كمبو بوكس

إظهار ترويسة البيانات في ألــ ListBox دون الحاجة لإدراج ليبل بالترويسات

إمكانية البحث ضمن الإحتمالين : بداية الحقل ، نهاية الحقل إضافة لما هو حالياً بأي جزء من الحقل

شاكراً لكل من تسعفه خبرته في الإجابة على الإستفسارات أعلاه جعلها الله في ميزان حسناتكم

كيف يمكن عمل قناع إدخال لمربع نص في الفورم ( الأرقام ، التاريخ ، .... )

على سبيل المثال :

التاريخ على الصيغة DD/MM/YYYY

الأرقام بالصيغة "0.000_ ;[Red]-0.000 "

جميل جداً إستخدام دوال عدد الأحرف والإستبدال وإجراء عمليات الجمع والقسمة عليها

وصلت الفكرة ، ولك جزيل الشكر وعظيم الإمتنان وجعلها الله في ميزان حسناتك .

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

تحياتي :

هل من مجيب ؟؟؟؟

أخوتي المطلوب :

البحث في قائمة الأسماء عن :

الأسماء التي ورد بها ( يوسف أو احمد أو سليم ) بأي مقطع من الإسم على سبيل المثال أن تكون قيمة الخلية المقابلة على النحو التالي :

إذا تضمن الإسم : يوسف .......... قيمة الخلية المقابلة = 1

إذا تضمن الإسم : احمد.......... قيمة الخلية المقابلة = 2

إذا تضمن الإسم : سليم.......... قيمة الخلية المقابلة = 3

تحياتي للجميع أفيدوني أفادكم اللـــه .

ثلاث أسماء

شكرا

شكراً أخي على تجاوبك وجزاك الله خيراً فعلياً إستفدت من المثال ولكن طلبي ليس هذا وإنما :

كود يحدد فيما إذا كان النص الموجود ( الإسم ) في الخلية يتضمن كلمة ....... مثلاً تكون قيمة الخلية المقابلة 1 وهكذا

مثال :

سالم محمد احمد يوسف .............. كونه يحتوي على كلمة يوسف تكون قيمة الخلية المقابلة 1

كمال احمد سليم ماجد .................كونه يحتوي على كلمة احمد تكون قيمة الخلية المقابلة 2