الجزيرة قام بنشر أبريل 14, 2010 قام بنشر أبريل 14, 2010 أخواني الكرام تم شرح الطلب في المرفق : ) Book111.rar
طارق محمود قام بنشر أبريل 14, 2010 قام بنشر أبريل 14, 2010 السلام عليكم أخي عبد الله تفضل الماكرو Sub Macro1() a = Range("K1 ").Value ActiveWindow.SelectedSheets.PrintOut From:=1, To:=a, Copies:=1, Collate:=True End Sub
الجزيرة قام بنشر أبريل 14, 2010 الكاتب قام بنشر أبريل 14, 2010 تسلم أخي طارق جزاك الله كل خير ونفع بك وذريتك الأسلام والمسلمين
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.