أبو چيداء قام بنشر فبراير 18, 2014 الكاتب مشاركة قام بنشر فبراير 18, 2014 شكرا لك اخى \ رجب وانا فى انتظارك رابط هذا التعليق شارك More sharing options...
أفضل إجابة رجب جاويش قام بنشر فبراير 18, 2014 أفضل إجابة مشاركة قام بنشر فبراير 18, 2014 أخى الفاضل / أبو جيداء جرب المرفق حفظ فى ملف جديد.rar رابط هذا التعليق شارك More sharing options...
جلال الجمال_ابو أدهم قام بنشر فبراير 18, 2014 مشاركة قام بنشر فبراير 18, 2014 استاذ / رجب جاويش بارك الله فيك رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر فبراير 18, 2014 مشاركة قام بنشر فبراير 18, 2014 أخى الفاضل / جلال جزاك الله كل خير أخى الفاضل رابط هذا التعليق شارك More sharing options...
أبو چيداء قام بنشر فبراير 18, 2014 الكاتب مشاركة قام بنشر فبراير 18, 2014 شكرا لك اخى الفاضل رجب جاويش بارك الله فيك رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر فبراير 18, 2014 مشاركة قام بنشر فبراير 18, 2014 أخى الفاضل / أبو جيداء جزاك الله كل خير أخى الفاضل رابط هذا التعليق شارك More sharing options...
أبو چيداء قام بنشر فبراير 18, 2014 الكاتب مشاركة قام بنشر فبراير 18, 2014 اخى الكريم رجب هل يوجد اي اضافات تم اضافتها غير هذا الحدث Private Sub CommandButton1_Click() On Error Resume Next With Workbooks.Add(xlWBATWorksheet) With .Sheets(1) .Range("A1").Resize(1, 5).Value = Workbooks(Nam).Sheets("sheet2").Range("A1:E1").Value .Range("A2") = Me.TextBox1 .Range("B2") = Me.TextBox2 .Range("C2").Resize(RR, R).Value = Me.ListBox1.List .Columns("D:E").NumberFormat = "[$-1010000]yyyy/mm/dd;@" .UsedRange.Columns.AutoFit End With Unload Me End With End Sub رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر فبراير 18, 2014 مشاركة قام بنشر فبراير 18, 2014 أخى الفاضل يوجد فقط الجزء Nam = ThisWorkbook.Name موجود فى حدث ال TextBox1 مرتبط بعمليه الترحيل وهو لتخزين اسم الملف الأصلى رابط هذا التعليق شارك More sharing options...
أبو چيداء قام بنشر فبراير 18, 2014 الكاتب مشاركة قام بنشر فبراير 18, 2014 شكرا اخر رجب على هذا المجهود العظيم وبارك الله فيك رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر فبراير 18, 2014 مشاركة قام بنشر فبراير 18, 2014 أخى الفاضل / أبو جيداء جزاك الله كل خير أخى الفاضل على هذه الكلمات الطيبة رابط هذا التعليق شارك More sharing options...
الردود الموصى بها