کړی
یو څوک خوښوي، مګر زه په شخصي توګه یوازې په 2-3 قضیو کې د وضعیت بار ته اړتیا لرم:
- د فلټر کولو وروسته، دا د انتخاب وروسته پاتې ارزښتونو شمیره ښیي
- کله چې یو سلسله وټاکل شي، دا د ټاکل شوي حجرو مجموعه، اوسط، او شمیره ښیي
- د درنو فایلونو په حالت کې، تاسو کولی شئ په کتاب کې د فورمولونو د بیا حساب کولو پرمختګ وګورئ.
د یوې کرښې لپاره دومره ډیر ندي چې د سکرین شاوخوا ټوله چوکۍ نیسي او هر وخت یې ځړول کیږي. راځئ هڅه وکړو چې دا معتدل لیست پراخ کړو او یو څو نور ګټور ځانګړتیاوې پکې اضافه کړو 🙂
د حالت بار اداره کولو لپاره عمومي اصول
د Visual Basic سره د حالت بار اداره کول خورا اسانه دي. په دې کې د خپل متن ښودلو لپاره، تاسو کولی شئ یو ساده میکرو وکاروئ:
Sub MyStatus() Application.StatusBar = "پریوت!" پای فرعي
د چلولو وروسته، موږ ترلاسه کوو:
د حالت بار اصلي حالت بحالولو لپاره، تاسو به ورته لنډ "اینټي میکرو" ته اړتیا ولرئ:
Sub MyStatus_Off() Application.StatusBar = غلط پای فرعي
په اصلي نسخه کې، لکه څنګه چې تاسو لیدلی شئ، هرڅه خورا ساده دي. اوس راځئ هڅه وکړو چې نظر ته وده ورکړو ...
د حالت بار کې د ټاکل شوي حد پته
د فورمول بار کې د Excel کړکۍ په پورتنۍ ښي کونج کې، تاسو تل د اوسني حجرې پته لیدلی شئ. مګر که ټوله سلسله غوره شي، نو له بده مرغه، موږ به هلته د انتخاب پته ونه ګورو - ورته یو واحد فعال حجره ښودل کیږي:
د دې ستونزې د حل لپاره، تاسو کولی شئ یو ساده میکرو وکاروئ چې د ټاکل شوي ساحې پته به د حالت بار کې ښکاره کړي. سربیره پردې ، دا میکرو باید په اوتومات ډول پیل شي ، په هر شیټ کې په انتخاب کې د کوم بدلون سره - د دې لپاره موږ به دا د پیښې هینډلر کې ځای په ځای کړو ټاکنه بدله کړئ زموږ کتاب.
په ټب کې د ورته نوم تڼۍ په کارولو سره د لید اساسی مدیر خلاص کړئ د پراختیا (پراختیا) یا کیبورډ شارټ کټونه کیڼ Alt+F11. خپل کتاب د پروژې پینل په پورتنۍ ښي کونج کې ومومئ او ماډل په دوه ځله کلیک کولو سره خلاص کړئ دا کتاب (دا کار کتاب):
په هغه کړکۍ کې چې خلاصیږي، لاندې میکرو کوډ کاپي او پیسټ کړئ:
د شخصي فرعي کاري کتاب_SheetSelectionChange(ByVal Sh د څیز په توګه، ByVal هدف د حد په توګه) Application. StatusBar = "Выделено: " & انتخاب. پته(0, 0) پای فرعي
اوس، کله چې کومه سلسله غوره شي (د یو څخه ډیر په شمول!)، د هغې پته به د حالت بار کې ښکاره شي:
د دې لپاره چې د Ctrl سره د انتخاب شوي څو سلسلې پتې له یوځای کیدو څخه مخنیوی وشي، تاسو کولی شئ یو کوچنی پرمختګ اضافه کړئ - د ځای سره د کوما سره د کوما ځای په ځای کولو لپاره د بدلولو فنکشن وکاروئ:
د شخصي فرعي کاري کتاب_SheetSelectionChange(ByVal Sh د څیز په توګه، ByVal هدف د حد په توګه) Application.StatusBar = "Выделено:" او بدلول(انتخاب. پته(0, 0), ",", ", ") پای فرعي
په حالت بار کې د ټاکل شوي حجرو شمیر
کله چې کومه سلسله غوره شي، د غیر خالي انتخاب شوي حجرو شمیر د ډیفالټ په واسطه د حالت بار ښي خوا کې ښودل کیږي. ځینې وختونه تاسو اړتیا لرئ د تخصیص شوي شمیره پوه شئ. دا دنده د انتخاب بدلون کتاب پیښې اداره کولو لپاره د ساده میکرو سره هم ترسره کیدی شي ، لکه څنګه چې په تیرو مثال کې. تاسو به یو میکرو ته اړتیا ولرئ لکه:
د شخصي فرعي کاري کتاب_SheetSelectionChange(ByVal Sh د څیز په توګه، د حد په توګه د هدف له مخې) د سیل شمیره د ډول په توګه کم کړئ، په انتخاب کې د هر rng لپاره د رینج په توګه rng.Areas 'د ټولو انتخابونو له لارې تکرار کړئ RowsCount = rng.Rows.Count' د قطارونو شمیره = د شمیرو شمیره. . د کالمونو شمیره شمیره CellCount = CellCount + RowsCount * ColumnsCount 'د حجرو ټولټال شمیره راټول کړئ بل' په حالت بار کې ښکاره کړئ Application.StatusBar = "ټاکل شوی: " & CellCount & " حجرې" پای فرعي
دا میکرو د ټولو Ctrl غوره شوي ساحو له لارې لوپ کوي (که چیرې له یو څخه ډیر وي)، په هره سیمه کې د قطارونو او کالمونو شمیر په RowsCount او ColumnsCount متغیرونو کې ذخیره کوي، او د CellCount متغیر کې د حجرو شمیر راټولوي، کوم چې بیا ښودل کیږي. په حالت بار کې. په کار کې دا به داسې ښکاري:
البته، تاسو کولی شئ دا او پخوانی میکرو سره یوځای کړئ ترڅو د ټاکل شوي حد پته او په ورته وخت کې د حجرو شمیر دواړه ښکاره کړي. تاسو اړتیا لرئ یوازې یو پایلي کرښه بدل کړئ:
Application.StatusBar = "غوره شوی:" او بدلول(انتخاب. پته(0, 0), ",", ", ") & "- مجموعي" & CellCount & "Sells"
بیا به عکس خورا ښه وي:
ښه، زه فکر کوم چې تاسو نظر ترلاسه کوئ. په نظرونو کې وړاندیز وکړئ - د وضعیت بار کې د ښودلو لپاره به نور څه ګټور وي؟
- میکرو څه شی دي، دوی څنګه کار کوي، څنګه یې کاروي او څنګه یې جوړ کړي
- په ایکسل شیټ کې د همغږۍ مناسب انتخاب
- څنګه پیچلي فورمولونه ډیر بصری کړئ