ازاله الكومة

[بلانك]

المطلوب ازاله الكومة من خلف الرقم او امام الرقم

ازالة علامة.xlsx

[hegazee]

تفضل

ازالة علامة.xlsx

[بلانك]

استاذي hegazee لو سمحت انظر للصورة مازالت الكومة موجودة في شريط الدالة وعندى ملف بة عدد كبير من هذة الاشكال اريد منك معرفة الطريقة او الكود المستخدم بارك الله فيك

 

•  

[عبدالله بشير عبدالله]

السلام عليكم ورحمة الله وبركاته

Sub حذفالكومة()
    Dim c As Range
    Application.ScreenUpdating = False: Application.Calculation = xlCalculationManual: Application.EnableEvents = False
    
    For Each c In ActiveSheet.UsedRange
        If VarType(c.Value) = vbString Then
            Dim txt As String: txt = Trim(c.Value)
            If Left(txt, 1) = "'" Then txt = Mid(txt, 2)
            If Right(txt, 1) = "'" Then txt = Left(txt, Len(txt) - 1)
            If txt <> c.Value Then c.NumberFormat = "@": c.Value = txt
        End If
    Next c
    
    Application.ScreenUpdating = True: Application.Calculation = xlCalculationAutomatic: Application.EnableEvents = True
End Sub

ازالة علامة.xlsm

 

تم تعديل منذ 2 ساعات بواسطه عبدالله بشير عبدالله

[hegazee]

السلام عليكم ورحمة الله و بركاته

ظهور الفاصلة  قبل الرقم مثل '٢/٢ في شريط المعادلة في Excel له دلالة محددة لأن الفاصلة المفردة تستخدم في اكسيل لإجبار الخلية على اعتبار ما بداخلها كنص اكسيل وليس كرقم أو معادلة.

في حالتك:

عند إدخال ٢/٢ في خلية اكسيل مباشرة فقد يفسره Excel كتاريخ (مثلاً 2 فبراير)، أو ككسر.

لإجبار اكسيل على عدم تفسيره وتحويله إلى شيء آخر (تاريخ أو كسر)، يمكن إدخال '٢/٢، فيقوم اكسيل بعرض فقط ٢/٢ في الخلية لكن يظهر '٢/٢ في شريط المعادلة لتوضيح أن هذه القيمة تم إدخالها كنص صريح.   ولا تظهر في الطباعة و لا تؤثر في شيء لأنها نص

هام:

إذا رأيت '٢/٢ في شريط المعادلة:

• فهذا يعني أن الخلية تحتوي على نص مكتوب يدويًا وليس تاريخًا أو رقمًا أو كسرًا.
• الفاصلة ' لا تظهر في الخلية، فقط في شريط المعادلة.

إذا كتبت 2/2 بدون '، Excel قد يفسرها كـ تاريخ 2 فبراير  إذا كانت الخلية بتنسيق التاريخ

أو كـ الكسر 1  إذا غيرت التنسيق إلى  كسر لذلك تحديد نوع التنسيق مهم لتفسير اكسيل الصحيح.

[بلانك]

بارك الله فيك وشكرا على الشرح . وجمعة مباركة عليك والجميع