Vba clearcontents: كيفية مسح محتويات الخلية؟

النقاط الرئيسية

  • لمسح محتويات الخلية، يجب عليك استخدام طريقة ClearContents.
  • يمكنك استخدامه لخلية واحدة أو نطاق أو ورقة عمل بأكملها.

طريقة مسح المحتويات

يوجد في VBA طريقة تسمى ClearContents يمكنك استخدامها لمسح القيم والصيغ من خلية ونطاق من الخلايا وورقة العمل بأكملها.

 Expression.ClearContents

لاستخدام هذه الطريقة، يجب عليك أولاً تعيين التعبير إلى المكان الذي تريد مسح المحتويات فيه، ثم اكتب “.ClearContents”.

مسح محتويات خلية واحدة

لنفترض أنك تريد مسح القيم الموجودة في الخلية A1. أولاً، تحتاج إلى تحديد الخلية A1 باستخدام كائن النطاق ثم طريقة ClearContents.

لذلك سيكون الرمز:

 Sub ClearContentExamples() Range("A1").ClearContents End Sub
مسح محتويات خلية واحدة

يمكنك أيضًا استخدام خاصية الخلايا لتحديد خلية وسيكون الكود كما يلي:

 Sub ClearContentExamples() Cells(1, 1).ClearContents End Sub
مسح محتويات مثال خلية واحدة

مسح محتويات المسار

وبالمثل، يمكنك تحديد نطاق ثم استخدام طريقة ClearContent لمسح القيم والصيغ من هذا النطاق. لنفترض أنك تريد مسح القيم من النطاق A1:A10، في هذه الحالة سيكون الرمز كما هو موضح أدناه.

 Sub ClearContentExamples() Range("A1:A10").ClearContents End Sub
محتويات النطاق الواضح

مسح محتويات جدول البيانات بأكمله

لمسح محتويات ورقة العمل بأكملها ، يمكنك استخدام الكود أدناه:

 Sub ClearContentExamples() Cells.ClearContents End Sub
مسح محتويات الورقة بأكملها

وللمسح من ورقة عمل محددة:

 Worksheets("Sheet1").Cells.ClearContents

مسح محتويات التحديد

إذا كنت تريد كتابة تعليمات برمجية ديناميكية يمكنها مسح محتويات الخلايا المحددة، فيمكنك استخدام التعليمات البرمجية أدناه.

مسح محتويات التحديد
 Sub ClearContentExamples() Selection.ClearContents End Sub

أساليب أخرى

فيما يلي بعض الطرق الأخرى التي يمكنك استخدامها:

 Sub ClearContentExamples() Range(“A1”).Clear 'Clears Everything Range(“A1”).ClearComments 'Clear Comments Range(“A1”).ClearFormats 'Clears Formatting Range(“A1”).ClearHyperlinks 'Clear Hyperlinks Range(“A1”).ClearNotes 'Clear Notes Range(“A1”).ClearOutline 'Clears Outline End Sub

اضف تعليق

لن يتم نشر عنوان بريدك الإلكتروني. الحقول الإلزامية مشار إليها بـ *