A
Adam
I have multiple rows that are meant to be multiple paragraphs. If I do not
include the bookmark command, the data comes out exactly how I want it.
However, if I use the bookmark command it only shows the last paragraph of
information opposed to the first one. How can I get this to work??
For i = 2 To 3
String0 = Worksheets("Bid").Cells(1, 2).Value & " : " &
Worksheets("Bid").Cells(i, 2)
String1 = "All Preparation Work as Stated Above"
String2 = Worksheets("Bid").Cells(1, 15).Value & " : " & "Apply " &
Worksheets("Bid").Cells(i, 15).Value & " coats interior flat latex paint of
highest quality"
String3 = Worksheets("Bid").Cells(1, 20).Value & " : " & "Apply " &
Worksheets("Bid").Cells(i, 20).Value & " coats interior flat latex paint of
highest quality"
'TestMarker = x.Selection.TypeText(String0 & vbCr & String1 & vbCr &
String2 & vbCr & String3 & vbCr & vbCr)
doc.Bookmarks("Scope").Range.Text = String0 & vbCr & String1 & vbCr
& String2 & vbCr & String3 & vbCr & vbCr
Next i
include the bookmark command, the data comes out exactly how I want it.
However, if I use the bookmark command it only shows the last paragraph of
information opposed to the first one. How can I get this to work??
For i = 2 To 3
String0 = Worksheets("Bid").Cells(1, 2).Value & " : " &
Worksheets("Bid").Cells(i, 2)
String1 = "All Preparation Work as Stated Above"
String2 = Worksheets("Bid").Cells(1, 15).Value & " : " & "Apply " &
Worksheets("Bid").Cells(i, 15).Value & " coats interior flat latex paint of
highest quality"
String3 = Worksheets("Bid").Cells(1, 20).Value & " : " & "Apply " &
Worksheets("Bid").Cells(i, 20).Value & " coats interior flat latex paint of
highest quality"
'TestMarker = x.Selection.TypeText(String0 & vbCr & String1 & vbCr &
String2 & vbCr & String3 & vbCr & vbCr)
doc.Bookmarks("Scope").Range.Text = String0 & vbCr & String1 & vbCr
& String2 & vbCr & String3 & vbCr & vbCr
Next i