سبق دا تشریح کوي چې څنګه په Excel 2016، 2013، 2010 او ښکته کې ورک شیټونه پټ کړئ. تاسو به زده کړئ چې څنګه په ښي کلیک کولو سره د ورک شیټ ژر تر ژره پټ کړئ او څنګه د VBA کوډ سره په یو وخت کې ټولې شیټونه پټ کړئ.

دا تصور وکړئ: تاسو یوه کاري پاڼه پرانیزئ او وګورئ چې ځینې فورمولونه بل ورک شیټ ته راجع کیږي. . تاسو د شیټ ټبونو ته ګورئ، مګر راجع شوي سپریڈ شیټ شتون نلري! تاسو هڅه وکړئ د ورته نوم سره نوې پاڼه جوړه کړئ، مګر Excel تاسو ته وایي چې دا دمخه شتون لري. دا ټول څه معنی لري؟ په ساده ډول، کاري پاڼه پټه ده. په Excel کې پټ شیټونه څنګه وګورئ؟ په ښکاره ډول، تاسو باید دوی پټ کړئ. دا په لاسي ډول د Excel د Unide کمانډ په کارولو سره یا په اتوماتيک ډول د VBA سره ترسره کیدی شي. دا ټیوټوریل به تاسو ته دواړه میتودونه درکړي.

په Excel کې د شیټونو پټولو څرنګوالی

که تاسو غواړئ یوازې یو یا دوه پټ شیټونه وګورئ، دلته تاسو څنګه کولی شئ ژر تر ژره پټ کړئ دوی:

1. ستاسو د ایکسل کاري کتاب کې، د هر شیټ ټب کې ښیې کلیک وکړئ او د سیاق مینو څخه نه پټ کړئ … غوره کړئ.
2. په نه پټ کړئ بکس، هغه پټ شیټ غوره کړئ چې تاسو یې ښودل غواړئ او کلیک وکړئ سمه (یا د شیټ نوم دوه ځله کلیک وکړئ). بشپړ شوی!

د ښي کلیک اړوند مینو سربیره، د نه پټول ډیالوګ د ربن څخه لاسرسی کیدی شي:

• په Excel 2003 او پخوانیو کې، په Format مینو کېکاږئ، او بیا Sheet > نه ښکاره کړئ کلیک وکړئ.
• په Excel 2016 کې، Excel 2013، Excel 2010 او Excel2007، کور ټب ته لاړ شئ > حجرې ګروپ، او د شکل لاندې لید کلیک وکړئ، پټول او amp ته اشاره وکړئ ; پټ کړئ ، او بیا کلیک وکړئ پاڼه ښکاره کړئ …

15>

یادښت. د ایکسل پټول اختیار یوازې تاسو ته اجازه درکوي په یو وخت کې یوه پاڼه غوره کړئ. د څو شیټونو د پټولو لپاره، تاسو باید د هرې کاري پاڼې لپاره پورتنۍ مرحلې په انفرادي ډول تکرار کړئ یا تاسو کولی شئ د لاندې میکرو په کارولو سره په یوځل کې ټولې پاڼې پټې کړئ.

د VBA سره په Excel کې د شیټونو د پټولو څرنګوالی

په داسې شرایطو کې چې تاسو ډیری پټ ورک شیټونه لرئ، د دوی یو په یو پټول ممکن ډیر وخت ونیسي، په ځانګړې توګه که تاسو غواړئ ټولې پاڼې پټې کړئ ستاسو په کاري کتاب کې. خوشبختانه، تاسو کولی شئ دا پروسه د لاندې میکرو څخه یو سره اتومات کړئ.

په Excel کې د ټولو شیټونو د پټولو څرنګوالی

دا کوچنی میکرو ټولې پټې پاڼې په فعاله کاري کتاب کې په یوځل ښکاره کوي، پرته له ګډوډۍ تاسو د هر ډول خبرتیاو سره.

Sub Unhide_All_Sheets() Dim wks as worksheet for each wks in ActiveWorkbook.Worksheets wks.Visible = xlSheetVisible راتلونکی wks End Sub

