Word VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃ホーム  
38 / 308 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【240】ページ削除について うお 05/1/31(月) 10:58 質問[未読]
【774】Re:ページ削除について マナ 13/5/26(日) 19:25 発言[未読]
【775】Re:ページ削除について マナ 13/5/26(日) 19:30 発言[未読]
【776】Re:ページ削除について マナ 13/5/27(月) 20:57 発言[未読]
【240】ページ削除について
質問  うお  - 05/1/31(月) 10:58 -
引用なし
パスワード
   任意のページを削除したいのですが、ページ指定で削除する方法がわかりません。

よろしくお願いします。
【774】Re:ページ削除について
発言  マナ  - 13/5/26(日) 19:25 -
引用なし
パスワード
   今更ですが書いてみました。

Sub test()
　　Dim myPage As Long
　　
　　myPage = 2　'★ページ指定
　　Selection.GoTo what:=wdGoToPage, which:=wdGoToAbsolute, Count:=myPage
　　Selection.Bookmarks("\page").Range.Delete

End Sub
【775】Re:ページ削除について
発言  マナ  - 13/5/26(日) 19:30 -
引用なし
パスワード
   1行でも大丈夫かも？

Selection.GoTo(what:=wdGoToPage, which:=wdGoToAbsolute, Count:=myPage).Bookmarks("\page").Range.Delete
【776】Re:ページ削除について
発言  マナ  - 13/5/27(月) 20:57 -
引用なし
パスワード
   検索してみたら、こういうのがありました

VBA code to delete a page in a Word doc
ht tp://us.generation-nt.com/answer/vba-code-delete-page-word-doc-help-113277822.html

↑のリンク先から、さらにリンク
Word Doesn't Know What a Page Is
ht tp://daiya.mvps.org/wordpages.htm
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃ホーム  
38 / 308 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
207160
(SS)C-BOARD v3.8 is Free