ایجاد دفتر روزنامه

[R6E5]

با سلام خدمت اساتید گرامی
من یه جدول شبیه دفتر روزنامه ایجاد کردم همراه با سند حسابداری، میخواستم ببینم کسی میتونه برای این فایل یوزرفرم ایجاد کنه، متاسفانه من اطلاعات چندانی در مورد یوزرفرم ندارم
این فایل شامل 2تا برگه هستش که اولی با نام Sanad و دومی با نام Ruzname، برگه Sanad به صورت یوزر فرم باشه و طوری ایجاد بشه که اطلاعات اون به برگه Ruzname انتقال پیدا کنه .
برگه Sanad چون مشخص نیست ممکنه چندتا ردیف داشته باشه به همین خاطر من حداکثر 11تا انتخاب کردم اما حداقل 2تا لازمه و مابقیش خالی میمونه و شرح سند ادامش میاد .
ممنون میشم کمکم کنید
:D

Daftar Ruzname

[khakzad]

RE: ایجاد دفتر روزنامه

سلام دوست عزيز
لطفا اول فرم رو اماده کنيد که چه مواردي بايد داشته باشه
بعد کم کم به جواب ميرسيم که تا اخر حل مسئله؛ شما هم ب جواب رسيده باشيد هم راه حل رو ياد بگيريد
(دقيقا توضيح بديد يا نشون بديد توي فرم چيا هس و هر ننکته ديگه اي که لازمه)
[hr]
سلام دوست عزيز
لطفا اول فرم رو اماده کنيد که چه مواردي بايد داشته باشه
بعد کم کم به جواب ميرسيم که تا اخر حل مسئله؛ شما هم ب جواب رسيده باشيد هم راه حل رو ياد بگيريد
(دقيقا توضيح بديد يا نشون بديد توي فرم چيا هس و هر ننکته ديگه اي که لازمه)

[R6E5]

RE: ایجاد دفتر روزنامه

دوست عزیز میخوام برگه Sanad به صورت فرم باشه که داده هاش وارده برگه ruznameh بشه.
این فرم شامل روز/ماه شرح و بدهکار بستانکار باشه، قسمت شرحش شامل سه بخش بدهکار، بستانکار و شرح سند باشه
قسمت بدهکار یا بستانکار شرح مشخص نیست چندتا ردیف داشته باشن اما حداقل 2تا ردیف دارد.
در کل میخوام داده های برگه Sanad به برگه Ruzname منتقل بشه
قربون همتون )

[R6E5]

RE: ایجاد دفتر روزنامه

از دوستان کسی نبود بتونه کمکی کنه؟

[komeilex]

RE: ایجاد دفتر روزنامه

[align=justify]سلام دوست عزیز. لطفا به فایل پیوست یه نگاهی بندازین ببینین همین مد نظر بود. ایشاا.. با کمک اساتید روش کار می کنیم.
[/align]
[attachment=785]

[R6E5]

RE: ایجاد دفتر روزنامه

دوست عزیز ممنون از توجه و زحمت فراوان.
فایل شما اصل مطلب رو داشت اما میشه تعداد سطراش مانند تصویر باشه؟ ( یه چیزی مانند شکل )
میشه وقتی بخش شرح بدهکار رو وارد کردیم بخشهای شرح بستانکار و شرح سند و بستانکار غیرفعال بشه؟ و یا وقتی شرح بستانکار وارد میشه بخشهای دیگه غیر بستانکار غیر فعال بشه؟ و وقتی شرح سند رو وارد میکنیم همه بخشهای دیگه همون ردیف غیر فعال بشه و نشه چیزی توی اون ردیف وارد کرد؟
میشه بدهکار و بستانکار را فقط به صورت عددی وارد کرد؟ ( یعنی سه رقم جدا کنه )
میشه بعد از هر دفعه وارد کردن داده ها یه ردیف خالی باشه؟
دوست عزیز واقعا ممنون
لطفا یکم هم توضیح بدید تا از علم شما استفاده کنیم
موفق باشد .

http://s1.picofile.com/file/7431328816/ruzname.jpg

