İ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ə başqa bir hüdudun dəyəri dəyişdirildikdə müəyyən hüceyrə məzmununu necə təmizləmək olar?

Bir başqa hüceyrənin dəyəri dəyişdirildiyi təqdirdə müəyyən bir hüceyrə məzmununu təmizləmək istəyirsən, necə edə bilərsiniz? Bu yazıda bu problemi həll etmək üçün bir üsul göstəriləcək.

Digər bir hüdudun dəyəri VBA kodu ilə dəyişirsə, müəyyən hüceyrə məzmununu sil


Digər bir hüdudun dəyəri VBA kodu ilə dəyişirsə, müəyyən hüceyrə məzmununu sil


Aşağıda göstərilən ekran göründüyü kimi, A2 hücresindəki dəyər dəyişdirildikdə, C1 hücresindeki məzmunlar: C3 avtomatik olaraq silinəcəkdir. Xahiş edirik bunu edin.

1. İş yerində başqa bir hüceyrə dəyişikliyinə əsaslanan hüceyrə məzmununu təmizləyəcəksiniz, hesabatı seksiyasına sağ vurun və seçin Kodları baxın kontekst menyusundan. Ekran görüntüsünə baxın:

2. Açılışda Proqramlar üçün Microsoft Visual Basic Pəncərə, VBA kodunun altına kopyalayın və Kod penceresine yapışdırın.

VBA kodu: Digər hüceyrənin dəyəri dəyişdirildikdə müəyyən edilmiş hüceyrə məzmununu təmizləyin

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A2")) Is Nothing Then
        Range("C1:C3").ClearContents
    End If
End Sub

QeydKodu: B2 kodu əsasən hüceyrə məzmununu təmizləyəcək hüceyrədir və C1: C3 məzmunu silmək üçündür. Lazım olduğunuz halda onları dəyişdirin.

3. Basın Dayandırmaq + Q düymələri bağlamaq üçün Proqramlar üçün Microsoft Visual Basic pəncərə.

C1 aralığındaki məzmunu görə bilərsiniz: C3, A2 hücresindeki değer aşağıda göstərilən ekran görüntüsünde olduğu kimi avtomatik olaraq silinir.


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.
  • To post as a guest, your comment is unpublished.
    GQ · 1 months ago
    In the case of A2, how do i reference a cell from a different worksheet?
  • To post as a guest, your comment is unpublished.
    Mac · 9 months ago
    Hi this isnt working for mine. Nothing changes but no errors either. Any tips?
    • To post as a guest, your comment is unpublished.
      crystal · 8 months ago
      Good day,
      Sorry for the inconvenience. Would you provide your Office version? Thanks for your comment.
  • To post as a guest, your comment is unpublished.
    Jason · 10 months ago
    Hi, I'm looking for a way to clear a range of cells of data when an "x" is entered in a certain cell. I used the above formula and it worked perfectly for that one row. The problem is that I need to extend it down to many rows. For example, if an "x" is entered in "D13", I need the range J:13 - v:13 to be cleared. I also need that to happen if an x is entered in "D14" as in I need the range d:14 - v:14 to be cleared. Is there a way to write that? Thanks for your help!
  • To post as a guest, your comment is unpublished.
    Mat 257 · 1 years ago
    hello, this works for a fixed source cell only (A2), how do this dynamically such as source is a variable cell? i tried to write
    A=activecell.row
    If Not Intersect(Target, Range("A"& A)) Is Nothing Then
    Range("C1:C3").ClearContents
    End If

    this should do the job with regard to activecell (ie selection) but is not working
    thanks
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Good Day,
      Please try the below VBA code. Thank you for your comment.

      Private Sub Worksheet_Change(ByVal Target As Range)
      If (Not Intersect(Target, Rows(1)) Is Nothing) And (Target.Count = 1) Then
      Range("C1:C3").ClearContents
      End If
      End Sub
  • To post as a guest, your comment is unpublished.
    Scott · 1 years ago
    The code to clear a cell if another changes works great!!!! But I need it to work the other way around..... How is that code written??


    Thanks for your help
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Dear Scott,
      What do you mean work the other way around? When manually clear contents of certain cells (C1:C3), then clear content of cell A2 automatically?