Thursday, April 10, 2014

Holiday Mood



စိတ္ကို အစာေကၽြးဖို႕ လာမယ့္ပိတ္ရက္မွာ စာမ်ားမ်ားဖတ္ဦးမယ္။ အခုတေလာ ဖတ္ျဖစ္ေနတာ အလုပ္နဲ႕ဆိုင္တဲ့ စာေတြပဲမ်ားေနလို႕ စိတ္သိပ္မက်န္းမာဘူး။ ဒီ့ထက္ စိတ္က်န္းမာဖို႕ ကေတာ့ ေအးခ်မ္းတဲ့အခ်ိန္ေလးတစ္ခု သတ္သတ္မွတ္မွတ္ယူၿပီး စိတ္မွာတင္တဲ့အညစ္အေၾကးေတြကို ျပန္လည္ေဆးေၾကာသန္႕စင္ဖို႕ ႀကိဳးစားရဦးမယ္။
တျခားအရာေတြထက္ ေပ်ာက္သြားတဲ့ ကိုယ့္ကိုယ္ကိုယ္ျပန္ရွာဖို႕က ပိုၿပီးခက္ခဲမယ္ထင္တယ္။

တစ္ေန႕ထက္တစ္ေန႕ အက်ိဳးရွိရွိပဲေနခ်င္တယ္။ အခ်ိန္ေတြကုန္သြားတာကို ႀကီးလာေတာ့ ပိုႏွေျမာတတ္လာတယ္။ အက်ိဳးရွိတဲ့စကားေတြေျပာၿပီး အက်ိဳးရွိတဲ့အလုပ္ေတြလုပ္ရင္း စိတ္ဓါတ္ရင့္က်က္လာေစမယ့္ ပါတ္၀န္းက်င္မွာပဲေနခ်င္တယ္။ ကိုယ္စိတ္၀င္စားတဲ့အလုပ္ကေလးေတြကို အာရံုစိုက္လုပ္ႏုိင္ၿပီး ေအးေအးခ်မ္းခ်မ္းေလး ကုန္ဆံုးခ်င္တယ္။ 

ဇြဲကပင္ခန္းမေဘး 
ရံုးခန္းထဲက ႏွင္းဆီပန္း
အထုပ္ေတြ ရံုးသယ္လာၿပီး ဒီညေန အိမ္ျပန္ဖုိ႕ အဆင္သင့္ပဲ။ ကိုယ့္စိတ္ဟာ ထူးဆန္းတယ္။ အရင္က အိမ္ျပန္လာခါနီးတုိင္း ေပ်ာ္တယ္။ အခုေတာ့ ေပ်ာ္တယ္လည္း မဟုတ္ မေပ်ာ္ဘူးလည္းမဟုတ္။ အိမ္ဟာ ျပန္ခ်င္တဲ့အခ်ိန္တုိင္း ျပန္လုိ႕ရေနတာကိုး။
ပိေတာက္ေတြေတာ့ မျမင္ရေသးေပမယ့္ .... လာမယ့္ ႏွစ္သစ္မွာ ေပ်ာ္ရႊင္ၾကပါေစ။

Sunday, April 6, 2014

What I’ve learned today : Finding overlapping pivot tables in Excel

