Бұл мақалада біз Word құжатындағы кескіндердің жалпы санын жылдам және дұрыс алудың 4 ыңғайлы әдісін бөліскіміз келеді.
Әр уақытта құжатты кәсібирек ету үшін бірнеше кескін қажет болады. Дегенмен, егер сіз мен сияқты суретті өңдеуді аяқтағаннан кейін бірден кірістіруді жөн көретін жігіт болсаңыз, онда сіз бір немесе екі кездейсоқ қалдырдым ба деп алаңдайтын шығарсыз. Демек, құжаттағы кескіндердің жалпы санын тексеру үшін мұқият жоғары және төмен айналдыруға тура келеді. Осы ыңғайсыздықты ескере отырып, біз сізге уақытыңызды үнемдеудің 4 шынымен пайдалы әдісін ұсынамыз.
1-әдіс: «Табу» мүмкіндігін пайдаланыңыз
- Ең алдымен, «Басты бет» қойындысын басыңыз.
- Содан кейін «Табу» белгішесінің артындағы түймені басыңыз.
- Ал мәзірден «Қосымша іздеу» тармағын таңдаңыз.
- «Табу және ауыстыру» тілқатысу терезесінде «Нені табу» мәтіндік жолағында басқа мәтін жоқ екеніне көз жеткізіңіз және сол жерге «^g» енгізіңіз.
- Содан кейін «Табу» түймесін басып, «Негізгі құжатты» таңдаңыз.
Енді диалогтық терезеде осы құжаттағы кірістірілген кескіндердің санын көрсететін нәтиже бар. Бұл «Табу» мүмкіндігі «Мәтінге сәйкес» орау мәнерінде орнатылған кескіндерді ғана санай алатынын білдіреді.
2-әдіс: «Өту» функциясын қолданыңыз
- Алдымен құжаттың басына өту үшін «Ctrl+ Home» пернелерін басыңыз және 2-әдістегі алғашқы 1 қадамды қайталаңыз.
- Бұл жолы оның орнына «Өту» опциясын таңдаңыз.
- Содан кейін «Графика» таңдаңыз.
- Мәтін жолағына ештеңе енгізіп, «Келесі» түймесін басыңыз.
«Келесі» түймесін басқан сайын Word сізді желі сызбасына әкеледі және сіз өзіңіз санауыңыз керек. Дегенмен, бұл жол тек кірістірілген кескіндерді қамтиды.
Мұнда бейне көрсетілім:
3-әдіс: «Tab» пернесін басыңыз
- Бастау үшін құжаттағы бірінші суретті басыңыз.
- Содан кейін «Tab» түймесін басыңыз және келесі сурет таңдалады. Өзіңіз санауды ұмытпаңыз.
Бақытымызға орай, 3-әдіс кірістірілген кескіндерді де, мәтін ұялары сияқты өзгермелі пішіндерді де қамтиды.
4-әдіс: Word макросын іске қосыңыз
- Алдымен «Әзірлеуші» қойындысын басыңыз.
- Содан кейін VBA редакторын ашу үшін «Visual Basic» батырмасын басыңыз.
- Содан кейін «Кірістіру» түймесін басып, «Қалыпты» жобасының астына жаңасын енгізу үшін «Модуль» таңдаңыз.
- Кодтау кеңістігін ашу үшін жаңа модульді екі рет басыңыз.
- Келесі кодтарды сол жерге қойыңыз:
Sub CountImages()
Dim objDoc As Document
Dim nFlowingShapes As Long, nInlineShapes As Long, nTextBox As Long, nTotalShapes As Long
Dim objShape As Shape
Set objDoc = ActiveDocument
nTextBox = 0
For Each objShape In objDoc.Shapes
If objShape.Type = msoTextBox Then
nTextBox = nTextBox + 1
End If
Next objShape
nFlowingShapes = objDoc.Shapes.Count
nInlineShapes = objDoc.InlineShapes.Count
nTotalShapes = nFlowingShapes + nInlineShapes - nTextBox
MsgBox "There are " & nTotalShapes & " images in this document, " & "with " & nFlowingShapes & " flowing shapes, " & nTextBox & "text boxes, and " & nInlineShapes & " inline shapes."
End Sub
- Соңында «Іске қосу» батырмасын басыңыз.
Нәтижені көрсететін хабарлама терезесі болады.
Word түзету құралы
Word қателер мен қателерге бейім. Ол жұмысын тоқтатқаннан кейін, өшіру біздің Word файлдарымызға зиян келтіруі мүмкін, бұл біз үшін психикалық тұрғыдан үлкен сәтсіздікке әкеледі. Дегенмен, бұзылған файлдарды қалпына келтірудің әлі де жолы бар, яғни күрделі құралды алу. Word бағдарламасын жөндеу.
Автордың кіріспесі:
Вера Чен - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. xls жөндеу және pdf бағдарламалық жасақтама өнімдерін жөндеу. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com