windowsXPを使用しています。
Excelで同じフォームのブックが300ほどあります。
この300のブックのA1というセルに、全て同じ値を入力したいのですが、
効率的な方法がありましたら教えていただけますでしょうか。
(社員1名につき1つのブックがあるのですが、社名変更のため、
全てタイトルを変更しなければなりません。
なお、全社員ともフォームは同じですが、ブックの数や、シート名は異なります。)
同じブック内での複数シートへの入力であれば、
作業グループで一度にできると思いますが、異なるブックの場合、
作業グループも使えないため、どうすればよいのか分かりません。
やはり全てのブックを開いて一つ一つコピペするしかないのでしょうか?
お忙しいところ恐れ入りますが、よろしくお願いいたします。
No.4ベストアンサー
- 回答日時:
No2の者です。
解決されましたでしょうか?
まだでしたら、ちょっとマクロを作ってみましたのでお試しください。
(私も人様に教える程のスキルは無いので恥ずかしいですが・・・。)
えーと、任意のフォルダに300ほどのファイルを入れ(=子分ども)、新規エクセルファイルを作り(=親分)同一フォルダに入れます。親分の標準モジュールに以下のコードをコピーして下さい。8行目の"お好きな文字"を更新したい文字に変え、マクロを実行すると一気に書き換わることと思います。
ミソは8行目の「Worksheets(1)」です。これで、「このブックの1枚目のシート」という意味になります。
健闘を祈ります♪
--------------------------------------
Sub A1にお好きな文字()
Dim Myfile, Filepath As String
Filepath = ThisWorkbook.Path & "\"
Myfile = Dir(Filepath)
Do While Myfile <> ""
Workbooks.Open Filename:=Filepath & Myfile
Workbooks(Myfile).Activate
Worksheets(1).Cells(1, 1).Value = "お好きな文字"
ActiveWorkbook.Save
Myfile = Dir()
Loop
End Sub
--------------------------------------
お礼が遅くなって申し訳ありません!
ご丁寧に教えていただきありがとうございました。
上記のマクロで一気に変更できました!
ただ、その他にも問題が発生しまして、変更する場合は直前のシートを
同じブックの中にコピーした上で、変更することになっています。
(過去の履歴を残すため)
なので、シートの移動またはコピーのマクロも組む必要があります。
更にこれらのexcelファイルには全てPWロックがかかっているため、
マクロを実行する度に、PWを聞いてくるので、全ブック分入力しなくてはならず。。。
さすがにPWを自動で入力してくれるマクロは分からないので、
今回は地道にやるしかないかぁというのが結論です。
とはいえ、tamago800さんに教えていただいた上記のマクロは
別のexelファイルで活かせますので、活用していきたいと思います。
ご親切にありがとうございました(^^)
No.3
- 回答日時:
同一フォルダにあること
Sheet1(など)同一シート名にあること
セルはA1で一定
という条件で、VBAでやるしかないと思います。
あるいはシートの列にファイル名(英一部氏名を含む名称)になりうるデータ(例氏名)ガあるとか、でVBAで処理する。
こういうときにエクセルで別ブックにすると統一的変更に困る。
早速のご回答ありがとうございます。
シート名は社員名になっており、全員異なっています。
しかも本部毎のフォルダに入ってしまっています。。。
とはいえ、本部は6つなので、6回同じ作業をやるか、
一つのフォルダにまとめて、後でばらすことも可能です。
また、シート名は社員名なのですが、必ずそれぞれのシートの同じセルに社員名が入っています。
何か手がかりがありましたら教えていただけると助かります。
P.S.
ちなみに、最近転職したのですが、既にこのような運用になっていました。
他によい管理方法はないものかと考えており、将来的にはAccessに変えようかと考えています。
ただ、Accessを使えるのが部署で私だけなのが問題なのですが。。。
No.2
- 回答日時:
300もあるのでしたら、ぜひマクロで更新してしまいたいですね。
シート名が全て同じなら、初歩的なマクロで一度に更新することが可能なのですが・・・。
あるいは、更新したいシートが、必ず一番最初(左側)に配置されているとか、マクロを組むにあたっての、なんらかの規則性はないのでしょうか?
早速のご回答ありがとうございます。
シート名は社員名になっており、全員異なりますが、
更新したいシートが一番左側に配置はされています!
この条件でマクロを組むことができるということですよね。
少し光が見えてきました。
ただ、簡単なVBAなら少しやったことはあるのですが、複雑なものは組んだことがありません。
自分でも探してみますが、もし参考になるサイト等をご存知でしたら教えていただけると幸いです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
10代と話して驚いたこと
先日10代の知り合いと話した際、フロッピーディスクの実物を見たことがない、と言われて驚きました。今後もこういうことが増えてくるのかと思うと不思議な気持ちです。
-
大人になっても苦手な食べ物、ありますか?
大人になっても、我慢してもどうしても食べれないほど苦手なものってありますよね。 あなたにとっての今でもどうしても苦手なものはなんですか?
-
【お題】引っかけ問題(締め切り10月27日(日)23時)
【大喜利】 「日本で一番高い山は富士山……ですが!」から始まった、それは当てられるわけ無いだろ!と思ったクイズの問題
-
牛、豚、鶏、どれか一つ食べられなくなるとしたら?
牛肉、豚肉、鶏肉のうち、どれか一種類をこの先一生食べられなくなるとしたらどれを我慢しますか?
-
うちのカレーにはこれが入ってる!って食材ありますか?
カレーって同じルーから作っても、家庭によって入っているものや味が微妙に違っていて面白いですよね! 「我が家のカレーにはこれが入ってるよ!」 という食材や調味料はありますか?
-
エクセル 複数ファイルの一括セル入力
Excel(エクセル)
-
エクセル 複数のブックを一度で編集する方法
Excel(エクセル)
-
エクセルで複数のブックに、値を同時入力する方法は?
Windows Vista・XP
-
-
4
フォルダ内の複数ファイルから、特定セルだけを抽出し、並び替えて集約したい
Excel(エクセル)
-
5
複数のシートの同じセルに入力するvbaを教えてください
Excel(エクセル)
-
6
ExcelのVBAで同一フォルダ内にあるファイルに同じ処理をしたい
Excel(エクセル)
-
7
複数のexcelファイル 同一セルの値を一気に変更するには、
Excel(エクセル)
-
8
ブックを開かずに、フォルダ内にある複数ブックの、特定セルの値を抽出した
Excel(エクセル)
-
9
フォルダ内の全ブックのシート名を変更したいです。
Excel(エクセル)
-
10
複数のブックに一括で値入力するマクロを教えてください
Excel(エクセル)
-
11
EXCELでコピーしたグラフのデータ範囲変更について
Excel(エクセル)
-
12
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
13
フォルダ内の全てのファイルに貼り付けを行うマクロを作りたい
Visual Basic(VBA)
-
14
エクセルで複数のシートの同じセルに同じ文字を入力したいのですが、、、
Excel(エクセル)
-
15
Excel VBAで同じフォルダ内のファイルを開くには?
Excel(エクセル)
-
16
エクセルで複数ファイルのセルの数式を一部置換
Excel(エクセル)
-
17
大量のフォルダからひとつのフォルダにファイルをまとめたい!
その他(ソフトウェア)
-
18
同じ作業を複数のシートに実行させるにはどうしたらいいのでしょうか
Visual Basic(VBA)
-
19
エクセルの散布図のX軸に文字を表示したいのですが、どうしたらよいのでしょうか?
Excel(エクセル)
-
20
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・【大喜利】【投稿~11/12】 急に朝起こしてきた母親に言われた一言とは?
- ・好きな和訳タイトルを教えてください
- ・うちのカレーにはこれが入ってる!って食材ありますか?
- ・好きな「お肉」は?
- ・あなたは何にトキメキますか?
- ・おすすめのモーニング・朝食メニューを教えて!
- ・「覚え間違い」を教えてください!
- ・とっておきの手土産を教えて
- ・「平成」を感じるもの
- ・秘密基地、どこに作った?
- ・【お題】NEW演歌
- ・カンパ〜イ!←最初の1杯目、なに頼む?
- ・一回も披露したことのない豆知識
- ・これ何て呼びますか
- ・チョコミントアイス
- ・初めて自分の家と他人の家が違う、と意識した時
- ・「これはヤバかったな」という遅刻エピソード
- ・これ何て呼びますか Part2
- ・許せない心理テスト
- ・この人頭いいなと思ったエピソード
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・あなたの習慣について教えてください!!
- ・ハマっている「お菓子」を教えて!
- ・高校三年生の合唱祭で何を歌いましたか?
- ・【大喜利】【投稿~11/1】 存在しそうで存在しないモノマネ芸人の名前を教えてください
- ・好きなおでんの具材ドラフト会議しましょう
- ・餃子を食べるとき、何をつけますか?
- ・あなたの「必」の書き順を教えてください
- ・ギリギリ行けるお一人様のライン
- ・10代と話して驚いたこと
- ・家の中でのこだわりスペースはどこですか?
- ・つい集めてしまうものはなんですか?
- ・自分のセンスや笑いの好みに影響を受けた作品を教えて
- ・【お題】引っかけ問題(締め切り10月27日(日)23時)
- ・大人になっても苦手な食べ物、ありますか?
- ・14歳の自分に衝撃の事実を告げてください
- ・架空の映画のネタバレレビュー
- ・「お昼の放送」の思い出
- ・昨日見た夢を教えて下さい
- ・ちょっと先の未来クイズ第4問
- ・【大喜利】【投稿~10/21(月)】買ったばかりの自転車を分解してひと言
- ・メモのコツを教えてください!
- ・CDの保有枚数を教えてください
- ・ホテルを選ぶとき、これだけは譲れない条件TOP3は?
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
- ・あなたの習慣について教えてください!!
- ・都道府県穴埋めゲーム
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excelの警告について
-
エクセルを共有するとPCによっ...
-
VBAでブックを非表示で開いて処...
-
エクセルの関数 ENTERを押...
-
エクセルで参照しているデータ...
-
エクセルにおける,「ブック」...
-
Excelでブックの共有を掛けると...
-
エクセルファイルを開かずにpdf...
-
エクセルで「ディスクがいっぱ...
-
Excel(2010)のフィルターが保...
-
Excelで指定範囲のデータ...
-
ブックのピボットを別ブックに...
-
複数ファイルから特定シートの...
-
Excelで複数ブックの同一セルに...
-
エクセルでウィンドウの枠固定...
-
フォルダ内の複数ファイルから...
-
VBA バックグラウンドで別ブッ...
-
フォルダ内の複数ブック・シー...
-
【VBA】特定シート 名前編集・...
-
「ブックの共有」を有効にして...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excelの警告について
-
エクセルを共有するとPCによっ...
-
エクセルの関数 ENTERを押...
-
VBAでブックを非表示で開いて処...
-
Excel(2010)のフィルターが保...
-
エクセルで参照しているデータ...
-
印刷しようとすると強制終了に...
-
WorkBooksをオープンさせずにシ...
-
エクセルにおける,「ブック」...
-
Excelでブックの共有を掛けると...
-
Excelファイルをダブルクリック...
-
エクセルファイルを開かずにpdf...
-
ブックのピボットを別ブックに...
-
Excel起動時に特定のワークシー...
-
エクセルで「ディスクがいっぱ...
-
同じフォルダへのハイパーリン...
-
VBA バックグラウンドで別ブッ...
-
フォルダ内の複数ファイルから...
-
エクセルシートの一部を送りたい
-
Excelで複数ブックの同一セルに...
おすすめ情報