![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
VBA 初心者です。
以下のコードをどうにか作成しました。自身のパソコン上では作動するのですが、
他のパソコンで使ってみると、エラーメッセージで「パスがみつかりません」、
デバックして、 ChDir "C:\Users\会社User\Desktop" を指定されます。
どのパソコン上でも使えるようにしたいのですが、どのように修正すれば
良いのでしょうか。
お力添えよろしくお願い致します。
>
Sub ペースト()
Dim wb As Workbook
Workbooks.Add
Set wb = ActiveWorkbook
ChDir "C:\Users\会社User\Desktop"
Windows("データ.xls").Activate
Sheets("まとめ").Select
Range("A2:E1000").Select
Selection.Copy
wb.Activate
Cells.Select
ActiveSheet.Paste
Range("A1").Select
Windows("データ.xls").Activate
Sheets("まとめ").Select
Range("A2:E1000").Select
Selection.Clear
Range("F2").Select
End Sub
No.2ベストアンサー
- 回答日時:
「他のパソコン」のユーザー名が「会社User」ではないと指定のパスは存在しなくなります。
ChDir "C:\Users\会社User\Desktop" を以下の様に変更したらどうでしょうか?
↓
ChDir "C:\Users\” & Application.UserName & "\Desktop"
ありがとうございました。
根本的なことを理解しておりませんでした。
ご回答の変更でもデバックしてしまいましたが、
ChDir "C:\Users\会社User\Desktop" そもそも
削除すれば良かったので、これでどうにかなりました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 動きっぱなしです。止め方とプロシージャの間違いを教えて下さい! 5 2022/08/15 23:08
- Visual Basic(VBA) データのある範囲を選択するVBAについて 2 2022/09/03 00:20
- Excel(エクセル) エクセル VBAでシートのコピーを作りたい 1 2023/05/18 07:42
- Visual Basic(VBA) ExcelVBA No.を自動連番で設定をしながらデータ入力をしたい 2 2022/08/03 18:19
- Excel(エクセル) エクセル 値をコピペした時に、条件付き書式で塗られた背景色もペーストさせる 2 2023/04/05 17:21
- Visual Basic(VBA) マクロで最終行を取得してコピーしたい 3 2022/04/06 19:07
- Visual Basic(VBA) 【前回の続き続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/24 20:49
- Visual Basic(VBA) 指定の条件に応じたセルの場所に〇印(図形)を描く 2 2022/11/08 15:26
- Excel(エクセル) ExcelVBAについて。 2 2022/12/10 20:08
- Visual Basic(VBA) excelVBAについて。 4 2022/11/21 16:15
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
特定のPCだけ動作しないVBAマクロがあります。その理由は?
Visual Basic(VBA)
-
別のパソコンでエクセルのマクロを使いたい
Excel(エクセル)
-
EXCELのマクロが他のパソコンで動かない
その他(コンピューター・テクノロジー)
-
-
4
エクセルでマクロを別のPCで利用するには
Excel(エクセル)
-
5
EXCEL/VBAで、自分のPCだけエラーが出ます
Visual Basic(VBA)
-
6
エクセルでマクロ。他のパソコンではエラーになる。
Excel(エクセル)
-
7
EXCEL VBA 指定したファイルが存在しない場合メッセージボックスを表示させる
Access(アクセス)
-
8
エクセルで、日付を入力すると、別のセルに文字を自動的に表示させるようにするには。
Excel(エクセル)
-
9
B列の最終行までA列をオートフィル
Visual Basic(VBA)
-
10
VBA 存在しないシートを選択した時にエラーメッセージを表示するには?
Visual Basic(VBA)
-
11
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
12
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
13
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
14
エクセル 日付による並べ替えのマクロ
Excel(エクセル)
-
15
VBAで文字列を数値に変換したい
Excel(エクセル)
-
16
エクセルVBA 実行時エラー'9'の回避方法について
Visual Basic(VBA)
-
17
メッセージボックスのOKボタンをVBAでクリックさせたい
Visual Basic(VBA)
-
18
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
19
VBA ネットワーク上のファイルでカレントフォルダを取得するには?
Visual Basic(VBA)
-
20
エクセルvba (ByVal Target As Range)について
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
パソコンからショートメールの...
-
パソコンでダウンロードフォル...
-
SSDを別のパソコンに入れ替えは...
-
エロ動画とか怪しいサイト見る...
-
買い替え?それとも買い換え?
-
パソコン
-
パソコンで づ、と打つ方法教え...
-
Access印刷プレビューでデータ...
-
パソコンの初期不良の再現方法...
-
会社で使ってるパソコンが覗か...
-
40代でパソコンが全然使えませ...
-
至急回答お願いします。 今日会...
-
パソコンの中に虫が入っちゃっ...
-
パソコンで40GBって少ないです...
-
日本ではパソコン離れが進んで...
-
急募 小学校以来会うのが久しぶ...
-
パソコンにはスマホでいうとこ...
-
iTunesとiPhoneでの同アカウン...
-
Pc シャリシャリ音
-
最近パソコンに意味の分からな...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
パソコンからショートメールの...
-
SSDを別のパソコンに入れ替えは...
-
日本人です。パソコンは日本製...
-
至急回答お願いします。 今日会...
-
エロ動画とか怪しいサイト見る...
-
パソコン
-
エクセルのデーターが2か月前の...
-
weblioの余計な宣伝を消したい...
-
会社で使ってるパソコンが覗か...
-
買い替え?それとも買い換え?
-
昔のパソコン少年の武勇伝「店...
-
パソコンが自分の思い通りにい...
-
Outlookで表示がおかしい、対処...
-
パソコンを買い替えたら「古い...
-
嫁と離婚が成立したので心置き...
-
皆さんここは何で投稿? 携帯ア...
-
ノートパソコンの買い替えを検...
-
一時期流行ったパソコン。HP ?...
-
パソコンのことで詳しい方教え...
-
捨てアドから人物をとくていす...
おすすめ情報