بسم الله الرحمن الرحيم
اهلا بكم متابعى موقع عالم الاوفيس
كود جديد من مكتبة اكواد اكسل vba
عمل تعبئة تلقائية للاعمدة والصفوف بطريقة سهلة وجميلة
فى كثير من الاحيان نعمل معادلة معينة او بيانات معينة فى خلية معينة ونريد ان نسحب هذة البيانات الى كل الاعمدة والصفوف بشكل اتوماتيكىالكود التالى يعمل تعبئة تلقائية للاعمدة بشكل تلقائى
الكود
Sub AutoFitColumns()
Cells.Select
Cells.EntireColumn.AutoFit
End Sub
Cells.Select
Cells.EntireColumn.AutoFit
End Sub
كود التعبئة التلقائية للصفوف
الكود
Sub AutoFitRows()
Cells.Select
Cells.EntireRow.AutoFit
End Sub
Cells.Select
Cells.EntireRow.AutoFit
End Sub
اكواد جميلة نحتاج اليها دائما فى شغلنا اليومى . ونلتقى معكم فى اكواد جديدة من مكتبة اكواد الاكسل