KHMB قام بنشر أغسطس 1, 2011 مشاركة قام بنشر أغسطس 1, 2011 (معدل) السلام عليكم ورحمة الله وبركاتة كل عام وانتم بخير وشهر مبارك على الجميع إخواني ممكن كود بسيط لإغلاق إكسل من ملف آخر على إعتبار إن الملفين مفتوحة حاولت مع هذا الكود لكن بدون جدوى Dim Myfile Myfile = ActiveWorkbook.Path & "\" & "Solar.xls" Workbooks.Close Myfile شاكر ومقدر حسن تعاونكم سلفاً تم تعديل أغسطس 2, 2011 بواسطه KHMB رابط هذا التعليق شارك More sharing options...
عادل حنفي قام بنشر أغسطس 2, 2011 مشاركة قام بنشر أغسطس 2, 2011 اخي جرب هذا الكود Windows("2.xls").Activate ActiveWindow.Close 1 رابط هذا التعليق شارك More sharing options...
KHMB قام بنشر أغسطس 2, 2011 الكاتب مشاركة قام بنشر أغسطس 2, 2011 السلام عليكم ورحمة الله وبركاتة عمل معي الكود شكراً اخي عادل حنفي جزاك الله خير رابط هذا التعليق شارك More sharing options...
يحيى حسين قام بنشر أغسطس 2, 2011 مشاركة قام بنشر أغسطس 2, 2011 السلام عليكم و رحمة الله إضافة لحل الاخ عادل جرب هذا الكود Sub ClosetIt() Dim wb As Workbook Set wb = Workbooks("Solar.xls") wb.Close End Sub فأنت لست بحاجة لمعرفة مسار الملف و خصوصاً انه مفتوح دمت في حفظ الله رابط هذا التعليق شارك More sharing options...
KHMB قام بنشر أغسطس 2, 2011 الكاتب مشاركة قام بنشر أغسطس 2, 2011 السلام عليكم ورحمة الله وبركاتة اخي يحى كل عام وانتم بخير شهر مبارك على الجميع عمل الكود تمام بعد ماتم فتح الملف المراد إغلاقة جزاك الله خير رابط هذا التعليق شارك More sharing options...
ياسر الحافظ قام بنشر أغسطس 2, 2011 مشاركة قام بنشر أغسطس 2, 2011 الاستاذ عادل حنفي الاستاذ يحيى حسين جزاكم الله كل الخير وفقكم الله ابو الحارث رابط هذا التعليق شارك 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.