Bu yazıda sizə Word sənədinizdə cari səhifəni seçməyin 3 sürətli yolunu təqdim etməkdən məmnuniyyət duyuruq.
Bəzən məzmunu kopyalamaq və ya çıxarmaq üçün cari səhifəni seçmək ehtiyacı ilə qarşılaşacaqsınız. Normalda, kursoru səhifənin əvvəlinə yerləşdirir və bütün səhifəni seçmək üçün sol klik düyməsini basıb saxlayırıq. Lakin etiraf etməlisiniz ki, bu metod həmişə yaxşı işləmir, çünki səhvlər baş verə bilər. İşi görmək çox asan olmasa da, daha sürətli metodlardan istifadə etməklə vaxtınıza qənaət edə bilərsiniz.
Budur 3 həllimiz.
Metod 1: Bir səhifəlik sənəd üçün klaviatura qısa yolları
Sənəddə yalnız bir səhifə olduqda, etməli olduğunuz şey, daxil etmə göstəricinizi sənədin içərisində istənilən yerə yerləşdirmək və “Ctrl+A” düymələrini sıxmaqdır.
Metod 2: Çox səhifəli sənəd üçün klaviatura qısa yolları
İndi çox səhifəli sənəddən danışarkən, aşağıdakı addımları ata bilərsiniz:
- Əvvəlcə daxiletmə göstəricisini hədəf səhifənin əvvəlinə yerləşdirin.
- Sonra "Shift" düyməsini basın.
- Sonra həmin səhifənin aşağısına sürüşdürün və səhifənin sonunda klikləyin.
Metod 3: Word Makronunu işə salın
- İlk növbədə, hədəf səhifəni vurun.
- Sonra "Developer" sekmesini vurun.
- Sonra VBA redaktorunu açmaq üçün "Visual Basic" düyməsini basın. Və ya bunu etmək üçün "Alt + F11" düyməsini basın.
- İndi "Normal" layihəsini və sonra "Daxil et" sekmesini basın.
- Açılan menyuda "Modul" seçin.
- Sonra kodlaşdırma sahəsini açmaq üçün yeni daxil edilmiş modulun üzərinə iki dəfə klikləyin.
- Aşağıdakı kodları oraya yapışdırın:
Sub SelectCurrentPage()
Dim lCurrentPageStart As Long
Dim lCurrentPageEnd As Long
Dim objPageRange As Range
Dim nCurrentPageNumber As Integer
Dim nAllPageNumber As Integer
nCurrentPageNumber = Selection.Information(wdActiveEndPageNumber)
nAllPageNumber = Selection.Information(wdNumberOfPagesInDocument)
' Get the start position of current page.
lCurrentPageStart = Selection.GoTo(What:=wdGoToPage, Which:=wdGoToNext, Name:=nCurrentPageNumber).Start
' Get the end position of current page.
If nCurrentPageNumber = nAllPageNumber Then
lCurrentPageEnd = ActiveDocument.Content.End
Else
lCurrentPageEnd = Selection.GoTo(What:=wdGoToPage, Which:=wdGoToNext, Name:=nCurrentPageNumber + 1).Start
End If
' Select current page.
Set objPageRange = ActiveDocument.Range(Start:=lCurrentPageStart, End:=lCurrentPageEnd)
objPageRange.Select
End Sub
- Nəhayət, "Çalış" düyməsini basın və ya "F5" düyməsini basın. Həmin səhifədəki bütün mətnlər indi seçimdədir.
Word sənədlərini bərpa edin
Word sənədlərinizin korlandığını tapmaq çox ağrılı olardı və sizi məlumatlarınız üçün əlçatmaz qoyur. Şübhəsiz ki, heç kim sahib olmaq istəmir korrupsioner doc. Yenə də, gözlənilməz hadisə baş verdikdə, qalan yeganə seçim daxili və ya üçüncü tərəf aləti ilə məlumatları geri qaytarmaqdır.
Müəllif Giriş:
Vera Çen məlumatların bərpası üzrə mütəxəssisdir DataNumendaxil olmaqla məlumatların bərpası texnologiyaları üzrə dünya lideri olan , Inc zədələnmiş Excel və pdf proqram məhsullarının təmiri. Ətraflı məlumat üçün ziyarət edin www.datanumen.com


