İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Excel-də seçilmiş aralığın yalnız sərhədlərini necə çıxarmaq olar?

Microsoft Excel istifadə edərkən, Yapışdırmaq Xüsusi funksiyası ilə yalnız hüceyrə dəyərlərini, hüceyrə formatlamasını, hüceyrə formullarını və s. Ancaq Excel-də yalnız bir sərhəd stilini kopyalamağa çalışdın? Bu yazıda seçilmiş aralığın yalnız sərhədlərini Excel-də yeni bir aralığa çıxarmaq metodu göstəriləcək.

Yalnız VBA kodu ilə seçilmiş aralığın hüdudlarını kopyalayın


arrow mavi sağ bubbleYalnız VBA kodu ilə seçilmiş aralığın hüdudlarını kopyalayın


Aşağıdakı VBA kodu yalnız seçilmiş hüceyrələrin sərhəd stilini kopyalamağa kömək edə bilər və sonra bu sərhəd stilini Excel-də yeni bir aralığa tətbiq edə bilərsiniz. Xahiş edirik bunu edin.

1. Basın Dayandırmaq + F11 düymələri açmaq üçün Proqramlar üçün Microsoft Visual Basic pəncərə.

2. İçində Proqramlar üçün Microsoft Visual Basic pəncərə basın Taxmaq > Modules, və sonra aşağıdakı kodunu VBA kodunu Kod pencerəsinə kopyalayıb yapışdırın.

VBA kodu: Excel-də yalnız seçilmiş aralığın hüdudlarını kopyalayın

Sub CopyBorders()
    Dim xRg As Range
    ActiveWorkbook.Styles("Normal").IncludeBorder = False
    On Error Resume Next
    Set xRg = Application.InputBox("Select Range with Borders to Copy...", "Kutools For Excel", , , , , , 8)
     
    With Application.InputBox("Select Cell to Apply Borders to range..", "Kutools For Excel", , , , , , 8)
        xRg.Copy
        .PasteSpecial -4122
        .Resize(xRg.Rows.Count, xRg.Columns.Count).Style = "Normal"
    End With
    ActiveWorkbook.Styles("Normal").IncludeBorder = True
End Sub

3. Basın F5 kodunu çalıştırmak üçün düyməsini basın. Ilk popping up Excel üçün Kutools informasiya qutusundan xahiş edirik, kopyalamak üçün lazım olan sərhədləri olan aralığı seçin və sonra basın OK düyməsini basın.

4. İkincisi Excel üçün Kutools informasiya qutusuna kopyalanan sərhədi tətbiq etmək üçün bir hüceyrə seçin və sonra basın OK düyməsini basın. Ekran görüntüsünə baxın:

Sonra yalnız seçilmiş sıra sərhəd stil kopyalanır və ekran görüntüsü aşağıdakı kimi yeni bir sıra tətbiq edə bilərsiniz.


arrow mavi sağ bubbleƏlaqəli məqalələr:



Təklif olunan Məhsuldarlıq Vasitələri

Office Tab

qızıl star1 Chrome, Firefox və yeni Internet Explorer kimi Excel və digər Office proqramlarına lazımlı sekmeleri gətirin.

Excel üçün Kutools

qızıl star1 Amazing! 5 dəqiqədə məhsuldarlığınızı artırın. Heç bir xüsusi bacarıqa ehtiyac yoxdur, hər gün iki saat saxlaya bilərsiniz!

qızıl star1 300 Excel üçün yeni funksiyalar, Excel çox asan və güclü olun:

  • Veriyi ləğv etmədən Cell / Satır / Sütunları birləşdirin.
  • Bir neçə Çarşaf və İş Kitabını birləşdirin və birləşdirin.
  • Çaprazları müqayisə edin, birdən çox aralığa kopyalayın, mətni tarixə, vahidə və valyuta çevrilməsinə çevirin.
  • Rənglər, Paging Subtotals, Advanced Sort və Super Filter tərəfindən sayılan,
  • Daha çox seçin / Insert / Sil / Mətn / Biçim / Bağlantı / Yorum / Çalışma kitabları / Çalışma Qurğuları Tools ...

Excel üçün Kutools-un ekranı

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    David Kassover · 8 days ago
    The code also copied my numeric formats and overwrote those in the target cells. Perhaps I did something wrong?