- 710 名前：707 mailto:sage [2013/01/29(火) 21:13:22.17 ]
- すいません
ググってなんとかコピペからからの
インデント「と（の行はインデントはできたんですが
やっぱり）と」までの間がうまく設定できないです・・・OTL
Sub Macro1()
Dim myText As String
Dim i As Integer
For i = 1 To ActiveDocument.Characters.Count
myText = Selection.Text
Select Case myText
Case Is = "（"
Selection.Style = ActiveDocument.Styles("セリフ")
Case Is = "「"
Selection.Style = ActiveDocument.Styles("セリフ")
End Select
Selection.MoveRight
Next i
End Sub
結局”「”から”」”までのあいだだけ
インデントを設定させるにはどうすればいいですか？
