hi,
I was able to with the following VBA code, quickly export all comments in text format of active worksheet to the Word document.
<tbody>
</tbody>
I was able to with the following VBA code, quickly export all comments in text format of active worksheet to the Word document.
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 Now, I want to export images also within those comment tags that I have in that excel workbook, is there something that i need to add in that existing vba code above which will enable me to extract just images from the comments within those cells? Thank you for taking the time to read this, much appreciated, look forward to hearing from you Vladmir |
<tbody>
</tbody>