ټول پټ شیټونه وښایاست او د دوی شمیره ښکاره کړئ

لائک پورته یو، دا میکرو په کاري کتاب کې ټولې پټې پاڼې هم ښیې. توپیر یې دا دی چې په بشپړیدو سره، دا یو ډیالوګ بکس ښیې چې کاروونکي ته خبر ورکوي چې څومره پاڼې پټې شوي دي:

Sub Unhide_All_Sheets_Count() Dim wks د ورک شیټ په څیر Dim شمیره د انټیجر شمیره = 0په ActiveWorkbook.Worksheets کې د هر wks لپاره که wks.Visible xlSheetVisible بیا wks.Visible = xlSheetVisible شمیره = شمیره + 1 پای که راتلونکی اونۍ که شمیره > 0 بیا د MsgBox شمېره & "کار پاڼې پټې شوې دي." , vbOKOnly, "د ورک پاڼي نه پټول" نور MsgBox "هیڅ پټ ورک پاڼي نه دي موندل شوي." , vbOKOnly, "د ورکشیټونو نه پټول" End If End Sub

ډیری شیټونه پټ کړئ چې تاسو یې غوره کوئ

که تاسو نه غواړئ ټول ورک پاڼې په یوځل پټې کړئ، مګر یوازې هغه چې کارن یې په ښکاره توګه د لیدلو لپاره موافق وي، بیا میکرو وغواړئ چې د هرې پټې پاڼې په اړه په انفرادي ډول وپوښتئ، لکه دا:

Sub Unhide_Selected_Sheets() Dim wks As Worksheet Dim MsgResult د VbMsgBoxResult په توګه د هر wks لپاره په ActiveWorkbook.Worksheets کې که wks.Visible = xlSheetHidden بیا MsgResult = MsgBox( "پاڼه ښکاره کړئ "& wks.Name &"؟" , vbYesNo، "د ورکپاڼو نه پټول") که MsgResult = vbYes نو بیا wks.Visible = xlSheetVisible پای که د بل سره کار کول <6 د فرعي سره پای ته ورسیږي د شیټ په نوم کې ځانګړې کلمه

په داسې شرایطو کې کله چې تاسو غواړئ یوازې هغه شیټونه پټ کړئ چې د دوی په نومونو کې ځانګړي متن لري، په میکرو کې د IF بیان اضافه کړئ چې د هر پټ ورک شیټ نوم به وګوري او یوازې هغه پاڼې پټې کړي. چې هغه متن لري چې تاسو یې مشخص کوئ.

په دې مثال کې، موږ پاڼې د " repor" کلمې سره پټوو t " په نوم. میکرو به شیټونه ښکاره کړي لکه راپور ، راپور 1 ، جولایراپور ، او داسې نور.

د هغو ورکشیټونو د پټولو لپاره چې نومونه یې بل کلمې لري، په لاندې کوډ کې " رپورټ " د خپل متن سره بدل کړئ.

Sub Unhide_Sheets_Contain( ) Dim wks د ورک شیټ په توګه د انټیجر شمیره = 0 په ActiveWorkbook کې د هر wks لپاره. ورکشیټ که (wks.Visible xlSheetVisible) او (InStr(wks.Name، "report") > 0) بیا wks.Visible = xlSheetVisible شمیره شمیرنه + 1 پای که راتلونکی اونۍ که شمیره > 0 بیا د MsgBox شمېره & "کار پاڼې پټې شوې دي." , vbOKOnly, "د ورک پاڼي نه پټول" نور MsgBox "د ټاکل شوي نوم سره هیڅ پټ ورک پاڼي نه دي موندل شوي." , vbOKOnly, "د ورک شیټونو نه پټول" End If End Sub

په Excel کې د شیټونو د پټولو لپاره د میکرو کارولو څرنګوالی

په خپل کاري پاڼه کې د میکرو کارولو لپاره، تاسو کولی شئ یا په بصري اساس کې کوډ کاپي/پیسټ کړئ د میکرو سره د کار کتاب ایډیټر یا ډاونلوډ کړئ او له هغه ځایه یې چل کړئ.

