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

مساعدة في فتح احد صفحات ملف اكسل باستخدام VBA


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

السلام عليكم

انا اريد ان اعمل زر مرتبط بخلية( فيها رقم مثلا من 1 الى 10 ) بحيث اذا تغير الرقم في الخلية وضغطت الزر يذهب الى ورقة من ورقات ملف الاكسل بحسب الرقم

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

لكن بدون استخدام المايكرو وانما VBA

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

عليكم السلام

السلام عليكم

لكن بدون استخدام المايكرو وانما VBA

شاهد المرفق

التنقل بين جميع الشيتات بزر واحد.rar

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

شكرا لك

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

انا احتاج افهم كيف عملت الملف اللي عندك عشان اقدر استخدمة في حسابات اخرى

محل صرافة.rar

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

مرحبا بك إبراهيم

أولا : قائمة بأسماء الشيتات

ثانيا : الخلية التى بها الأسماء نعمل لها داتا فاليديشن بحيث تظهر بها القائمة السابقة

ثالثا : بالكود الموجود فى حدث التغيير بالصفحة ننتقل إلى اسم الشيت الموجود بالخلية

و هذا هو الكود الذى وضعته بكل الأوراق كى يمكنك العودة

Private Sub worksheet_change(ByVal target As Excel.Range)

Dim ws As Worksheet

For Each ws In Worksheets

If ws.Name = Sheets("1").Range("b1").Value Then

ws.Visible = True

ws.Select

End If

Next ws

End Sub

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

  • 3 months later...

بسم الله الرحمن الرحيم

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

كنت أبحث عما ورد في هذا الموضوع وجزاكم الله خير ولكن لي طلب من الأخ kemas في الحل الأخير وهو التنقل بين الشيتات تبع قيمة الخلية وهو عدم الإنتقال مباشرة للشيت الآخر بعد اختيار اسم الشيت ولكن بعد اختيار الشيت في الخلية يتم ضغط زر من خلاله يتم الإنتقال هذا وشكرا لكم وجزاكم الله خيرا

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

أخي العزيز kemas والله إنت عزيز على قلبي بدون ما شفتك معزة إلاهية

أخي كان عندي برنامج لتحويل ملف إكسل 2007 إلى 2003 ولأن إصبح ما عندي الرجاء تزويدي به

والبرنامج إلى كان عندي فيه مشكلة هو مجرد تنصيبه في جهازي لا أستطيع تثبيت مرة ثانية فين المشكل

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

الأستاذ الشهابي

ضع زرا فى صفحة الدين

ضع فى الكود الخاص بهذا الزر - حدث النقر

هذا الكود و هو نفس الكود الموجود

ثم كرر ذلك بباقى الصفحات

Dim ws As Worksheet

For Each ws In Worksheets

'If ws.Name <> "1" And ws.Name <> Sheets("1").Range("b1").Value Then

'ws.Visible = False

'End If

If ws.Name = Sheets("1").Range("b1").Value Then

ws.Visible = True

ws.Select

End If

Next ws

المرفقات

التنقل بين الشيتات تبع قيمة الخلية-kemas.rar

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

بسم الله الرحمن الرحيم

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

فتح النموذج بزر ماكرو.rar

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

  • 2 weeks later...

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

الأخ / خبير اكسل

بعد التحيه

هل لو ممكن تقولى ابسط طريقه لتعلم excel vb او موقع او اى شئ تراه مناسب مع العلم اننى لا امتلك اى معلومات عن البرمجه او الفيجوال بيسك

لاننى اريد عمل برنامج شئون موظفين يسهل على عملى

وهل يوجد ب اوفيس 2010 فيجوال بيسك ام لا و كيف اصل اليه

برجاء الرد

وتفضلوا سيادتكم بقبول فائق الأحترام

و شكراً

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

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

محرر فيجوال بيسك ملحق بجميع نسخ أوفيس بما فيها 2010

الوصول إليه من الشيت

Alt+F11

أما تعلم VB

فمن خلال متابعة مشكلات الإخوة هنا و حلول أعضاء المنتدى لها خطوة خطوة

وعمل برامج بسيطة للتدريب و اكتساب الخبرة و سؤال الأعضاء فيما تتوقف عنده

لى بعض شروح الفديو هنا متنوعة بين السهل و المتقدم

http://www.youtube.com/user/MsKemas

حوالى 60 فديو

و إن شاء الله تكون من المحترفين

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

  • 2 months later...

السلام عليكم

الشكر واصل للاخ الحبيب كيماس

على جهوده المتواصلة لنشر العلم

===================================

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

تفضل ملف اكسل 2007

هنا رابط التحميل

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

  • 2 weeks later...

الأخ خبور خير شكراً على مرورك وجزاك الله خيرا على الكودووهل ترى أسهل التعامل مع هذا الفورم أومن خلال فورم من خلال VBA ولو كان هذا مناسب هناك طلب آخر وهو أريد أن يظهر مع فورم الدرجات اسم التلميذمقفل غير قابل للتعديل إن أمكن ذلك وجزاك الله خير والعفو منك

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

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

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



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

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

Important Information