Nếu bạn hài lòng với câu đơn giản hơn, chứ không phải là dòng:
ActiveDocument.Sentences(1).Characters(5).Select
Selection.Collapse
Selection.InsertBefore "added "
Năm đoạn và 50 khoảng trống trong VBA
Selection.Text = String(5, vbCrLf)
Selection.Collapse wdCollapseEnd
Selection.Text = String(50, " ")
Tuy nhiên, đối với một vị trí cụ thể, tôi sẽ thích một hộp văn bản:
Set sh = doc.Shapes.AddTextbox(1, 10, 344, 575, 80)
sh.Name = "Course1"
Với một số thuộc tính:
sh.Fill.Visible = False
sh.Line.Visible = False
sh.TextFrame.MarginLeft = 0#
sh.TextFrame.MarginRight = 0#
sh.TextFrame.MarginTop = 0#
sh.TextFrame.MarginBottom = 0#
tôi muốn thêm một văn bản, một dấu trang hoặc một cái gì đó tương tự như một tài liệu trống, không có bất kỳ câu !! Tôi nên thêm một số đoạn đầu tiên? Tôi thực sự bối rối về điều này! –
Nếu tài liệu trống của bạn đang hoạt động, bạn chỉ có thể nói 'Selection.Text =" rất nhiều văn bản "' – Fionnuala
có, nhưng không có câu và không có ký tự trong tài liệu trống! Ví dụ làm thế nào để viết trong dòng 5 bằng cách sử dụng mã này? ! –