څنګه په خپل کاري کتاب کې میکرو داخل کړئ

تاسو کولی شئ په خپل کاري کتاب کې له پورتني میکرو څخه په دې ډول اضافه کړئ:

1. د پټو پاڼو سره د کار کتاب پرانیزئ.
2. د Visual Basic Editor د پرانستلو لپاره Alt + F11 فشار ورکړئ.
3. په چپ اړخ کې، ښي کلیک وکړئ This Workbook او انتخاب کړئ Insert > موډول د شرایطو مینو څخه.
4. د کوډ کړکۍ کې کوډ پیسټ کړئ.
5. د چلولو لپاره F5 فشار ورکړئ macro.

د تفصيلي ګام په ګام لارښوونو لپاره، مهرباني وکړئ وګورئ چې څنګه د VBA کوډ داخل کړئ او چل کړئExcel.

د میکرو سره د کار کتاب ډاونلوډ کړئ

په بدیل سره، تاسو کولی شئ زموږ د نمونې کاري کتاب ډاونلوډ کړئ ترڅو په Excel کې د شیټونو پټولو لپاره چې پدې ټیوټوریل کې بحث شوي ټول میکرو لري:

• ټول_شیټونه پټ کړئ - په یوه فعال کاري کتاب کې ټول ورکشاپونه په دقیقه او خاموشه توګه پټ کړئ.
• Unhide_All_Sheets_Count - ټولې پټې پاڼې د دوی شمیرې سره ښکاره کړئ.
<9 Unhid_Selected_sheets - هغه پټ پاڼې ښکاره کړئ چې تاسو یې د پټولو لپاره غوره کوئ.
• Unhide_Sheets_Contain - هغه ورکشاپونه پټ کړئ چې نومونه یې ځانګړي کلمه یا متن لري.

<0 په خپل ایکسل کې د میکرو چلولو لپاره، تاسو لاندې کار کوئ:

1. ډانلوډ شوی کاري کتاب خلاص کړئ او که غوښتل شوي وي میکرو فعال کړئ.
2. خپل خپل کاري کتاب خلاص کړئ چې تاسو یې غواړئ وګورئ پټ شیټونه.
3. په خپل کاري کتاب کې، Alt + F8 فشار ورکړئ، مطلوب میکرو غوره کړئ، او کلیک وکړئ چل کړئ .

د مثال په توګه، د ټولو شیټونو د پټولو لپاره ستاسو د ایکسل فایل او د پټ شیټونو شمیره ښکاره کړئ، تاسو دا میکرو چلوئ:

څنګه o د ګمرک لید په رامینځته کولو سره په Excel کې پټ شیټونه وښایاست

د میکرو سربیره ، په یو وخت کې د پټو ورک شیټونو ښودلو ټیډیم د دودیز لید رامینځته کولو سره بریالي کیدی شي. که تاسو د دې ایکسل ځانګړتیا سره بلد نه یاست، تاسو کولی شئ د خپل کاري کتاب ترتیباتو د سنیپ شاټ په توګه د دودیز لید په اړه فکر وکړئ چې په هر وخت کې د موږک کلیک کې پلي کیدی شي. دا طریقه په خورا ښه توګه کارول کیږيستاسو د کار پیل، کله چې هیڅ شیټ تر اوسه پټ شوی نه وي.

نو، هغه څه چې موږ یې اوس کوو د ټول شیټونه وښایاست دودیز لید جوړ کړئ. دلته دا دی چې څنګه:

1. ډاډ ترلاسه کړئ چې ستاسو په کاري کتاب کې ټولې سپریډ شیټونه لیدل کیږي . دا لارښوونه ښیې چې څنګه د پټو پاڼو لپاره د کار کتاب په چټکۍ سره وګورئ.
2. لید ټب ته لاړ شئ > د کاري کتاب لید ګروپ، او د ګمرک لیدونو کلیک وکړئ. 11> تڼۍ.

د ګمرک لید ډیالوګ بکس به ښکاره شي، او تاسو اضافه کړئ… <12 کلیک وکړئ>

