Excel VBA質問箱 IV

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

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


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

20165 / 76735

←次へ　｜　前へ→


	【61992】Re:相対指定して開いたファイルにシートを転記する方法

もも - 09/6/16(火) 10:18 -


	引用なし

	パスワード

▼テンマさん：
>シートの移動までは無事動作しました。
>有難う御座いました。
よかったですね＾＾

>Sheets(1).Move After:=Workbooks(myBook.Name).Sheets(Workbooks(myBook.Name).Sheets.Count)
>しかし、実際切り取り挿入した後のシートの位置ですが、
>以前は、以下としていた為、移動先をSheetの2個目に常に挿入される形としていました。
>Sheets(1).Move After:=Workbooks("シート3.xls").Sheets(1)
>今回ご教授頂いた移動では、最終シートに追加されてます。
>以前と同じようにシートのSheetの2個目（1個目と2個目のシートの間に入る）に
>常に入るようにするには、どうしたら良いかが解りません。
>大変お手数ですが、ご教授願えませんでしょうか？

これは
>Sheets(1).Move After:=Workbooks(myBook.Name).Sheets(Workbooks(myBook.Name).Sheets.Count)
の部分を

Sheets(1).Move After:=Workbooks(myBook.Name).Sheets(1)
とするだけでＯＫですよ

0 hits

▼

【61982】相対指定して開いたファイルにシートを転記する方法 テンマ 09/6/15(月) 16:48