این اموزش ابزار گزارش گیری خیلی واضح نیست می شه یک کم بیشتر توضیح بدیدنقل قول:
سلام
آموزش Pivot Table (ابزار گزارش گيري در اكسل)
Printable View
این اموزش ابزار گزارش گیری خیلی واضح نیست می شه یک کم بیشتر توضیح بدیدنقل قول:
سلام
آموزش Pivot Table (ابزار گزارش گيري در اكسل)
آموزش Pivot Table (ابزار گزارش گيري در اكسل)نقل قول:
PT هميشه براي به دست آوردن جمع كل يك داده به كار مي رود.
مثلاً جمع كل فروش شركت در تاريخ فلان يا جمع كل نمره دانش آموزان در آزمون فلان يا جمع كل ؟؟؟؟ در ؟؟؟؟ .
فرض كنيد يه شركت فروش روزانه خودش رو در جداول اكسل ثبت مي كنه.
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
حالا ميخواد مجموع فروش مودم هاي ADSL رو در تاريخ 23/4/86 بدونه.
مراحل كار:
Data> Pivot Table and Pivot Report> Finish
حالا با عمل كشيدن و رها كردن (Drag & Drop) فيلد «نام كالا» رو از قسمت Pivot Table Field List به قسمت Drop Row Fields Here برده و تاريخ فروش رو به قسمت Drop Column Fields Here و قيمت فروش رو به قسمت Drop Data Items Here مي بريم.
خواهيم ديد كه در PT ايجاد شده، مجموع فروش هر كالا در هر تاريخ، مجموع كل فروش هر تاريخ، مجموع كل فروش هر كالا و مجموع كل فروش تا كنون به ما داده ميشه. خيلي جالبه. نيست؟
دوست عزیز javad2625
ممنونم ازتوضیحات کاملی که دادید
اما یک سوال : ایا دراکسل فقط در همین حد می شه گزارش تهیه کرد ؟
نقل قول:
ضمناً انتظار ندارم همه چيزهايي رو كه در قسمت كدنويسي گفتم فهميده باشيد، اما انتظار دارم سوال زير رو بتونيد جواب بديد:
يك TextBox ديگر به كاربرگ اضافه كرده و برنامه اي بنويسيد كه به محض كليك روي آن TB، كپشن CommandButton1 تبديل شود به:
"TextBox2 Clicked!"
اگه جواب رو مي دونستيد، نمونه كد رو همينجا بگذاريد. اگه نمي دونستيد بگيد تا خودم توضيح بدم.
دوست عزیز javad2625
من فایلی را که خواستید اپلود کردم یه نگاه بکنید
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
با سلام و تبريك عيد مبعث به همه دوستان
اين هم عيدي من:
باز كردن قفل فايل هاي آفيس (97 تا 2003)
(تمام برنامه هاي زيرمجموعه آفيس شامل ورد، اكسل، پاورپوينت، اكسس و...)
نسخه نمايشي آخرين ورژن رو از اينجا:
و س.ن. اون رو از اينجا دريافت كنيد:کد:http://www.elcomsoft.com/aopr.html
موفق باشيد.کد:http://www.4shared.com/file/21832953/5ffd20fa/Serial_Number.html
(جواب هاي mefmef رو هم فردا ميگم)
من غير از Pivot Table ابزار خاصي براي گزارش گيري در اكسل سراغ ندارم. گزارش هاي اكسل رو بايد به صورت دستي درست كنيم. البته ميشه با ماكروها و/يا برنامه نويسي vb يه مقدار روند كار رو سريعتر كرد اما اون نرم افزاري كه واقعاً ابزارهاي قوي براي گزارش گيري داره Microsoft Access هست كه طرز كاري حرفه اي تر از Excel داره و كاربرپسندي و سهولت كار اون رو هم نداره. با اين وجود كساني كه نياز حتمي به تهيه گزارش هاي اتوماتيك داشته باشند و پيچيدگي گزارش هاي مورد نيازشون طوري باشه كه به صورت دستي نشه توي اكسل درست كرد، بايد از Access استفاده كنند.نقل قول:
مف مف جاننقل قول:
جواب شما درست بود و معلوم ميشه تا اينجاي كار رو خوب متوجه شديد.
البته نيازي نبود فايل رو آپلود كنيد. فقط نمونه كد مربوط به سوال رو هم اگه مي گذاشتيد كافي بود. مثل اين:
ادامه آموزش امشب آخر شب.کد:Private Sub TextBox2_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Me.CommandButton1.Caption = "TextBox2 Clicked!"
End Sub
ممنونم دوست عزیز منم عید سعید مبعث را به شما وهمه دوستان دیگه تبریک می گمنقل قول:
مف مف جان
راستی این مف مف جان کی بید ؟
پس اسم شما رو به فارسي چطور مي نويسند؟نقل قول:
راستی این مف مف جان کی بید ؟
برنامه نويسي ويژوال بيسيك در اكسل
درس چهارم: برنامه نويسي براي صفحه كليد (رويداد KeyDown)
بعضي وقت ها لازم ميشه برنامه رو طوري تنظيم كنيم كه مثلاً با فشردن دكمه Enter يا دكمه ↓ روي صفحه كليد، نشانگر متن به TextBox بعدي بره. يا با زدن ↑ به خانه قبلي منتقل بشه.
(وقتي ميگم «نشانگر متن» منظورم خط چشمك زن عمودي هست).
ويژوال بيسيك، تمام دكمه هاي صفحه كليد رو با كد Ascii اونها ميشناسه. وقتي كاربر، هر دكمه اي رو داخل يه TextBox فشار بده فوراً رويداد KeyDown اون TB فعال شده و كد اون دكمه رو به پارامتر KeyCode انتقال ميده.
مثال
يه TextBox و يه CommandButton به كاربرگ اضافه كنيد و در رويداد TextBox1_KeyDown كد زير رو بنويسيد:
حالا برنامه رو اجرا كنيد. (وقتي ميگم اجرا كنيد يعني به كاربرگ برگرديد و اون رو از حالت Design Mode خارج كنيد). مي بينيد كه وقتي نشانگر متن داخل اون TB هست، هر كليدي رو بزنيد، كد اسكي كليد روي CommandButton نوشته ميشه.کد:Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
Me.CommandButton1.Caption = KeyCode
End Sub
حالا مي تونيد بگيد كد دكمه هاي جهت (Arrow Keys) چند هست؟ اونها رو پيدا كنيد كه بعداً باهاش كار داريم.
تمرين
چهار تكست باكس به كاربرگ خود اضافه كنيد. (از TextBox2 تا TextBox5) و برنامه اي بنويسيد كه به محض زدن كليد Enter يا كليد ↓ نشانگر متن رو به TB بعدي و در صورت زدن دكمه ↑ نشانگر رو به خانه قبلي ببره. (دقت كنيد كه TB2 خانه قبلي نداره و TB5 هم خانه بعدي نداره پس در TB2 نيازي به رفتن به خانه قبل و در TB5 نيازي به رفتن به خانه بعد نيست).
روش كار
4 تكست باكس گفته شده رو به كاربرگ اضافه كنيد. و در رويداد KeyDown اونها كد مشابه زير رو بنويسيد:
(من كد TB2 و TB3 رو با توپيحات فارسي مي نويسم، شما هم كد TB4 و TB5 رو بنويسيد و همينجا بگذاريد).
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
(دقت كنيد كه نوشتن توضيحات،در هر قسمت دلخواه از كد بعد از علامت ' (آپاستروف) بلامانع هست. )کد:Private Sub TextBox2_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
Select Case KeyCode '--> ' ببين كدام كليد فشرده شده
Case 40, 13 '--> ' 'اگر 40 يا 13 بود (يعني دكمه جهت پايين يا دكمه اينتر
Me.TextBox3.Activate '--> ' تكست باكس 2 را فعال كن
End Select '--> ' پايان انتخاب
End Sub
کد:Private Sub TextBox3_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
Select Case KeyCode '--> ' شماره كليد را انتخاب كن
Case 40, 13 '--> ' اگر 40 يا 13 است يعني دكمه پايين يا دكمه اينتر
Me.TextBox4.Activate '--> ' تكست باكس 4 را فعال كن
Case 38 '--> ' آگر 38 است يعني دكمه جهت بالا
Me.TextBox2.Activate '--> ' تكست باكس 2 را فعال كن
End Select '--> ' پايان انتخاب حالت
End Sub