hoodahooda قام بنشر يوليو 3, 2008 قام بنشر يوليو 3, 2008 ممكن عمل كود ترحيل لهذه الورقة مع شرحه Book2.zip
hoodahooda قام بنشر يوليو 5, 2008 الكاتب قام بنشر يوليو 5, 2008 شكرا جدا ولكن لي طلب شرح هذا الكود Sub trheel() r = Sheets(1).Cells(1000, 1).End(xlUp).Row + 1 Sheets(1).Cells(r, 1).Value = Cells(11, 3).Value Sheets(1).Cells(r, 2).Value = Cells(13, 3).Value Sheets(1).Cells(r, 3).Value = Cells(20, 8).Value Sheets(1).Cells(r, 4).Value = Cells(25, 3).Value Sheets(1).Cells(r, 5).Value = Cells(26, 3).Value End Sub حتي يتثني فهمه و تطبيقه علي اكثر من عمل لدي وشكرا
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.