စာလည္းေရးခ်င္တယ္။ တစ္ခုခုမွ မေရးရရင္လည္း မေနႏုိင္ဘူး။ ခက္တာက စိတ္ေအးလက္ေအး ခ်ေရးဖို႕ အေၾကာင္းေတြလည္း မရွိဘူး။ ဒါနဲ႕ ေန႕စဥ္ေန႕တိုင္း အလုပ္လုပ္ရင္း အသစ္သိသိလာတာေလးေတြ ျပန္ေရးျပဖို႕ စဥ္းစားမိတယ္။ သိၿပီး တတ္ၿပီး သားေတြအတြက္ မရည္ရြယ္ပါဘူး။ ကိုယ့္လိုပဲ စမ္းတ၀ါး၀ါး လုပ္ရင္းေလ့က်င့္ ေလ့က်င့္ရင္း လုပ္ စမ္းလုပ္ၾကည့္ရင္း သိခ်င္မယ့္သူေတြမ်ား ရွိခဲ့ရင္ဆိုၿပီးပဲ ေရးပါတယ္။ ခက္ခက္ခဲခဲေတြလည္း မဟုတ္ပါဘူး။ ဒီေန႕ ေခတ္ႀကီးမွာ အင္တာနက္မွာ surf လိုက္ရင္ အလြယ္တကူေတြ႕ႏုိင္တဲ့အေၾကာင္းအရာေတြပါ။ ဒါေပသိ surf တယ္ ဆိုေသာ္ျငား surf တိုင္း search တိုင္းလည္း ကုိယ္တကယ္သိခ်င္တာ ေျဖထားတဲ့ တကယ္အသံုးတည့္တဲ့ ဆိုဒ္ကို လြယ္လြယ္နဲ႕ ျမန္ျမန္လည္း ေတြ႕ဦးမွ။ ကုိယ့္လို ငပ်င္းဆို ဘယ္ဖုိရမ္ ညာဖိုရမ္မွလည္း တစိုက္မတ္မတ္ ၀င္မဖတ္ေတာ့ အေရးႀကံဳမွ သိခ်င္တာ ရိုက္လိုက္ရင္ ကြန္နက္ရွင္မ်ား မေကာင္းရင္ ဒုကၡေရာက္ပါၿပီေကာ။
Excel မွာ pivot tables ေတြ အမ်ားႀကီး ထည့္ရမယ္ဆိုရင္ sheet မ်ိဳးစံုမွာ ဟိုတစ္စ ဒီတစ္စ ထားမိၿပီး တခါတေလ ဒီလို error ေလး တတ္တတ္ပါတယ္။
Pivot table cannot overlap each other … blah blah blah ဆိုၿပီးေတာ့။ အဲဒီလုိ error တက္ရင္ overlap ျဖစ္ေနတဲ ့pivot table ၂ ခုကို နည္းနည္းၾကားထဲမွာ လိုင္း အလြတ္ ၁ လိုင္း ၂ လိုင္း (ဒါမွမဟုတ္) ၂ ခုမထပ္ႏုိင္တဲ့ အကြာအေ၀းမွာ ေရႊ႕ထားလိုက္ရင္ အဆင္ေျပပါတယ္။
ဒါမ်ိဳးဆို ကုိယ့္ဖာသာ လုပ္ထားတဲ့ excel file ဆိုေတာ္ေသး … သူမ်ားလုပ္ထားၿပီးသား လုိက္ရွာၾကည့္ရရင္ေတာ့ ေခါင္းမူးေရာ့ပဲ။
အေပၚက credit ေပးထားတဲ့ ဆိုဒ္ေလးမွာ ျပထားတဲ့ coding က ထပ္ေနတဲ့ pivot table ေတြကို ရွာဖို႕ တကယ္အလုပ္ျဖစ္ပါတယ္။ ကုတ္ကိုေတာ့ သူ႕ ဆိုဒ္ကပဲ ကူးယူလိုက္ပါ။ အဲဒီ code ေလး Macro ထဲထည့္ run လုိက္ရင္ ဘယ္ worksheet ရဲ႕ ဘယ္နားက ဘယ္ pivot table ေတြ overlap ျဖစ္ေနလည္းဆိုတာ ျပေပးပါတယ္။ ေအာက္က ဥပမာမွာ ၾကည့္ၾကည့္ပါ။


ေနရာသိပီဆို ထပ္ေနတဲ့ pivot table ေတြ မထပ္ေအာင္ လုပ္ေပးလိုက္ရင္ error ထပ္မတက္ေတာ့ပါဘူး။
Macro ကို ျပန္ run ရင္ ဒီလို ျပပါလိမ့္မယ္။

အဲ့လိုေလး ျပပီဆုိ ထပ္ေနတဲ့ table ေတြ မရွိေတာ့ဘူးေပါ့။
Macro ဘယ္လို run မယ္
ကိုယ္သိတဲ့ run နည္းေတြကေတာ့ (၂) နည္းရွိတယ္။ ပထမတစ္နည္းက Developer ေအာက္က Macro ကိုႏွိပ္ … ၿပီးရင္ Macro Name ေနရာမွာ ရိုက္ထည့္လိုက္ရင္ create ဆိုတာေလး ေပၚလာလိမ့္မယ္။ အခုေလာေလာဆယ္ သူေပးထားတဲ့ code အတြက္ေတာ့ Macro Name ေနရာမွာ ShowPivotTableConflicts ဆိုတာေလး ရိုက္ပီး Create ကိုႏွိပ္ ၿပီးရင္ သူေပးထားတဲ့ code ေတြ copy paste လုပ္ပီး Run လိုက္ရင္ ရပီ။ 

Create ကိုႏွိပ္လိုက္ရင္ ဒီေနရာ ေရာက္သြားပီး ဒီလိုေလး ေပၚလိမ့္မယ္။

Sub ShowPivotTableConflicts()

----------------- (သူျပထားတဲ့ ကုဒ္ေတြ ကူးထည့္)

End Sub
ပီးရင္ က်န္တဲ့ Function အတြက္ code ေတြ ကူးထည့္ ပီး Run။
တစ္ခါ run ပီးရင္ ေနာက္တခါ Developer >>> Macro ႏွိပ္ရင္ ေအာက္ကလိုမ်ိဳး ေပၚလာပါလိမ့္မယ္။
 
ဒီလုိ run လို႕မွ အဆင္မေျပဘူးဆိုရင္

Developer >>> Visual Basic ကိုႏွိပ္ …. ၿပီးလို႕ code window ထဲေရာက္သြားရင္ This Workbook ဆိုတာႏွိပ္လိုက္ရင္ ေပၚလာတဲ့ ေနရာမွာ code ေတြ အကုန္လုံး copy paste လုပ္ပီး run (shourt cut key နဲ႕ဆို F5 ႏွိပ္) လိုက္ရင္ ရပါပီ။
Code ေတြကုိ copy ကူးရင္ ေအာက္က comment စာေၾကာင္းေလးကို ရွာပီး ဖ်က္ပစ္လိုက္ပါ။ မဟုတ္ရင္ error တက္ႏုိင္လို႕။

The macro below shows how you can use the functions above. // comment

ၿပီးပါၿပီ :) :) :)