KHMB قام بنشر أغسطس 1, 2011 قام بنشر أغسطس 1, 2011 (معدل) السلام عليكم ورحمة الله وبركاتة كل عام وانتم بخير وشهر مبارك على الجميع إخواني ممكن كود بسيط لإغلاق إكسل من ملف آخر على إعتبار إن الملفين مفتوحة حاولت مع هذا الكود لكن بدون جدوى Dim Myfile Myfile = ActiveWorkbook.Path & "\" & "Solar.xls" Workbooks.Close Myfile شاكر ومقدر حسن تعاونكم سلفاً تم تعديل أغسطس 2, 2011 بواسطه KHMB
عادل حنفي قام بنشر أغسطس 2, 2011 قام بنشر أغسطس 2, 2011 اخي جرب هذا الكود Windows("2.xls").Activate ActiveWindow.Close 1
KHMB قام بنشر أغسطس 2, 2011 الكاتب قام بنشر أغسطس 2, 2011 السلام عليكم ورحمة الله وبركاتة عمل معي الكود شكراً اخي عادل حنفي جزاك الله خير
يحيى حسين قام بنشر أغسطس 2, 2011 قام بنشر أغسطس 2, 2011 السلام عليكم و رحمة الله إضافة لحل الاخ عادل جرب هذا الكود Sub ClosetIt() Dim wb As Workbook Set wb = Workbooks("Solar.xls") wb.Close End Sub فأنت لست بحاجة لمعرفة مسار الملف و خصوصاً انه مفتوح دمت في حفظ الله
KHMB قام بنشر أغسطس 2, 2011 الكاتب قام بنشر أغسطس 2, 2011 السلام عليكم ورحمة الله وبركاتة اخي يحى كل عام وانتم بخير شهر مبارك على الجميع عمل الكود تمام بعد ماتم فتح الملف المراد إغلاقة جزاك الله خير
ياسر الحافظ قام بنشر أغسطس 2, 2011 قام بنشر أغسطس 2, 2011 الاستاذ عادل حنفي الاستاذ يحيى حسين جزاكم الله كل الخير وفقكم الله ابو الحارث
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.