Word VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃ホーム

407 / 886

←次へ　｜　前へ→


	【492】現在の段落番号の取得は？

unahama - 06/9/18(月) 11:31 -


	引用なし

	パスワード

いくつかの段落を持った文章を扱って、最後の段落については処理をしたくないとか、最初だけ処理をしたいとかを下記例のように、for next 内にif--を入れ処理を行なおうとしています。多分初歩的な質問だと思いますが、現在のカーソル位置または選択範囲の段落番号（数値）を取得するにはどうすればよいのでしょうか？

rpara = ActiveDocument.Paragraphs.Count　 '段落数
For n = rpara To 1 Step -1
Selection.EndKey Unit:=wdStory　'カーソルを最後に移す

With Selection.Find
　　.Forward = False
　　.ClearFormatting
　　.MatchWholeWord = True
　　.MatchCase = False
　　.Wrap = wdFindContinue
　　.Execute FindText:="東京"
End With
if ****　'段落番号が　rpara以外であれば
end if
next

2,065 hits

▼

【492】現在の段落番号の取得は？ unahama 06/9/18(月) 11:31