İ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

Hüceyrəni tıklayaraq hüceyrə dəyərini necə dəyişdirmək olar?

Excel-də bir hüceyrəyə tıklayarak hüceyrə dəyərini dəyişdirmək mümkündürmü? Məsələn, A1 xüsusi bir hüceyrəni tıkladığınızda, ilk dəfə "A1" düyməsini tıkladığınız zaman bir mətn "Excel", mətn "Word" göstərilir və " hüceyrə üçüncü dəfə. Bu halda, A1 hücresindəki dəyər "Excel" -dən "Word" -ə "Outlook" -a "Excel" -ə qaytarılacaq ...... aşağıdakı ekran görüntüsü kimi göstərilir:

1 düyməsini basaraq doc dəyişdirin

VBA kodu olan bir hüceyrəni tıklayaraq hücum dəyərini dəyişdirin


arrow mavi sağ bubble VBA kodu olan bir hüceyrəni tıklayaraq hücum dəyərini dəyişdirin


Excel-də bu vəzifəni bitirmək üçün aşağıdakı VBA kodu sizə kömək edə bilər:

1. Hücre dəyərini dəyişdirmək istədiyiniz səhifənin kağızı sağ tıklayarak tıklayarak seçin Kodları baxın kontekst menyusundan və açıldı Proqramlar üçün Microsoft Visual Basic pəncərədə, boş kodu daxil edin və aşağıdakı kodu yapışdırın:

VBA kodu: Mobil hüceyrəni tıklayaraq dəyişdirin:

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
'Updateby Extendoffice 20161123
  Application.EnableEvents = False
  With Target
  If .Address = Range("A1").Address Then
    Select Case .Value
      Case "Excel"
        .Value = "Word"
      Case "Word"
        .Value = "Outlook"
      Case "Outlook"
        .Value = "Excel"
      Case Else
        .Value = "Word"
    End Select
  End If
  End With
  Range("A2").Select
  Application.EnableEvents = True
End Sub

2 düyməsini basaraq doc dəyişdirin

Qeyd: Yuxarıda göstərilən kodda, A1 qiyməti dəyişdirmək istədiyiniz hücrenin tıklayarak "üstün olmaq","Söz","dünyagörüşü"Təkrarlanan nümayiş etdirmək istədiyin hüceyrə dəyərləri bunları ehtiyacınıza dəyişə bilərsiniz.

2. Kodu bağladıktan sonra kodu saxlayıb pəncərəni bağlayın. İndi ilk dəfə olaraq A1 hücresini tıkladığınızda "Excel" mətni bir dəfə göstərilir, yenidən basın, "Word" mətni göründüyü üçün "üçüncü dəfə" düyməsini basarsanız, "Outlook" ekran bax:

1 düyməsini basaraq doc dəyişdirin


Daha çox əlaqəli məqalələr:

Excel-də mobil məzmunu tıklayaraq məlumatları necə filtreləmək olar?

Excel-də başlığı tıklayaraq sütun məlumatlarını necə düzəltmək olar?



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.
    Zack · 1 years ago
    I am trying to apply this to an entire column of individual cells, not just one cell. Is this possible? When I change the range from "A1" to "A1:A100" nothing happens when I click the cells in that range.