How to DISABLE unused bookmarks in WORD

[Rahul Agarwal]

I am copying a set of data from various excel files into a Word Document at specified bookmarks. If any file is absent during run then at that specified bookmark next line character is printing which is creating space between the data. How to remove this blank space if content for that bookmark is not present. This time I'm using the below mentioned code. In the attached image under "HELP NEEDED" section there is a lots of gap between Simulation and Performance as there is a bookmark between them and its data is not present with us. It is desired to omit this blank space due to unused bookmarks.

ActiveDocument.Bookmarks(BM_name).Select
sheet.Sheets("Weekly Update").Range(Cell_name).Borders.LineStyle = xlNone
s = Replace(Trim(sheet.Sheets("Weekly Update").Range(Cell_name).Value), Chr(10) & Chr(10), "")
Selection.TypeText Text:=s

 

[Stevie]

Hi Rahul,
you have not posted the most relevant part of your code which cycles through the bookmarks and relates them to the range you are copying.
That said, from what you have posted, i'm struggling to see why you can't just skip the bookmark you have no data for:

If Sheet.Sheets("Weekly Update").Range(Cell_name).Value <> "" Then
    'your code to copy data
End If

If this was helpful, please click Like! in the bottom right.

Stevie

 

[macropod]

Why are you still selecting anything? I showed you how to process your content without using Selections in this thread:
https://chandoo.org/forum/threads/how-to-resize-charts-while-copying-from-excel-into-word.40736

As for your present problem, the code could be reduced to:
ActiveDocument.Bookmarks(BM_name).Range.Text = Trim(Replace(Sheets("Weekly Update").Range(Cell_name).Value, Chr(10), ""))