İ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ə mətni tapmaq və əvəz etmək üçün makro kodunu necə yaratmaq olar?

Normal olaraq, Excel-də dəyərləri axtarmaq və dəyişdirmək üçün build-in Find and Replace funksiyasından istifadə edirik. Əslində, Excel-in mətnini makro koduyla birbaşa tapa və dəyişdirə bilərsiniz. Bu yazıda Excel-də mətni tapmaq və əvəz etmək üçün makro kodunun necə yaradılacağını öyrənəcəksiniz.

Excel-də mətni tapmaq və əvəz etmək üçün makro kodunu yaradın


Excel-də mətni tapmaq və əvəz etmək üçün makro kodunu yaradın


Excel-də mətni tapmaq və əvəz etmək üçün makro kodunu yaratmaq üçün aşağıdakıları 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. Sonra VBA kodu aşağıda kod penceresine kopyalayın.

VBA kodu: Excel-də mətni tapmaq və əvəz etmək üçün bir makro kodu yaradın

Sub FindandReplaceText()
'Update by Extendoffice 2018/5/24
    Dim xFind As String
    Dim xRep As String
    Dim xRg As Range
    On Error Resume Next
    Set xRg =Cells
    xFind = Application.InputBox("word to search:", "Kutools for Excel", , , , , 2)
    xRep = Application.InputBox("word to replace:", "Kutools for Excel", , , , , 2)
    If xFind = "False" Or xRep = "False" Then Exit Sub
    xRg.Replace xFind, xRep, xlPart, xlByRows, False, False, False, False
End Sub

3. Basın F5 kodunu çalıştırmak üçün düyməsini basın.

4. Birincisi Excel üçün Kutools informasiya qutusuna daxil olun, mətn və ya aradığınız dəyəri daxil edin və sonra basın OK düyməsini basın. Ekran görüntüsünə baxın:

5. İkincisi Excel üçün Kutools informasiya qutusuna dəyişdirəcək mətn və ya dəyəri daxil edin və basın OK düyməsini basın.

Sonra bütün mətnlər istənilən mətn ilə əvəzlənir.

Qeyd: Bu kod, aktiv iş səhifəsinə tətbiq edilir.


Related articles:



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.

Be the first to comment.