تنسيق

[ياسر فاروق]

الساده الافاضل

كيفية جعل الكلام مساوى لعرض الخلية بعد إجراء أمر fill justify (بمعنى أن يكون الكلام ملء السطر من أول الخلية إلى أخر الخلية كما بالوورد)

[سليم حاصبيا]

انسخ هذا الكود الى حدث الورقة

Private Sub Worksheet_Change(ByVal Target As Range)
Target.Columns.AutoFit
End Sub

 

[ياسر فاروق]

في ‏١٦‏/‏٠٢‏/‏٢٠١٧ at 16:20, سليم حاصبيا said:

Private Sub Worksheet_Change(ByVal Target As Range) Target.Columns.AutoFit End Sub

أ/سليم حاصبيا

شكرا على الاهتمام ولكن الكود لا يريد أن يعمل

مرفق الملف برجاء تطبيق الكود عليه الاعمدة (B & J)

BOQ-B01.rar