محمد فيروز قام بنشر يونيو 24, 2008 مشاركة قام بنشر يونيو 24, 2008 س / هل يشترط أن يكون هناك زر حتى تعمل هذه الأكواد به ألا يمكن أن تعمل تلقائيا بمجرد إدخال الكود رابط هذا التعليق شارك More sharing options...
محمد فيروز قام بنشر يونيو 24, 2008 الكاتب مشاركة قام بنشر يونيو 24, 2008 كود Sub sRange_Move() Sheets("Sheet2").Range("A1:A3").ClearContents Sheets("Sheet2").Range("A1:A3").ClearContents Sheets("Sheet2").Range("A1:A3").Value = Sheets("Sheet1").Range("A1:A3").Value End Sub هل السطر الثانى من الكود خطأ ممكرر بالخطأ وإلا فما فائدته رابط هذا التعليق شارك More sharing options...
هادى محمد المامون سالم قام بنشر يونيو 24, 2008 مشاركة قام بنشر يونيو 24, 2008 بسم الله الرحمن الرحيم س / هل يشترط أن يكون هناك زر حتى تعمل هذه الأكواد به ألا يمكن أن تعمل تلقائيا بمجرد إدخال الكود ليس بالضروره وجود مفتاح ليعمل الكود يمكن ان يعمل الكود تلقائيا عند فتح الملف او ورقه العمل او الكتابه بالخليه كود Sub sRange_Move() Sheets("Sheet2").Range("A1:A3").ClearContents Sheets("Sheet2").Range("A1:A3").ClearContents Sheets("Sheet2").Range("A1:A3").Value = Sheets("Sheet1").Range("A1:A3").Value End Sub هل السطر الثانى من الكود خطأ ممكرر بالخطأ وإلا فما فائدته السطر الثانى من الكود مكرر بالخطأ ملحوظه : عنوان الموضوع لا يعبر عن مضمونه السلام عليكم رابط هذا التعليق شارك More sharing options...
محمد فيروز قام بنشر يونيو 25, 2008 الكاتب مشاركة قام بنشر يونيو 25, 2008 أنا فى غاية الشكر للأستاذنا / هادى سالمعلى مروره ورده فبالنسبة لطريقة عمل الكود تلقائيا كيف يكون ذلك والمرفقين الذلين أضفتهم حضرتك االلذان كودهما خاص بتثبيت رقم معين والأخر بتحديد نطاق معين لا يعملان إلا بالمفتاح فكيف أشغل الكود تلقائيا بمجرد أن أكتب فى صفحة الفيجول بيزك أظهر فى الخلية a1 رقم 5 مثلا يظهر الرقم ماذا تعنى حضرتك بأن العنوان لا يعبر عن مضمونه أليس هو كذلك عبارة عن أئلة فى هذا الموضوع وحضرتك ترد على ولو فيها مشكلة فيريت توضح حتى لا أكرر ثانية رابط هذا التعليق شارك More sharing options...
محمد فيروز قام بنشر يونيو 25, 2008 الكاتب مشاركة قام بنشر يونيو 25, 2008 هناك أحيانا عندما أريد أن أشغل زر أو مفتاح وربطه بالمكرو لا يظهر لى قائمة تسجيل مكرو ولكن يظهر إظهىر مكرو فرجاء التوضيح من سيادتكم مرفق ملف _________________________.doc رابط هذا التعليق شارك More sharing options...
هادى محمد المامون سالم قام بنشر يونيو 25, 2008 مشاركة قام بنشر يونيو 25, 2008 ماذا تعنى حضرتك بأن العنوان لا يعبر عن مضمونه أليس هو كذلك عبارة عن أئلة فى هذا الموضوع وحضرتك ترد على ولو فيها مشكلة فيريت توضح حتى لا أكرر ثانية بسم الله الرحمن الرحيم لم اقم ابدا بطرح فكره الاسئله و الاجابات و اذا كان الامر كذلك فبرجاء ارفاق رايط هذا الموضوع فبالنسبة لطريقة عمل الكود تلقائيا كيف يكون ذلك والمرفقين الذلين أضفتهم حضرتك االلذان كودهما خاص بتثبيت رقم معين والأخر بتحديد نطاق معين لا يعملان إلا بالمفتاح بصراحه لا اتذكر ارفق لى الملفان حتى اتذكر و استطيع الاجابه السلام عليكم رابط هذا التعليق شارك More sharing options...
محمد فيروز قام بنشر يونيو 26, 2008 الكاتب مشاركة قام بنشر يونيو 26, 2008 السلام عليكم أنا فى غاية الشكر و الإمتنان لحضرتك ومتابعك له هذا المرفق به الملفان اللذان حدثت حضرتك عنهم ماذا تعنى برابط هذا الموضوع ؟ إنه شرح الفيجول بيزك للمتوسطين لحضرتك الموجود أسفل توقيعك أتمنى من حضرتك الرد على سؤالى الخاص بالمشاركة الماضية vba_01.zip رابط هذا التعليق شارك More sharing options...
هادى محمد المامون سالم قام بنشر يونيو 27, 2008 مشاركة قام بنشر يونيو 27, 2008 أنا فى غاية الشكر للأستاذنا / هادى سالمعلى مروره ورده فبالنسبة لطريقة عمل الكود تلقائيا كيف يكون ذلك والمرفقين الذلين أضفتهم حضرتك االلذان كودهما خاص بتثبيت رقم معين والأخر بتحديد نطاق معين لا يعملان إلا بالمفتاح فكيف أشغل الكود تلقائيا بمجرد أن أكتب فى صفحة الفيجول بيزك أظهر فى الخلية a1 رقم 5 مثلا يظهر الرقم بسم الله الرحمن الرحيم لتشغيل الكود من صفحه الفيجوال بيزك أضغط F5 السلام عليكم رابط هذا التعليق شارك More sharing options...
محمد فيروز قام بنشر يونيو 28, 2008 الكاتب مشاركة قام بنشر يونيو 28, 2008 السلام عليكم ورحمة الله وبركاته والله أنا أشكرك من القلب وبكل إخلاص وفقك الله إلى كل خير وةسدد خطاك وجعل الجنة مسواك ويريت لو تكمل شرح هذا الموضوع فلا تعلم كم إستفدنا من هذا الشرح [sub Hady() Dim i As Integer For i = 1 To 3 MsgBox (Sheets("Sheet1").Cells(i, "A")) Next i ما معنى Dim for ما المقصود ب I وعليكم السلام ورحمة الله وبركاته رابط هذا التعليق شارك More sharing options...
محمد فيروز قام بنشر يونيو 28, 2008 الكاتب مشاركة قام بنشر يونيو 28, 2008 السلام عليكم هذا الكو د كيف أجعله أول ما أكتب Hady1 وأنتقل لأى خلية يعطينى رسالة وليس حتى أضغط على المفتاح Sub Hady() Dim i As Integer For i = 1 To 3 If Sheets("Sheet1").Cells(i, "A").Value = "Hady1" Then MsgBox (Sheets("Sheet1").Cells(i, "A")) End If Next i End Sub وجزاك الله كل خير وعليكم السلام ورحمة الله وبركانه رابط هذا التعليق شارك More sharing options...
محمد فيروز قام بنشر يونيو 29, 2008 الكاتب مشاركة قام بنشر يونيو 29, 2008 السلام عليكم ورحمة الله وبركاته ألا من مجيب رابط هذا التعليق شارك More sharing options...
محمد فيروز قام بنشر يوليو 12, 2008 الكاتب مشاركة قام بنشر يوليو 12, 2008 رابط هذا التعليق شارك More sharing options...
عادل حنفي قام بنشر يوليو 12, 2008 مشاركة قام بنشر يوليو 12, 2008 السلام عليكم تفضل يا اخي تحياتي hady.rar رابط هذا التعليق شارك 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.