oka123 قام بنشر يناير 25, 2019 مشاركة قام بنشر يناير 25, 2019 لدي شيت أجازات بياناته بالعرض أريد نسخه بالطول بحيث يكون كالتالي كود الموظف أسم الموظف القسم تاريخ الأجازة نوع الأجازة مع تكرار ذلك بالطول لباقي الموظفين مرفق الملف أجازات.xlsx رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر يناير 25, 2019 مشاركة قام بنشر يناير 25, 2019 جرب هذا الكود تجد النتيجة قي الشيت 3 Option Explicit Sub transfer_data() Sheets("Sheet3").Cells.Clear Sheets("Sheet1").Range("A1").CurrentRegion.Copy Sheets("Sheet3").Range("A1").PasteSpecial Paste:=xlPasteAll, Transpose:=True Application.CutCopyMode = False End Sub رابط هذا التعليق شارك More sharing options...
oka123 قام بنشر يناير 25, 2019 الكاتب مشاركة قام بنشر يناير 25, 2019 شكرا اخي الكريم علي سرعة الإستجابة ولكن أريد الأسماء تحت بعضها بالتواريخ رابط هذا التعليق شارك More sharing options...
oka123 قام بنشر يناير 25, 2019 الكاتب مشاركة قام بنشر يناير 25, 2019 2 ساعات مضت, سليم حاصبيا said: أخي الكريم لا يوجد حل لهذة المشكلة رابط هذا التعليق شارك More sharing options...
بن علية حاجي قام بنشر يناير 26, 2019 مشاركة قام بنشر يناير 26, 2019 السلام عليكم ورحمة الله تم عمل كود بسيط بمعية بعض المعادلات ونطاقات بالتسمية، أرجو أن يكون تقريبا للحل... بن علية حاجي إجازات.xlsm 1 رابط هذا التعليق شارك More sharing options...
oka123 قام بنشر يناير 26, 2019 الكاتب مشاركة قام بنشر يناير 26, 2019 جزاك الله خيرا أخي العزيز رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.