下記のマクロは以前教えて頂いたマクロで、
マクロを実行すると、指定フォルダ内の指定ブックの指定シートを作業ブックのシートにコピーできます。
コードの「\★" & Sheets("受付・名簿・工事名・日付").Range("F2").Value & "採光計算書.xlsx")」
この部分ですが、このマクロを設定した時は、コピー元のファイル名が変更になるので、
上記のコードとしてました。
しかし、今回はファイル名「採光計算書.xlsx」が固定できますので、
「\★" & Sheets("受付・名簿・工事名・日付").Range("F2")」このコードは不要となります。
ファイル名を固定したマクロに変更出来る方法を教えてください。
現状のマクロ
Sub シートコピー()
Dim myPath As String
myPath = ThisWorkbook.Path
With Workbooks.Open("\\nas-sp01\share\確認部\■意匠\戸建\★" & Sheets("受付・名簿・工事名・日付").Range("F2").Value & "採光計算書.xlsx")
.Worksheets("Table 2").Cells.Copy ThisWorkbook.Worksheets("Table 2").Cells(1, 1)
.Close False
End With
End Sub
以上となります。
宜しくお願い致します。
No.1ベストアンサー
- 回答日時:
ファイル "\\nas-sp01\share\確認部\■意匠\戸建\採光計算書.xlsx" をOpenするということですね。
Workbooks.Openの引数をそれにすればOKです。No.3
- 回答日時:
ダブルクォート、括弧、カンマ、ピリオドなんかが多かったり足りなかったりすることはよくあります。
構文エラーになったときはその辺をよく確認しましょう。お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
初めて自分の家と他人の家が違う、と意識した時
子供の頃、友達の家に行くと「なんか自分の家と匂いが違うな?」って思いませんでしたか?
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
天使と悪魔選手権
悪魔がこんなささやきをしていたら、天使のあなたはなんと言って止めますか?
-
VBAコードのインデント表示
Visual Basic(VBA)
-
Excel VBA 定義されたプロージャ名、関数名の取得
Visual Basic(VBA)
-
現在のブックを閉じないで、マクロ抜きの(現在のブックの)コピーを作成したい
Visual Basic(VBA)
-
-
4
VBAで大量のファイルをシート名ごとに転記やらいろいろしたい!
Visual Basic(VBA)
-
5
VBAなくなるの?
Visual Basic(VBA)
-
6
エクセルVBA
Visual Basic(VBA)
-
7
vba 削除
Visual Basic(VBA)
-
8
Excel VBA 選択範囲の罫線色の変更プロージャの動作速度の改善について
Visual Basic(VBA)
-
9
IF文、条件分岐の整理方法
Visual Basic(VBA)
-
10
VBA初心者です。次のVBAコードで、17行目を削除したいのですがうまく動きません 改善策を教えてく
Visual Basic(VBA)
-
11
ExcelVBAマクロで実行した時の疑問
Visual Basic(VBA)
-
12
VBA コードどこがおかしいですか?
Visual Basic(VBA)
-
13
エクセルのマクロについて教えてください。
Visual Basic(VBA)
-
14
エクセルのマクロについて教えてください。
Visual Basic(VBA)
-
15
エクセルのマクロについて教えてください。
Visual Basic(VBA)
-
16
Sub 要具ライフ() ActiveSheet.Cells.Find(what:=TOPゴム")."
Visual Basic(VBA)
-
17
ExcelのVBAコードについて教えてください。
Visual Basic(VBA)
-
18
エクセルのマクロについて教えてください。
Visual Basic(VBA)
-
19
エクセルのマクロについて教えてください。
Visual Basic(VBA)
-
20
エクセルのマクロについて教えてください。
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・【お題】絵本のタイトル
- ・【大喜利】世界最古のコンビニについて知ってる事を教えてください【投稿~10/10(木)】
- ・メモのコツを教えてください!
- ・CDの保有枚数を教えてください
- ・ホテルを選ぶとき、これだけは譲れない条件TOP3は?
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
- ・ハマっている「お菓子」を教えて!
- ・最近、いつ泣きましたか?
- ・夏が終わったと感じる瞬間って、どんな時?
- ・10秒目をつむったら…
- ・人生のプチ美学を教えてください!!
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・都道府県穴埋めゲーム
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excel・Word リサーチ機能を無...
-
特定のPCだけ動作しないVBAマク...
-
エクセルで特定の列が0表示の場...
-
一つのTeratermのマクロで複数...
-
ExcelのVBA。public変数の値が...
-
メッセージボックスのOKボタ...
-
Excel マクロ VBA プロシー...
-
Excel マクロでShearePoint先の...
-
エクセルに張り付けた写真のフ...
-
エクセルで縦に並んだデータを...
-
ExcelVBAでPDFを閉じるソース
-
c言語で言うところの #define
-
accessで未入力の場合にメッセ...
-
Excel VBAからAccessマクロを実...
-
TERA TERMを隠す方法
-
wordを起動した際に特定のペー...
-
ExcelのVBAを使ってタイトル行...
-
マクロで空白セルを詰めて別シ...
-
既存のマクロをコンボボックス...
-
マクロ実行時、ユーザーフォー...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
特定のPCだけ動作しないVBAマク...
-
Excel・Word リサーチ機能を無...
-
エクセルで特定の列が0表示の場...
-
Excel マクロ VBA プロシー...
-
メッセージボックスのOKボタ...
-
一つのTeratermのマクロで複数...
-
ExcelのVBA。public変数の値が...
-
エクセルに張り付けた写真のフ...
-
Excel VBAからAccessマクロを実...
-
Excel マクロでShearePoint先の...
-
特定文字のある行の前に空白行...
-
エクセルで別のセルにあるふり...
-
TERA TERMを隠す方法
-
wordを起動した際に特定のペー...
-
マクロ実行時、ユーザーフォー...
-
ExcelVBAでPDFを閉じるソース
-
【EXCEL VBA】オートシェイプを...
-
Excel_マクロ_現在開いているシ...
-
EXCELマクロでのThisisWor...
-
ソース内の行末に\\
おすすめ情報
回答ありがとうございました。
コードを
With Workbooks.Open("\\nas-sp01\share\確認部\■意匠\戸建\"採光計算書.xlsx"
に設定しましたが、コード自体がエラーになり上手くマクロを実行できませんでした。
解決方法を教えてください。