په اضافه لید ډیالوګ بکس کې، د خپل دودیز لید لپاره نوم ولیکئ، د بیلګې په توګه شو ټول شیټونه ، او په سمه توګه کلیک وکړئ.

تاسو اوس کولی شئ هرڅومره چې وغواړئ ډیری ورکشیټونه پټ کړئ، او کله چې تاسو غواړئ دوی بیا ښکاره کړئ، تاسو د د ګمرک لیدونو تڼۍ کلیک وکړئ، غوره کړئ ShowAllSheet وګورئ او کلیک وکړئ Show ، یا په ساده ډول په لید باندې دوه ځله کلیک وکړئ.

بس! ټولې پټې پاڼې به سمدلاسه وښودل شي.

څنګه وګورئ چې ایا په کاري کتاب کې کوم پټ شیټونه شتون لري

په Excel کې د پټو شیټونو موندلو ترټولو ګړندۍ لاره دا ده: د هر شیټ ټب کې ښیې کلیک وکړئ او وګورئ که د پټول… کمانډ فعال وي یا نه. که دا فعال شوی وي، کلیک وکړئ او وګورئ چې کوم شیټونه پټ دي. که دا غیر فعال وي (خړ شوی وي)، د کار کتاب پټ شیټونه نه لري.

یادونه. دا طریقه ډیر پټ شیټونه نه ښیې. د داسې شیټونو د لیدلو یوازینۍ لار پټول ديدوی د VBA سره.

په Excel کې شیټونه نشي پټولی - ستونزې او حلونه

که تاسو نشئ کولی په خپل Excel کې ځینې شیټونه پټ کړئ، لاندې د ستونزو حل کولو لارښوونې ممکن یو څه رڼا واچوي ولې.

1. د کار کتاب خوندي دی

د شیټونو پټول یا پټول ممکن ندي که د د کاري کتاب جوړښت خوندي شوی وي (باید د کاري کتاب په کچه د پټنوم کوډ کولو یا د ورک شیټ محافظت سره مغشوش نشي). د دې چک کولو لپاره، د بیا کتنه ټب ته لاړ شئ > بدلونونه ګروپ او د د کار کتاب خوندي کړئ تڼۍ ته یو نظر وګورئ. که دا تڼۍ په شنه کې روښانه شي، د کار کتاب خوندي دی. د دې د غیر خوندي کولو لپاره، د د کار کتاب خوندي کړئ تڼۍ کلیک وکړئ، که غوښتل شوي وي پټنوم ټایپ کړئ او د کار کتاب خوندي کړئ. د نورو معلوماتو لپاره، لطفا وګورئ چې څنګه په Excel کې د خوندي شوي کاري کتاب خلاصول.

2. ورکشاپونه خورا پټ دي

که ستاسو کاري پاڼې د VBA کوډ لخوا پټې شوې وي چې دوی خورا پټوي (د xlSheetVeryHidden ملکیت ورکوي)، دا ډول ورکشاپونه د نه پټول <2 په کارولو سره نشي ښودل کیدی> قومانده. د ډیرو پټو شیټونو د پټولو لپاره، تاسو اړتیا لرئ چې ملکیت له xlSheetVeryHidden څخه xlSheetVisible ته د Visual Basic Editor دننه بدل کړئ یا دا VBA کوډ چل کړئ.

3. په کاري کتاب کې هیڅ پټ شیټ شتون نلري

که چیرې د نه پټول کمانډ دواړه په ربن او ښیې کلیک مینو کې خړ وي ، پدې معنی چې دلته یو پټ شیټ شتون نلري.ستاسو د کار کتاب :)

دا څنګه تاسو په Excel کې شیټونه پټوي. که تاسو لیواله یاست چې پوه شئ چې څنګه نور شیان پټ کړئ یا پټ کړئ لکه قطارونه، کالمونه یا فورمول، تاسو به په لاندې مقالو کې بشپړ معلومات ومومئ. زه ستاسو د لوستلو لپاره مننه کوم او هیله لرم چې په راتلونکې اونۍ کې زموږ په بلاګ کې وګورم!

د ډاونلوډونو شتون

ماکرو په Excel کې د ورک شیټونو پټولو لپاره