معتصم محمد قام بنشر أكتوبر 8, 2011 مشاركة قام بنشر أكتوبر 8, 2011 بسم الله الرحمن الرحيم الإخوة الأعزاء السلام عليكم ورحمة الله وبركاته اتمنى ان تكونوا بأفضل حال، وفي صحة جيدة بعد صدور قرار هيئة الإتصالات المصرية بتعديل بادئات ارقام المحمول لتصبح 11 رقماً بدلاً من 10 ارقام، قلت لما لا اقوم بتجربة تعديل الأرقام من خلال الإكسل فكانت النتيجة هذا الشيت ملحوظة : هذا العمل لا يساعد على تغيير الأرقام المخزنة على محمولك (في حالة انك من مصر) إنه فقط محاولة للتفكير في إيجاد حل لاحد الموضوعات المعاصرة ، ورغبة في تحسين مستواي في التعامل مع البرنامج ملحوظة 2 : إذا كان بالإمكان تعديل الكود المرفق بحيث يكون اقصر قليلا فأرجو المشاركة (تقصير الكود يعني استخدام اسلوب متقدم في التكويد وتحليل المشكلة بالتأكيد ) Function UMN(Mobile As Range) As String ' Update Mobile Number Dim Prefix As String Dim NPrefix As String Dim Suffix As String Select Case Len(Mobile) Case 10 Prefix = Left(Mobile, 3) Case 11 Prefix = Left(Mobile, 4) End Select Select Case Prefix Case "012": NPrefix = "0122" Case "017": NPrefix = "0127" Case "018": NPrefix = "0128" Case "010": NPrefix = "0100" Case "016": NPrefix = "0106" Case "019": NPrefix = "0109" Case "011": NPrefix = "0111" Case "014": NPrefix = "0114" Case "0150": NPrefix = "0120" Case "0151": NPrefix = "0101" Case "0152": NPrefix = "0112" End Select Suffix = Right(Mobile, 7) UMN = NPrefix & Suffix End Function Update Mobile Number.rar 3 رابط هذا التعليق شارك More sharing options...
saad abed قام بنشر أكتوبر 8, 2011 مشاركة قام بنشر أكتوبر 8, 2011 استاذ معتصم محمد شكرا لك وجزاك الله خيرا العمل ممتاز وسيكون الملف اجمل لو اضيف مكان رقمك القديم ومكان اخر التحديث اخوك سعد عابد رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر أكتوبر 8, 2011 مشاركة قام بنشر أكتوبر 8, 2011 السلام عليكم ======== عن الصادق المصدوق صلى الله عليه وسلم قوله:((إن لله عباداً اختصهم بقضاء حوائج الناس،حببهم إلىالخير،وحبب الخير إليهم،هم الآمنون من عذاب الله يوم القيامة)) بجد بجد بارك الله فيك يا معتصم ارحتنا بالكثير ولم يخطر على بالى هذا الموضوع رابط هذا التعليق شارك More sharing options...
ياسر الحافظ قام بنشر أكتوبر 8, 2011 مشاركة قام بنشر أكتوبر 8, 2011 اخي العزيز المعتصم اشكرك .... وجزاك الله كل الخير الغاية ان نتعلم الكيفية في تعديل الارقام جميل ... جزاك الله كل الخير وفقك الله ابو الحارث رابط هذا التعليق شارك More sharing options...
A L M A I S T R O قام بنشر أكتوبر 8, 2011 مشاركة قام بنشر أكتوبر 8, 2011 رائع اخ معتصم كنت جالس بفكر احاول اعمل حاجة مثل ذلك ولكنك قمت بالواجب بارك الله فيك رابط هذا التعليق شارك More sharing options...
معتصم محمد قام بنشر أكتوبر 9, 2011 الكاتب مشاركة قام بنشر أكتوبر 9, 2011 استاذ / سعد عابد للأسف ماذا تقصد ب وسيكون الملف اجمل لو اضيف مكان رقمك القديم ومكان اخر التحديث حيث ان الشيت المرفق به معادلة تاخذ الرقم القديم وتحوله للرقم الجديد ( دوال افتراضية بالإكسل) كذلك الدالة المستحدثة المذكورة في اول الموضوع كل ما عليك ان تعطيها الخلية التي تشتمل على الرقم القديم وستكون نتيجة الدالة الرقم الجديد الأستاذ / هشام شلبي العفو استاذ هشام، كل ما اردت القيام به هو تجربة امكانية استخدام الإكسل في عملية تعديل الأرقام، دون ان اعرف هل سيمكن ان نستفيد من ذلك فعلياً الأستاذ / ياسر الحافظ الشكر لله ، احاول ان اقدم شيئاً ولو يسير في هذا الصرح الكبير الأستاذ / المايستروا القلوب عند بعضها حسب قول احد المعارف انك تستطيع تصدير الأرقام على هيئة CSV وبالتالي سيمكنك استخدام الإكسل لتعديل الأرقام مرة واحدة ثم تقوم بإدخال الأرقام المعدلة مرة اخرى للمحمول الخاص بك هل يمكن تأكيد ذلك؟ رابط هذا التعليق شارك More sharing options...
edkawy قام بنشر أكتوبر 10, 2011 مشاركة قام بنشر أكتوبر 10, 2011 الاستاذ / معتصم بارك الله فيك , عندى ملف كنت محتاج اضيف التغييرات الجديدة دى و كنت هعملة يدوى لكن الملف اللى حضرتك عملتة حل الموضوع دة اتوماتيك , وكدة و الله وفرت عليا مشوار طويل . جزاك الله خير و جعلة فى ميزان حسناتك محمد سعد رابط هذا التعليق شارك More sharing options...
مجدى يونس قام بنشر أكتوبر 11, 2011 مشاركة قام بنشر أكتوبر 11, 2011 الاستاذ / معتصم بارك الله فيك عمل رائع لكن عندى مشكلة ترفض الخلية وجود الصفر كما فى الصورة المرفقة مجدى يونس رابط هذا التعليق شارك More sharing options...
ابو الآء قام بنشر أكتوبر 11, 2011 مشاركة قام بنشر أكتوبر 11, 2011 بارك الله فيك اخى الحبيب عمل رائع من سخص كريم رابط هذا التعليق شارك More sharing options...
احمد فضيله قام بنشر أكتوبر 11, 2011 مشاركة قام بنشر أكتوبر 11, 2011 جزاك الله كل خير رابط هذا التعليق شارك More sharing options...
مجدى يونس قام بنشر أكتوبر 11, 2011 مشاركة قام بنشر أكتوبر 11, 2011 اسف كان فيه مشكلة فى النت ارجوا معرفتى سبب عدم تسجيل الصفر تليفون.rar رابط هذا التعليق شارك More sharing options...
معتصم محمد قام بنشر أكتوبر 11, 2011 الكاتب مشاركة قام بنشر أكتوبر 11, 2011 الأستاذ / مجدي يونس سبب المشكلة انك تقوم بإدخال الرقم مباشرة للخلية وبالتالي سيقرأه الإكسل على انه قيمة رقمية وبالطبع الصفر في بدية القيم الرقمية ليس له قيمة وعليه يقوم الإكسل بحذف / إزالة هذا الصفر ويترتب على ذلك ان المعادلة ستكون نتيجتها غير صحيحة لذلك يجب عليك ضبط التنسيق أولاً للخلية لتكون Text وذلك من خلال الضغط على كنترول + 1 ليظهر مربع حوار تنسيق الخلية في تاب الأرقام Number نختار التصنيف Text ثم موافق الأن تستطيع كتابة الرقم وهو يبدأ بالصفر رابط هذا التعليق شارك More sharing options...
معتصم محمد قام بنشر أكتوبر 11, 2011 الكاتب مشاركة قام بنشر أكتوبر 11, 2011 الأستاذ / محمد سعد الأستاذ / ابو علاء الأستاذ / هانكوك اشكركم على مروركم الكريم، وطبعاً الحمدلله على ان الموضوع كان ذا عون لكم بالتوفيق للجميع رابط هذا التعليق شارك More sharing options...
يوسف عطا قام بنشر أكتوبر 11, 2011 مشاركة قام بنشر أكتوبر 11, 2011 حسب قول احد المعارف انك تستطيع تصدير الأرقام على هيئة CSV وبالتالي سيمكنك استخدام الإكسل لتعديل الأرقام مرة واحدة ثم تقوم بإدخال الأرقام المعدلة مرة اخرى للمحمول الخاص بك هل يمكن تأكيد ذلك؟ نعم هذا متاح وقد جربته ونجح ولكنى أعتقد أن إمكانية عمل نسخة من الأسماء المخزنة فى ذاكرة الهاتف ليتم نسخها فى كارت الميمورى غير متاح فى جميع الأجهزة جهازى قام بها ببساطة نوكيا N73 ولكن جهازى الآخر لم يفلح فى ذلك رابط هذا التعليق شارك More sharing options...
مجدى يونس قام بنشر أكتوبر 12, 2011 مشاركة قام بنشر أكتوبر 12, 2011 اشكرك جزيلا اخ معتصم وجذاك الله كل الخير مجدى يونس رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر أكتوبر 12, 2011 مشاركة قام بنشر أكتوبر 12, 2011 استاذ معتصم محمد عمل مميز وافكار رائعة ابواحمد رابط هذا التعليق شارك More sharing options...
معتصم محمد قام بنشر أكتوبر 12, 2011 الكاتب مشاركة قام بنشر أكتوبر 12, 2011 استاذ / يوسف شكراً على التاكيد ، واتمنى ان يكون الكون ذا فائدة لك استاذ / عبدالله المجرب شكراً على كلام الجميل وبالمناسبة انا لا استاذ ولا حاجة، كل ما في الموضوع لدي بعض المعلومات التي اقوم بمشاركتها معكم والتي ارجو ان تكون مفيدة لمن يطالعها شكراً لكم جميعاً على كلماتكم الجميلة رابط هذا التعليق شارك More sharing options...
فضل حسين قام بنشر أكتوبر 13, 2011 مشاركة قام بنشر أكتوبر 13, 2011 الاخ الفاضل / معتصم محمد عمل رائع وجميل بارك الله فيك وجزاك الله كل خير فضل رابط هذا التعليق شارك More sharing options...
egyblind قام بنشر أكتوبر 24, 2013 مشاركة قام بنشر أكتوبر 24, 2013 السلام عليكم ورحمة الله وبركاته ارجو مساعدتي لقد حاولت عمل الخطوات المذكورة ولكني لم استطع تنفيز المهم المطلوبة وهي تعديل الأرقام الموجودى لدى في ملف إكسل، وإن أمكن كيف يمكنني أن أضع علامة - شرطة بين كود الشركة والرقم مثال 0122-xxxxxxx أنا مبتدء في الإكسل ارجو شرح الخطوات كاملة، اعتزر للإطالة ولكن لدى نقطة ثانية كيف اجعلى إكسل يضيف 0 الذي تم حزفه بسبب تنسيق الخلية ليس نصي لأني أعاني من ذلك في عدد كبير من الأرقام. شاكر لاهتمامكم ومساعدتكم رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.