أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
أحمد يوسف ali mohamed ali-- لا تميز خلال هذه الفترة YasserKhalil كود للطباعة علي طابعتين في نفس الوقت اكسيل اسئله واجابات


اعلان هنا
صقور الاكسيل
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا


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





مسح جزء من نطاق

الساده الافاضل عندى نطاق معين مثال B10:U500 و عند المسح يمسح فقط الصف النشط من النطاق و ليس الصف كله [code]KClTdWIgQUFBP ..



25-02-2020 10:12 صباحا
خالد الشاعر
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 05-09-2017
رقم العضوية : 371
المشاركات : 117
الجنس : ذكر
تاريخ الميلاد : 3-7-1969
قوة السمعة : 164
الاعجاب : 6
 offline 
الساده الافاضل
عندى نطاق معين مثال B10:U500
و عند المسح يمسح فقط الصف النشط من النطاق و ليس الصف كله

()Sub AAA

Sheets("123").Range("A1:A500")
active row..ClearContents

End Sub





25-02-2020 11:37 صباحا
مشاهدة مشاركة منفردة [1]
محمد الدسوقى
menu_open
خبير
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 47
المشاركات : 733
الجنس : ذكر
تاريخ الميلاد : 14-10-1973
الدعوات : 69
قوة السمعة : 7718
الاعجاب : 32
 offline 
look/images/icons/i1.gif مسح جزء من نطاق
الأستاذ خالد
حضرتك استخدمت تعليمة ( تحديد الصف النشط فقط (
active row )
جرب الكود التالى يقوم بتحديد النطاق المراد مسح بياناته
Sub AAA()
 
 ActiveSheet.Range("A1:A500").Select
Selection.ClearContents

End Sub


 

أثارت هذه المشاركة إعجاب: Yasser Elaraby، ali mohamed ali، خالد الشاعر،



25-02-2020 12:14 مساء
مشاهدة مشاركة منفردة [2]
خالد الشاعر
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 05-09-2017
رقم العضوية : 371
المشاركات : 117
الجنس : ذكر
تاريخ الميلاد : 3-7-1969
قوة السمعة : 164
الاعجاب : 6
 offline 
look/images/icons/i1.gif مسح جزء من نطاق
اشكرك استاذ محمد

انا اريد فى نطاق هذه المعلومات
يمسح الصف اللى انا وقف عليه فى الشيت فى حدود النطاق




25-02-2020 02:02 مساء
مشاهدة مشاركة منفردة [3]
ابراهيم الحداد
menu_open
خبير
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-08-2017
رقم العضوية : 163
المشاركات : 166
الجنس : ذكر
الدعوات : 1
قوة السمعة : 1395
الاعجاب : 20
 offline 
look/images/icons/i1.gif مسح جزء من نطاق
السلام عليكم ورحمة الله
اذا اردت ازالة الصف بالكامل فعليك بهذا الكود
Sub Delete1()
Cells(ActiveCell.Row, 1).EntireRow.Delete
End Sub

اما اذا اردت مسح محتويات صف فى جدول دون ازالة الصف بالكامل فعليك بهذا الكود
Sub Clear2()
Range(Cells(ActiveCell.Row, 2), Cells(ActiveCell.Row, 7)).ClearContents
End Sub

أثارت هذه المشاركة إعجاب: خالد الشاعر، ali mohamed ali، YasserKhalil، محمد الدسوقى،



25-02-2020 02:09 مساء
مشاهدة مشاركة منفردة [4]
خالد الشاعر
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 05-09-2017
رقم العضوية : 371
المشاركات : 117
الجنس : ذكر
تاريخ الميلاد : 3-7-1969
قوة السمعة : 164
الاعجاب : 6
 offline 
look/images/icons/i1.gif مسح جزء من نطاق
اشكرك استاذ ابراهيم 

انا اريد مسح جزء من الصف ال active فى المحتوى فى نطاق معين مثال A10:U500

وليس كل الصف




25-02-2020 08:53 مساء
مشاهدة مشاركة منفردة [5]
salim
menu_open
خبير معتمد
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 43
المشاركات : 501
الجنس : ذكر
تاريخ الميلاد : 1-5-1989
الدعوات : 1
قوة السمعة : 3850
الاعجاب : 82
 offline 
look/images/icons/i1.gif مسح جزء من نطاق
جرب هذا الكود
اذا اردت صفا واحدً اختر Howmany_Row = 1

Option Explicit

Sub Del_Part_Of_Range()
Dim Rg As Range
Dim RO%, Col%, Howmany_Row, Howmany_Col
Set Rg = Range("A10:U500")
 Howmany_Row = 3: Howmany_Col = 2
 RO = 2: Col = 2
 Rg.Cells(RO, Col).Resize(Howmany_Row, Howmany_Col) = vbNullString
End Sub


أثارت هذه المشاركة إعجاب: ali mohamed ali، YasserKhalil،





المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
نسخ و طباعة نطاق معين بشرط او اكثر halan550
4 136 YasserKhalil
حفظ نطاق الطباعة كصورة Export Print Area + Print title rows As Picture hassona229
35 626 hassona229
حفظ نطاق الطباعة كصورة Export Print Area As JPG Picture YasserKhalil
32 1501 hassona229
فورم بحث في نطاق تصفية الجموعي
9 469 YasserKhalil
تعديل اخر نطاق البحث وجعله فى خلية ويكتب يدوى فى دالة countif Omar2
8 321 YasserKhalil

الكلمات الدلالية
نطاق ،


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.

الساعة الآن 10:34 مساء

أعلن هنا
أعلن هنا
أعلن هنا