NAWAS قام بنشر أغسطس 12, 2003 قام بنشر أغسطس 12, 2003 السلام عليكم أريد معرفة كيف أعمل زر أمر بحيث كلما ضغطت عليه يضيف قيمة معينة إلى الخلية مثلاً سيكون لدي الخلية A1 في البداية ستكون فارغة فكيف سيكون الكود المطلوب لزر الأمر بحيث عند كل ضغطة يضيف واحد للقيمة الموجودة للخلية أو حسب القيمة التي أريد وشكراً
محمد طاهر عرفه قام بنشر أغسطس 12, 2003 قام بنشر أغسطس 12, 2003 و عليكم السلام و رحمة الله و بركاته Sub addone() Range("a1").Value = Range("a1").Value + 1 End Sub
mohammed55 قام بنشر مارس 15, 2004 قام بنشر مارس 15, 2004 السلام عليكم ورحمة الله وبركاته إذا كان القيمة اللتي إريد أن إدخلها في شيت ثانية كيف راح يكون الكود؟؟ شكرآ
ابومؤنس قام بنشر مارس 15, 2004 قام بنشر مارس 15, 2004 السلام عليكم ورحمة اللة , الكود لدخول الصفحة الثانية مثلا Sheets("ورقة2 ").Select بعد ذلك ادخل الامر المطلوب , واذا كان هو الكود السابق فانة يدرج بعد السطر الاول مباشرة وبالله التوفيق .
mohammed55 قام بنشر مارس 16, 2004 قام بنشر مارس 16, 2004 جزاك الله كل خير على الرد يا أبو مؤنس جربت وضع الكود في السطر الأول ولكن لم تعمل معي, وظهر لي رسائل بوجود خطأ في الكود. ممكن تكتبلي الكود؟؟ شكرآ
ابومؤنس قام بنشر مارس 16, 2004 قام بنشر مارس 16, 2004 السلام عليكم ورحمة الله , كان من المفترض ان يكتب الكود التي اعطيتك بعد السطر الاول ولكن اليك الكود كامل بعد تجربتة . Sub addone() Sheets("ورقة2").Select Range("a1").Value = Range("a1").Value + 1 End Sub هذا الكود يقوم بنقل من اي صفحة الي الصفحة الثانية ومن ثما الخلية a1 ويزيد علي القيمة التي فيها 1 وبالله التوفيق .
mohammed55 قام بنشر مارس 16, 2004 قام بنشر مارس 16, 2004 معليش تعبتك معاي ياأبو مؤنس, وضعت الكود بس مانفع راح أعيد سؤالي مرة ثانية ,لأني يمكن ماوضحته في البداية -أحتاج أضع زر في الشيت الثاني بحيث لما أضغط عليه يظهر لي قيمة A1 من الشيت الأول في A2 في الشيت الثاني شكرآ
ابومؤنس قام بنشر مارس 16, 2004 قام بنشر مارس 16, 2004 السلام عليكم ورحمة الله وبركاتة اليك الكود جرب وانا في انتظار الجواب Range("A2").Select ActiveCell.FormulaR1C1 = "=ورقة1!R[-1]C" Range("A2").Select End Sub وبالله التوفيق ,
mohammed55 قام بنشر مارس 17, 2004 قام بنشر مارس 17, 2004 معليش أتعبتك معاي أبو مؤنس الكود لم يعمل,( نسخة الإكسل عندي بالإنجليزي)
حسام نور قام بنشر مارس 17, 2004 قام بنشر مارس 17, 2004 أخي mohammed55 بعد إذن الأخ الغالي أبومؤنس فقد قمت بعمل ملف به الكود الذي ذكره لك أبومؤنس لكي يسهل عليك الأمر * تفضل بتحميله من هنا* وشكراً
الفدعاني قام بنشر مارس 18, 2004 قام بنشر مارس 18, 2004 انسخ هذا الرابط ثم ضعه في المتصفح http://www.geocities.com/hosamnoor/SHOW.zip
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.