ظبياني وافتخر قام بنشر فبراير 19, 2007 مشاركة قام بنشر فبراير 19, 2007 اهلا...شباب........هالملف......اخذته من منتدانا..اوفسينا............واشتغلت فيه....لشهر.....تقريبا.........في حسابات العقارات والمقاولات........لكن مدير حسابات......قال : هالملف....ناقص (دفتر الاستاذ+ ودفاتر الاستاذ المساعد)........فاتمنى...لو تقدرووووا تعدلوا في ملف ......اي تسوووووا دفاتر الاستاذ+ ودفاتر الاستاذ المساعد)).......اتمنى......والله تساعدوني....مع تحياتي _____________3.rar رابط هذا التعليق شارك More sharing options...
ظبياني وافتخر قام بنشر فبراير 19, 2007 الكاتب مشاركة قام بنشر فبراير 19, 2007 الوووووووووووووووووووووووووووووووووووووووووو رابط هذا التعليق شارك More sharing options...
ظبياني وافتخر قام بنشر فبراير 21, 2007 الكاتب مشاركة قام بنشر فبراير 21, 2007 لاتعليق................ رابط هذا التعليق شارك More sharing options...
هادى محمد المامون سالم قام بنشر فبراير 21, 2007 مشاركة قام بنشر فبراير 21, 2007 بسم الله الرحمن الرحيمجرب الملف المرفقيوجد به ورقه جديده لحساب الأستاذالسلام عليكم Mr_01.rar رابط هذا التعليق شارك More sharing options...
محمد عسكر قام بنشر فبراير 21, 2007 مشاركة قام بنشر فبراير 21, 2007 السلام عليكم و رحمة الله و بركاته أستاذنا الجليل / هادى سالم شكرا على إمداداتكم و ابداعاتكم و لى طلب اذا تكرمتم استعمل الكود الذى قمتم بعمله فى هذا الشيت و أكواد مماثله و لو أمكن :---- اريد ان أجعل الكود فى صفحة الأستاذ يقرا من ( مثلا اليومية ) بعدد من الأوراق و لكن بنفس التصميم قمت باضافه التعديل على الكود فكان يقوم بقراءة كل الصفحات و لكن يقوم بالتسجيل فى ( صفحة الأستاذ ) و نفس الصفوف و يسجل اخر قيمة لاخر ورقة المطلوب باختصار ان يقوم بقراءة نفس المعادله من كل الأوراق و يسجلها بشكل متتالى ( اى وراء بعض ) و جزاكم الله خيرا رابط هذا التعليق شارك More sharing options...
هادى محمد المامون سالم قام بنشر فبراير 22, 2007 مشاركة قام بنشر فبراير 22, 2007 بسم الله الرحمن الرحيمأخى محمد عسكربرجاء التوضيح أكثرالسلام عليكم رابط هذا التعليق شارك More sharing options...
محمد عسكر قام بنشر فبراير 22, 2007 مشاركة قام بنشر فبراير 22, 2007 السلام عليكم و رحمة الله وبركاته أ/ هادى سالم شاكر لك إهتمامك و تجاوبك و جزاك الله خيرا أساتذى الفاضل اخيك الأصغر العبد الفقير الى الله محاسب و اقوم باعداد يومية تحليلية و حسابات ختامية و كنت فى قمة الحيره عن كيفيه عمل حساب أستاذ و لكن حينما قمتم بفعل مماثل لما اريد فشجعنى هذا و جدد الرغبة لدى فى إكمال العمل و مرفق اليكم جزء توضيحى ( اتمنى ان يكون فيه الإيضاح الكافى ) بجزء معدل للإيضاح و لى استفسار اخر هل تتكرم بمشاهدة المرفق الثانى و إفادتى بالإجابة أكرمكم الله _____.zip __________________..zip رابط هذا التعليق شارك More sharing options...
هادى محمد المامون سالم قام بنشر فبراير 22, 2007 مشاركة قام بنشر فبراير 22, 2007 بسم الله الرحمن الرحيمهل تريد نسخ البيانات من ورقه 2 الورقه 1 و نفس بيانات ورقه 2 الى ورقه 11 ثم ورقه 111السلام عليكم رابط هذا التعليق شارك More sharing options...
محمد عسكر قام بنشر فبراير 22, 2007 مشاركة قام بنشر فبراير 22, 2007 السلام عليكم أريد نسخ البيانات من الورقة 1 , 11 , 111 فى الورقة 2 بحيث تكون بيانات الورقة 1 فى الول ثم تاتى اسفل منها بيانات الورقة11 ثم بعدها بيانات الورقة 111 بهذا الشكل بيانات 1 بيانات 11 بيانات 111 و هكذا ,,,,, رابط هذا التعليق شارك More sharing options...
هادى محمد المامون سالم قام بنشر فبراير 23, 2007 مشاركة قام بنشر فبراير 23, 2007 بسم الله الرحمن الرحيمجرب الملف المرفق للمسلسل و المدينالسلام عليكم Mr_02.rar رابط هذا التعليق شارك More sharing options...
محمد عسكر قام بنشر فبراير 23, 2007 مشاركة قام بنشر فبراير 23, 2007 السلام عليكم و رحمة الله و بركاته الأستاذ / هادى سالم شكرا جزيلا على ردكم و بارك الله فيكم و جزاكم خير الجزاء أستاذى أرجو ألا أثقل عليكم ما فى المرفق هو احد أشكال المطلوب و لكن لى بعض الملاحظات :- - اريد ان استعمل الأمر ( If Sheets("1").Cells(i, 12) > 0 Then ) بأمرين شرطيين اى إذا كان قيمة الخلية س أكبر من الصفر او اذا كانت قيمة الخلية ص اكبر من الصفر إذن فيقوم بالترحيل و هذا ما قمتم بإلغائه فالكود يقوم بترحيل كل الصفوف سواء إذا كانت بها بيانات ام فارغه (( مع العلم أن الشيت 100 صف لإدخال البيانات )) و ارجو أن تقوم بشرح عمل الأكواد التاليه ذلك لرغبتى فى تعلم الفيجوال بيسك فلذلك أحاول أن اتعلم من الأكواد لعلى أجد ما استطيع ان اتعلمة - ما معنى الرقم 3 الذى تم إضافته الى CONT+3, 1 (( (Sheets("2").Cells(cont + 3, 1) = Sheets("11").Cells(i, 1)) - و ما هو الشرح للكود cont = Application.WorksheetFunction.CountA(Sheets("2").Range("A1:A100")) - و شرح الكود Public Sub mStart() Sheets("2").Range("A4:K100").ClearContents m1 m2 m3 End Sub و شاكرا لجهودك معنا جزاك الله خيرا و بارك الله فيك رابط هذا التعليق شارك More sharing options...
هادى محمد المامون سالم قام بنشر فبراير 23, 2007 مشاركة قام بنشر فبراير 23, 2007 (معدل) بسم الله الرحمن الرحيمجرب الملف المرفقسيتم تغيير عنوان الموضوع الىحساب الاستاذ فى الحساباتالسلام عليكم Mr_03.rar تم تعديل فبراير 23, 2007 بواسطه هادى سالم رابط هذا التعليق شارك More sharing options...
محمد عسكر قام بنشر فبراير 23, 2007 مشاركة قام بنشر فبراير 23, 2007 السلام عليكم و رحمة الله و بركاته أ/ هادى سالم شكرا ثانيه و جزاك الله خيرا و بارك الله فيك و بارك الله فى علمك و رزقك علما واسعا بالنسبة الى الملاحظات و الأسئلة التى ارسلتها فإن حضرتك أجبت فقط عن استخدام IF ارجو منك التكرم بالرد على باقى الملاحظات ثانيا :- كنت قد ارسلت مرفقا ثانيا استفسر فيه عن عمل كود للتسلسل التلقائى للتواريخ ارجو منك ايضا ان تفيدنى بالرد ان تكرمت علينا و شكرا و جزاك الله خيرا و بارك الله فيك رابط هذا التعليق شارك More sharing options...
هادى محمد المامون سالم قام بنشر فبراير 24, 2007 مشاركة قام بنشر فبراير 24, 2007 بسم الله الرحمن الرحيم الاخ محمد عسكر هناك فرق كبير بين الطلبات و الملاحظات Application.WorksheetFunction.CountA(Sheets("2").Range("A1:A100")) لعد الخلايا التى يوجد بها بيانات لنقل البيانات عند اخر سطر Sheets("2").Cells(cont + 3, 1) تم اضاقه (3) لوجود 3 خلايا لايوجد بها بيانات بأعلى العمود فيجب زياده 3 على العداد حتى يصل الى أول خليه فارغه بالعمود Public Sub mStart() Sheets("2").Range("A4:K100").ClearContents m1 m2 m3 End Sub لمسح محتويات الخلايا قبل التفيذ للتأكد ان الخلايا فارغه و ليس بها بيانات سابقه m1,m2,m2 اسماء Private Sub السابق انشائها و فى هذه الخطوه نقوم بأستدعائها السلام عليكم رابط هذا التعليق شارك More sharing options...
محمد عسكر قام بنشر فبراير 24, 2007 مشاركة قام بنشر فبراير 24, 2007 السلام على من اتبع الهدى الأستاذ / هادى سالم أعلم جيدا الفرق بين الطلبات و الملاحظات و لكننى لم الاحظ جيدا الا بعد الإرسال و فى كل الأحوال فإنى ارفق العباره (( بالرجاء )) و اتمنى ان لا يكون هناك اى سوء تفاهم فيعلم الله انى أحبك فى الله و ارجو ان تتكرم على بارسال بريدك الى َّ ASKER3000@GMAIL.COM جزالك الله خيرا و بارك الله فيك أرجو أن يتسع صدرك الى اتقدم اليك بطلبين :- اقوم بالتعديل فى الملف و سوف اوافيكم بالنتيجة الى ان انتهى من التصميم بالشكل الذى ارضى عن تقديمة للمنتدى كنت قد ارفقت ملفا للتسلسل التلقائى و ارسلت موضوع بهذا الشأن ارجو منك التكرم بالتجاوب معى فى هذا الشاء http://www.officena.net/ib/index.php?showt...amp;#entry69787 شكرا لك و جزاك الله خيرا و بارك الله فيك رابط هذا التعليق شارك More sharing options...
محمد عسكر قام بنشر فبراير 25, 2007 مشاركة قام بنشر فبراير 25, 2007 السلام عليكم و رحمة الله و بركاته الأخ و الأستاذ الفاضل / هادى سالم أرجو الإطلاع على المرفق بعد التعديل و انتظر تكرمكم بالرد و المشاركة جزاكم الله خيرا Mr__HADY2.zip رابط هذا التعليق شارك More sharing options...
هادى محمد المامون سالم قام بنشر فبراير 26, 2007 مشاركة قام بنشر فبراير 26, 2007 السلام عليكم و رحمة الله و بركاتهالأخ و الأستاذ الفاضل / هادى سالم أرجو الإطلاع على المرفق بعد التعديل و انتظر تكرمكم بالرد و المشاركة جزاكم الله خيرا بسم الله الرحمن الرحيم بصراحه لا استطيع فهم المطلوب ربنا معاك أعتقد هذا العمل استغرق منك ساعات او ايام اشرح ماذا تريد ترحيله بالخلايا مثلا اريد ترحيل الخليه A1 من الورقه الاولى الى الخليه B1 من الورقه الثانيه ولى سؤال لماذا أضفت 3 Private Sub جديده ؟ لقد قمت فى ملفى بأعداد 3 فقط و ذلك بعدد الصفحات التى تريد ترحيل بياناتهم و اذا زادت عدد الصفحات زادت Private Sub السلام عليكم رابط هذا التعليق شارك More sharing options...
محمد عسكر قام بنشر فبراير 26, 2007 مشاركة قام بنشر فبراير 26, 2007 السلام عليكم و رحمة الله و بركاته أستاذى / هادى سالم تحية طيبة مباركة ،،،، وبعد ،،،، من المرفق الأخير تجد حضرتك ان الترحيل تم بشكل ممتاز فى الورقة 2 و لكنى اريد ان اعدل فى شكل حـ / الأستاذ ليكون بالشكل المتاعرف عليه محاسبيا ( حرف T) فاريد ان يقوم بترحيل الخانة المدينة و بياناتها كامله وفى الجانب الآخر الخانة الدائنة و بياناتها كاملة اى اريد فى الورقة 2 الأعمدة 1 , 2 , 3 , 4 , 5 بيانات الأعمدة 1 , 12 , 4 , 5 , 3 (( فى الأوراق 1 ’ 11 ’ 111 )) و اريد فى الورقة 2 الأعمدة 7 , 8 , 9 , 10 , 11 بيانات الأعمدة 1 , 13 , 4 , 5 , 3 (( فى الأوراق 1 ’ 11 ’ 111 ))) و يكونوا متتاليين بيانات 1 ثم اسفل منها بيانات 11 ثم اسفل منها بيانات 111 الكود فى المديول 3 يقوم بجزء من هذا المطلوب و لكن لجهلى فى طبيعه و معنى الأوامر فانى لا اعلم كيفيه التعامل معها حيث انها تترك البيانات المحصورة فى اول و اخر خليه فى الأوراق 11 , 111 ملحوظة :- الملف المحاسبى الذى اقوم بإعادة تعديله يقوم حــ/ الأستاذ بقراءة البيانات من 12 ورقة (( 12 شهر )) و يقرا فى كل ورقة فى 100 صف و لكن المثال المرفق جزء بسيط منه و ان شاء الله حين الإنتهاء بالشكل الذى يرضينى اولا لكى اقدمى الى اعضاء المنتدى الغالى ساقوم بارساله اليك اولا للإطلاع عليه و ابداء الراى بارك الله فى استاذنا هادى سالم و جزاه الله خيرا رابط هذا التعليق شارك More sharing options...
هادى محمد المامون سالم قام بنشر فبراير 26, 2007 مشاركة قام بنشر فبراير 26, 2007 بسم الله الرحمن الرحيمجرب الملف المرفقالسلام عليكم Mr_04.rar رابط هذا التعليق شارك More sharing options...
محمد عسكر قام بنشر فبراير 26, 2007 مشاركة قام بنشر فبراير 26, 2007 السلام عليكم و رحمة الله و بركاته أستاذى / هادى سالم ما اروعك لا يسعنى سوى ان اقول بارك الله فيك و جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
ماجد السويدي قام بنشر مارس 3, 2007 مشاركة قام بنشر مارس 3, 2007 عفواً .. سؤال بس على هامش الحديث .. ما هو حساب الأستاذ و ما هو المصطلح المقابل له باللغة الإنجليزيه؟ رابط هذا التعليق شارك More sharing options...
u-w Lw7 قام بنشر مارس 3, 2007 مشاركة قام بنشر مارس 3, 2007 الاخ هادي سالم بارك الله في علمك وفي عملك وفي ذريتك وجزاك الله خير الجزاء وجعل كل ما تقدمه انت والاخوان من مساعدات وفوائد في ميزان حسناتكم تحياتي لك رابط هذا التعليق شارك More sharing options...
سالمي قام بنشر مارس 11, 2007 مشاركة قام بنشر مارس 11, 2007 السلام عليكم . هل يمكن ان احصل على الدالة ( vlookon) لان الاوفيس الذي استعمله لا يدعم هذه الدالة اوفيس 2000 وما هو الحل للوصول اليها من فضلكم و سلام الله عليكم د متم في خدمة ابناء الامة الاسلامية رابط هذا التعليق شارك More sharing options...
محمد عسكر قام بنشر مارس 11, 2007 مشاركة قام بنشر مارس 11, 2007 السلام عليكم و رحمة الله و بركاته الأخ / سالمى فى البدايه فإن داله VLOOKON غير موجوده ضمن الدوال المتاحة باى اصدار و انما هى إحدى ابداعات أستاذنا / أبو تامر أ/ عمر الحسينى و هناك موضوع كامل لشرح طريقه عمل الداله و يمكنك استخدام الداله بنسخ الكود من الماديول فى الفيجوال بيسك و اليك رابط الموضوع http://www.officena.net/ib/index.php?showtopic=15350 ارفق اليك الماديول و يمكنك ادراجها فى الفيجوال بيسك بالملف تحياتى ZIP_VLOOKON.zip رابط هذا التعليق شارك More sharing options...
otp قام بنشر مارس 16, 2007 مشاركة قام بنشر مارس 16, 2007 السلام عليكم ورحمة الله وبركاتة بارك الله فيكم واكثر الله من امثالكم وجعلكم عونا لنا رابط هذا التعليق شارك 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.