Excel VBA 質問スレ Part50 [無断転載禁止]©2ch.net

[1 デフォルトの名無しさん 転載ダメ©2ch.net (ﾜｯﾁｮｲ 7e6d-ffY6) 2017/08/27(日) 12:40:17.57 ID:LjjEWylk0]

!extend:checked:vvvvv:1000:512

スレ立ての際は一行目に
!extend:checked:vvvvv:1000:512
と入れてスレ立てして下さい

ExcelのVBAに関する質問スレです
コード書き込みや作成依頼もOK

※関連スレ
VBAなんでも質問スレ Part2
http://mevius.2ch.net/test/read.cgi/tech/1432173164/
Access VBA 質問スレ Part1
http://mevius.2ch.net/test/read.cgi/tech/1328536426/
Excel総合相談所 126
https://mevius.2ch.net/test/read.cgi/bsoft/1496487719/

※前スレ
Excel VBA 質問スレ Part49©2ch.net
http://mevius.2ch.net/test/read.cgi/tech/1498410914/

---

VIPQ2_EXTDAT: checked:vvvvv:1000:512:----: EXT was configured

[2 デフォルトの名無しさん (ﾜｯﾁｮｲ a511-P7rv) 2017/08/27(日) 13:54:51.09 ID:jYGHj9310]

いちおつしないとおちちゃうよ

[3 デフォルトの名無しさん (ﾜｯﾁｮｲ ed6f-2x4P) 2017/08/27(日) 15:00:10.00 ID:e4TdDFEN0]

http://soleil-lielos.net/image/o05.jpg

[4 デフォルトの名無しさん (ｱｳｱｳｳｰ Sa91-xxBf) 2017/08/27(日) 16:42:30.51 ID:TgR8VSWoa]

初心者です。お時間がありましたら、アドバイス願います。
「自分のペースでゆったり学ぶ　EXCEL VBA」という本を使って
勉強しています。シートを任意の場所にコピーするという項目で、
エラーが出てしまいます。

Sub 納品書シート作成()
　ThisWorkbook.Worksheets("納品書").Copy _
After := ThisWorkbook.Worksheets(3)
End Sub

これを実行すると、「修正候補：式」と出て、「After :=」の部分が赤色になります。
何が問題なのでしょうか。よろしければ教えてください。

EXCEL2010を使用しております。

[5 デフォルトの名無しさん (ﾜｯﾁｮｲ 4a06-oKtA) 2017/08/27(日) 17:08:53.71 ID:WmqrsSrM0]

>>4
こっちも2010
そのプロシージャまんまコピーして（勿論「納品書」シートも作って）実行したけど正常終了
念のためワークシート数を2枚にして実行すればエラーになるけどそれはインデックスが有効な範囲にないというエラーで
そちらのエラーにはならない。

一応確認しておくけど、VBEditorの画面で上のデバッグ(D)からコンパイルをしてエラーは無い？

[6 デフォルトの名無しさん (ﾜｯﾁｮｲ fe6d-VVOB) 2017/08/27(日) 17:09:02.52 ID:LjjEWylk0]

>>4
時間がないやつは最初からアドバイスなんて出来ない。読むのめんどくさいだけだからそういう社交辞令は書かないほうが良い

で、2010だけどエラーが出なかった。式はおかしくないはず
Worksheets(3)　は、3つめのシートを表す。シートが3つ以下だとエラーが立つが、その場合は「インデックス~」のエラーになる
もし可能ならブックごとアップロードしてほしい

[7 デフォルトの名無しさん (ﾜｯﾁｮｲ a511-P7rv) 2017/08/27(日) 17:42:10.42 ID:jYGHj9310]

>>4
改行のアンダーバーの前にスペース入れ忘れてるとかそんなんは？

[8 デフォルトの名無しさん (ｱｳｱｳｳｰ Sa91-xxBf) 2017/08/27(日) 18:33:58.27 ID:TgR8VSWoa]

>5,6,7
ありがとうございます。
デバックというのを試してみましたが、同じような結果になります。

ファイルをアップロードしてみました。Dkeyは1111です。
http://www.dotup.org/uploda/www.dotup.org1351357.xlsx.html

[9 デフォルトの名無しさん (ﾜｯﾁｮｲ fe6d-iRjW) 2017/08/27(日) 18:52:31.15 ID:LjjEWylk0]

>>4>>8
よく分からない。普通にうまくいく（シート「納品書」がなかったからテキトーに作ったけど）
http://i.imgur.com/NeVGWfS.png

[10 デフォルトの名無しさん (ﾜｯﾁｮｲ ed6f-2x4P) 2017/08/27(日) 19:12:47.61 ID:e4TdDFEN0]

>>8
マクロを含むファイルは xlsm で保存しないとダメじゃね？

[11 デフォルトの名無しさん (ｱｳｱｳｶｰ Sa85-HXRX) 2017/08/27(日) 19:19:16.69 ID:uEidIgYqa]

うむ。
xlsxで保存するとマクロが消えるよ。

[12 デフォルトの名無しさん (ﾜｯﾁｮｲ 868f-vgeI) 2017/08/27(日) 20:15:32.32 ID:HYoDzU2+0]

>>4
出版社のページでダウンロードしてきたらどうでしょうか？
正誤表は無いみたいですね。

[13 デフォルトの名無しさん (ﾜｯﾁｮｲ 4a06-oKtA) 2017/08/27(日) 22:32:38.03 ID:WmqrsSrM0]

>>8
まず最初にエクスプローラーのツール→フォルダーオプションの
表示タブで”登録されている拡張子は表示しない”のチェック外せ。
んで、拡張子xlsxとxlsmの違いについてVBAのその入門書の最初から読んで
勉強し直せ