[komeilex]

RE: ایجاد دفتر روزنامه

[align=justify]بله دوست عزیز. تا اون جایی که من می دونم تمامی مواردی که گفتین امکانش هست. من خودم در حال یادگیری هستم و تا اونجایی که سوادم تو زمینه Vb یاری بده کمکتون می کنم.
در مورد عدد بودن شما کافیه این شرط رو به کدهاتون اضافه کنین:[/align]

If Not IsNumeric(Me.Textbox1.Value) Then
MsgBox "Meghdare textbox1 Bayad Be Soorate Adad Vared Shavad", vbExclamation, "user form name" 

[align=justify]سوال اولتون هنوز روش کار نکردم ولی می دونم امکانش هست. ایشاا... اساتید کمک کنن. راستی یه سوال؟ شما چرا تو عکسی که ضمیمه کردین از این همه textbox برای هر لیبل استفاده کردین؟! یه دونه کافیه خوب.
اضافه کرده تصویرم با کنترل shock wave امکانش هست ولی منظورتون از این که سطرا مثل شکل باشنو نفهمیدم.
[/align]

[komeilex]

RE: ایجاد دفتر روزنامه

[align=justify]برای سوال اولتونم فعلا این راه حل به نظرم رسید. فرض کنین شما 3 تا text box دارین، حالا می خواین با ورود اطلاعات تو اولی دو تا دیگه غیر فعال بشن. رو text box1 کلیک کنین و این کدو براش بنویسن:[/align]

Private Sub txt1_Change()
If txt1.Value <> "" Then
txt2.Visible = False
txt3.Visible = False
End If
End Sub 

[align=justify]برای دو تا دیگم به همین روش عمل کنین.
البته فراموش نشه که به دکمه OK حتما این کد اضافه بشه تا textbox هاتون برای رکورد بعدی برگردن:[/align]

    txt1.Visible = True
    txt2.Visible = True
    txt3.Visible = True 

[R6E5]

RE: ایجاد دفتر روزنامه

دوست گلم واقعا دستت درد نکنه خیلی لطف کردی، شما استادی
لطفا اگه میشه فایلاشم بذار تا هم من هم دوستان استفاده کنیم
چون در حسابداری ممکنه طرف بدهکار شامل یک مورد و طرف بستانکار همون حساب شامل چند مورد باشه، یا برعکس
مثلا شما کامپیوتری را به قیمت 800/000 تومان خریدید، و بخشی از این مبلغ رو چک روز و مابقیشو چک مدت دار دادید سند حسابداریش به این شکل میشه .

اثاثه ( بدهکار ) --------------------------------------------------- 800/000
                          بانک ( بستانکار ) ---------------------------------------------- 400/000
                          اسناد پرداختنی ( بستانکار ) -------------------------------- 400/000
خرید کامپیوتر طبق فاکتور 123 ( شرح سند )

ببخشید که بحث حسابداری راه انداختم فقط میخواستم دلیل اینکه از چندتا textbox استفاده میکنیم واسه هر لیبل رو توضیح داده باشم )
ممنون از توجهتون

[komeilex]

RE: ایجاد دفتر روزنامه

[align=justify]خواهش می کنم دوست عزیز. شما لطف دارین ولی یه نکته. من به عنوان کوچکترین عضو این سایت در خدمت شما هستم و خوشحال میشم بتونم کمکی کنم ولی به قول خانم خاکزاد قرار شد شما هم به جواب برسین و هم راه حل رو یاد بگیرین. الان تقریبا تمام کدایی که نیاز دارین همین جا هست. پس یه لطفی کنین و فرم نهایی رو تهیه کنین و اگر مایل بودین تو تالارم قرار بدین تا ما هم استفاده کنیم. خود من برای حل این سوال چند تا نکته جدید یاد گرفتم. بهتون قول میدم اگه شمام درگیرش بشین، خیلی چیزای جدید یاد می گیرین که ما هم می تونیم ازش استفاده کنیم. هر مشکلی هم داشتین همین جا مطرح کنین تا دوستان در حد تواناییشون کمک کنن[/align]