سلمت يداك استاذي عبد العزيز عمل اكثر من رائع ولكن كان طلب اخير عندما تنهي الفتره ويطلب كلمه المرور فاذا كانت خاطئه لا اريد غلق الملف لكن اريده يفتح مدي معين من صفحه واحده واخفاء الباقي تماما الي ان يتم ادخال كلمه المرور والغاء رساله التحذير
بجرب مره اخري وبشوف ممكن تكون المشكله عندي اخي ابو محمد وشاكر لاهتمامك اخي العزيز
اخي ياسر جربت اغيره وما نفع ممكن تقولي الكيفيه وانا بغيره ان شاء الله
شاكر مرورك اخي العزيز ياسر خليل والكود بالفعل يعمل لانه من ايديكم سلمت يداك وبارك الله فيك وبالنسبه لاسم الظهور هو اسم الفيسبوك لاني ادخل عن طريق الفيسبوك واذا كان يسبب اي مشكله نبهني فقط وسأقوم بتغييره مباشره واما عن التعليمات فأني قرأتها بالفعل سابقا اكثر من مره واذا كنت قد خالفت اي من التعليمات فهذا لجهلي فقط بها وارجو منك ان تضع عيني علي الخطأ لاتفاداه في المرات القادمه راجيا من الله ان تظلوا دوما في عوننا نحن اخوانكم من المبتدئين
الحمد لله بفضل الله ثم بفضلكم اخواني اكملت الترحيل لكن هناك بعض المشاكل التي واجهتني
الاولي اريد ان تظهر شاشه اختيار مكان الحفظ لاختيار المجلد عند كل مره
الثانيه الصفحه تظهر صغيره جدا في بي دي اف فياتري هناك طريقه لتكبيره لتملا الصفحه
ثالثا اود اخفاء الصفحه الاخيره التي يتم الترحيل اليها
newPDF.rar
اخي ابو محمد جزاك الله كل خير علي مرورك العطر ومساعدتك الكبيره لي ولكن لي استفسار هو في هذا الملف رحل خليه الي خليه
لكن انا عايز ارحل مدي من الخلايا مش خليه واحده ياتري ايه التعديل علي المعادله Sheets(2).Range("g" & lrow).Value = Sheets(1).Range("a7").Valueكمثال يعني
لو عايز ابدله بالمدي $A$1:$Z$12
اريد اضافه زر اعلي الصفحه الاولي يحفظ بعض الخلايا في ملف واحد بصيغه pdf كالتالي
الاول صفحه 2من =$A$1:$Z$12
وتحتها من صفحه 2=$AB$1:$AU$9
ثم من صفحه واحد الاعمده(a,b,c,b,e,h,l,m,n,o,p,q,r,s) من الصف الاول الي صف 150
new system report2.rar
بارك الله فيك اخي عادل ولكن عندي سؤال هل يمكن استدعاء تلكك الايام لمعالجة البيانات المدخله ؟ثانيا هل يصلح اني لو غيرت الشهر من 9 الي عشره هاتتغير التواريخ اللي موجوده في المربعات بالطبع بس ساعتها هاتفتح يوم جديد ولا هايفتح القديم؟