السلام عليكم
أشكرك أخي ياسر على التوضيحات وكذا تقييمك لمحاولاتنا
صحيح استعملت طريقة التسجيل لأرى كيفية العمل وبعدها مسحت وأعدت الكتابة يدويا حتى أتعود كما قلت
واليوم ظهر أنه بإمكان عمل سطر واحد وهذا مفيد أيضا
بقي لي شيء غامض حول هذا الأمر
ActiveCell .Value ="Officena"
هل الغرض هو تحديد الخلية التي فيها القيمة المكتوبة officena أرجو التوضيح وممكن مثال ثان حتى تتضح الصورة
ومغذرة على الإطالة