Excel'den Word'e yorumları nasıl aktarılır?
Excel kullanıcıları için, hücrelere yorum ekleme yaygın bir iştir. Bazen bu yorumları belirli amaçlar için bir Word belgesine kopyalayıp yapıştırmanız gerekebilir. Elbette, yorumları teker teker Word'e kopyalayıp yapıştırabilirsiniz, ancak bu sıkıcı ve zaman alıcı bir işlemdir. Excel'deki tüm yorumları bir seferde Word'e aktarmak için herhangi bir yöntem var mı?
VBA kodu ile mevcut çalışma sayfasından Word'e yorumları aktarma
VBA kodu ile mevcut çalışma sayfasından Word'e yorumları aktarma
Ne yazık ki, Excel, tüm yorumları bir seferde kopyalayıp Word'e yapıştırmak için bir özellik sunmaz. Ancak, aşağıdaki VBA kodu ile etkin çalışma sayfasındaki tüm yorumları hızlıca bir Word belgesine aktarabilirsiniz.
1. Microsoft Visual Basic for Applications penceresini açmak için ALT + F11 tuşlarına basın.
2. Ekle > Modül seçeneğine tıklayın ve aşağıdaki kodu Modül Penceresine yapıştırın.
VBA kodu: Mevcut çalışma sayfasından Word'e yorumları aktarma
Sub CopyCommentsToWord()
'Update 20140325
Dim xComment As Comment
Dim wApp As Object
On Error Resume Next
Set wApp = GetObject(, "Word.Application")
If Err.Number <> 0 Then
Err.Clear
Set wApp = CreateObject("Word.Application")
End If
wApp.Visible = True
wApp.Documents.Add DocumentType:=0
For Each xComment In Application.ActiveSheet.Comments
wApp.Selection.TypeText xComment.Parent.Address & vbTab & xComment.Text
wApp.Selection.TypeParagraph
Next
Set wApp = Nothing
End Sub
3. Ardından bu kodu çalıştırmak için F5 tuşuna basın ve etkin çalışma sayfasındaki tüm yorumlar, hücre adresleriyle birlikte yeni bir Word belgesine aktarılacaktır. Ekran görüntüsüne bakın:
İlgili makaleler:
Excel'de birden fazla hücreye hızlıca nasıl yorum eklenir?
Excel'de yorum kutusunun şeklini nasıl değiştirirsiniz?
Excel'deki hücrelerdeki tüm yorum biçimlerini nasıl değiştirirsiniz?
Excel'deki tüm yorumların yazar adını nasıl değiştirirsiniz?
En İyi Ofis Verimlilik Araçları
Kutools for Excel ile Excel becerilerinizi güçlendirin ve benzersiz bir verimlilik deneyimi yaşayın. Kutools for Excel, üretkenliği artırmak ve zamandan tasarruf etmek için300'den fazla Gelişmiş Özellik sunuyor. İhtiyacınız olan özelliği almak için buraya tıklayın...
Office Tab, Ofis uygulamalarına sekmeli arayüz kazandırır ve işinizi çok daha kolaylaştırır.
- Word, Excel, PowerPoint'te sekmeli düzenleme ve okuma işlevini etkinleştirin.
- Yeni pencereler yerine aynı pencerede yeni sekmelerde birden fazla belge açıp oluşturun.
- Verimliliğinizi %50 artırır ve her gün yüzlerce mouse tıklaması azaltır!
Tüm Kutools eklentileri. Tek kurulum
Kutools for Office paketi, Excel, Word, Outlook & PowerPoint için eklentileri ve Office Tab Pro'yu bir araya getirir; Office uygulamalarında çalışan ekipler için ideal bir çözümdür.
- Hepsi bir arada paket — Excel, Word, Outlook & PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans — dakikalar içinde kurulun (MSI hazır)
- Birlikte daha verimli — Ofis uygulamalarında hızlı üretkenlik
- 30 günlük tam özellikli deneme — kayıt yok, kredi kartı yok
- En iyi değer — tek tek eklenti almak yerine tasarruf edin