2016-03-24 9 views
-4

Bunun anlamı, her hücrede (sırayla aşağı ve yukarı hareket ettiğim) bir yorum eklemek istediğim bir hücre sütununa sahip olmasıdır. Bununla birlikte, yüzlerce hücreden geçmek için biraz fazla tembelim ve her zaman, ileride kullanmak üzere boş bir yorum eklediğimde kullanıcı adını silmem gerekiyor. Bu yüzden bir hücre seçip bunun yerine bir kısayol tuşuna basabilirsem daha kolay olacağını düşündüm.Seçtiğim hücreye bir yorum eklemek ve kullanıcı adını otomatik olarak silmek için makroyu kullanmanın bir yolu var mı?

Sub BlankComments() 
    Dim r As Range 

    For Each r In Selection 
     r.ClearComments 
     r.AddComment Text:="" 
    Next r 
End Sub 

bazı hücreleri seçin ve makroyu çalıştırın:

+1

Hiçbir şey denediniz mi? –

cevap

1
Activecell.AddComment ("test") or Activecell.AddComment ("") 
+0

Bir dönüş değeri beklemediğiniz için paranteze ihtiyacınız yoktur. Sadece 'Activecell.Addcomment' testi olmalı '' Hala, seninki çalışıyor, ama biraz yanıltıcı. – vacip

1

Excel VBA

With Worksheets(1).Range("e6").AddComment 
    .Visible = False 
    .Text "" 
End With 
1

Bu makro için bir kısayol tuşu atama nezih çevrimiçi yardıma sahiptir.

İlgili konular