almos7rati قام بنشر سبتمبر 26, 2017 مشاركة قام بنشر سبتمبر 26, 2017 الخبراء الكرام السلام عليكم ورحمة الله تعالي وبركاته اولا اشكركم كل الشكر فيما قمتم به من مسعادتنا وتدريبنا من خلال هذا المنتدي العظيم وجعلها الله في ميزان حسناتكم وجعلها صدقة علم جارية ان شاء الله واجهتني مشكلة مزعجة في الحقيقة وهي عند ترحيل البيانات الي ورقة العمل المخصصة بواسطة اليوزرفورم وهي: لدي ملف اكسل به عدد 5 اوراق عمل و عدد4 يوزرفورم لاحظت ان اليوزر فورم لا يقوم بالترحيل للورقة المعنية الا عندما تكون الورقة المعنية هي اخر ورقة عمل قد قمت بفتحها مثلا معرف علي ورقة العمل 2UserFormCards 4 معرف علي ورقة العمل UserFormCHQ فاذا كنت فاتح ورقة العمل 4 وذهبت لليوزرفور يقوم بترحيل البيانات الي الورقة الخاطئة وهي 4UserFormCards اي بمعني لا يتم الترحيل للورقة الصحية الا عندما تكون اخر ورقة عمل قمت بفتحها مع العلم باني واضع الكود الخاص بتنشيط الصفحة في كل يوزرفورم عند الترحيل وهو sonsat = Sheets("Data2").Cells(Rows.Count, 1).End(xlUp).row + 1 مرفق ملف العمل ارجو مساعتدتي ولكم مني جزيل الشكر والتقدير Copy.rar رابط هذا التعليق شارك More sharing options...
ابو علي و سدرة قام بنشر سبتمبر 27, 2017 مشاركة قام بنشر سبتمبر 27, 2017 اخى الفاضل لابد من تعريف الشيت المراد الترحيل اليه كمتغير قبل الترحيل وتحديد كل control فى اليوزر فورم هايرحل لاى مكان فى اى شيت بالتحديد فى المرفق انا حليت لك مشكلة اول 2 يوزر فورم UserFormCards و UserFormCHQ ارجع للكود لفهم التغير Copy.rar 1 رابط هذا التعليق شارك More sharing options...
almos7rati قام بنشر سبتمبر 28, 2017 الكاتب مشاركة قام بنشر سبتمبر 28, 2017 مشكووووووووووووور شديد اخ ابو علي جزاك الله عنا كل خير رابط هذا التعليق شارك 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.