- ベストアンサー
エクセルで見出しの色の変更を個別にするマクロを教えてください
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
ご質問者様のEXCELブックには50名分のシートが 見出し付きで並んでいる状態と考えてよろしいのでしょうか？ また、そのマクロは自動記録で作成されたものでしょうか？ 自動記録で作成されたマクロの場合、見出しの色を変えるべき 「シート番号が固定」されてしまった可能性があります。 現在作業中のシートの見出しの色を変更するためには アクティブシートを取得し、そのシートの見出しの色 を変更するマクロを記述する必要があります。 例えば、EXCELのブック名が「test.xls」である場合で、 作業中シートの色を黄色にかえるマクロは以下のようなものです。 Workbooks("test.xls").ActiveSheet.Tab.ColorIndex = 6 ご質問者様のやろうとしていらっしゃる事やEXCELブック の状況が今ひとつ不明なのでこの辺までのアドバイス が限界です。
その他の回答 (1)
- harukabcde
- ベストアンサー率15% (94/610)
コードを提示したほうがいいかも
関連するQ&A
- エクセルのシート見出しにつきまして
エクセルについて教えてください。 各顧客別に分けた、エクセルシートのシート見出しに 各顧客名を入力するのですが、一括（？）で入力 できる方法はありませんか？ 顧客名は決まった行列に入っております。 無理な場合は、シート見出しにコピーを貼り出す 方法を教えてください。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルの入力済みシートの見出しの色を自動で変更する
現在、毎日の売上集計表を作っています。1～31枚のシートがあります。データーを入力したシートの見出しの色を自動で色を変えることは可能でしょうか?未入力シートと入力済みシートの区別を分かりやすくしたいのですが…（データーは毎日、営業終了後に入力します） 例えば、データー入力後に保存するとシートの見出しの色が変わるとか…これはマクロ等を使用しないと無理でしょうか、あまり詳しくないのですが。 バージョンはエクセル2003です。
- 締切済み
- Windows系OS
- 条件により、シート見出しの色を変更したい
エクセル2007を使用してします。 ある報告書の全シートを対象として A1セルにｋさんの名前が入力されたらそのシートのシート見出しが緑になり、A2セルにｍさんの名前が入力されたらそのシートのシート見出しが青になり、なおかつ、ｋさんとｍさん２人の名前が入力されたらそのシート見出しの色が黄色に自動でなるマクロの記述を教えてください。よろしくお願いします。
- ベストアンサー
- Visual Basic
- エクセルのマクロでこういったことはできますでしょうか。
顧客管理で下記のようなことがしたいと思っています。 マクロ初心者なのですが、こういったことは可能でしょうか。 (1)事前に、顧客管理のデータ入力用ファイル（以下データファイル）、Ａ、Ｂ、Ｃ、Ｄ、Ｅという定型ファイルを作成しておく。Ａ～Ｅには、全て複数のシートが入っており、シート１にデータファイルに入力した情報が飛ぶようにしたい。 (2)データファイルに顧客情報「あ」を入力し、シート上に作成しておいたＡという名のマクロボタンを押すと、Ａのファイルのシート１に「あ」という情報が飛び、さらに、Ａファイルは原本なので、“「あ」Ａ”という名前の新しいファイルを作成できるようにしたい。 (3)同じように、データファイルに顧客情報「い」を入力して、今度はＢというボタンを押したら、Ｂファイルのシート１に「い」という情報が飛び、“「い」Ｂ”という名前のファイルが新しく作成できるようにしたい。 非常にわかりにくい説明で申し訳ないのですが、これから自分でマクロやＶＢＥを勉強しようと思っており、実際こういったことが可能なのかどうか、ご教示頂けますと幸甚です。何卒よろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- 【Excel VBA】シート見出しの色を変更する
Excel2003を使用しています。 シート数が10数枚のBookが複数あり、これらのBookで、シートのデータが変更されたら、シート見出しに色を付けるマクロを作りたく、とりあえず、マクロの記録をとってみました。 マクロの記録で、シート見出しの色を変更するコードや複数のシートを選択するコードはわかりましたが、実際にしたいことは、シート名が4桁の数値のシートにだけ、このマクロが実行されるようにしたいのです。このようなことは可能でしょうか？可能であれば、どのようにコードを記述すればいいでしょうか？ よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- シート見出しの色
全シートを対象として A1セルに整数が入力されたらそのシートのシート見出しが赤になり。A1セルに文字が入力されたらそのシートのシート見出しが黄色になるマクロの記述を教えてください。よろしくお願いします。
- ベストアンサー
- Visual Basic
- 会社の上司に、エクセルでマクロを作って欲しいと頼まれました。
会社の上司に、エクセルでマクロを作って欲しいと頼まれました。 セールスの仕事をしており、シート1とシート2に情報を記入しています。 A：確定したセールス情報 B：未確定情報 訪問した日に、相手の情報をBシートに記入し、それが確定したらAシートに移しています。 取引が完了したらAから消しています。 頼まれたマクロは、 ・Bシートでボタンを押すとBシートの顧客情報がAシートの空いているセルに移動(コピーではなく、移動です)。 ・Aシートでボタンを押すと、顧客情報が並べ替えられる（上から古い取引順） ボタンを二つにわける理由としては、エクセルの更新は会議中にするためです。 会議中にBからAに移動、終わってからAを並べ替えるという手順です。 エクセルの特徴としては、 セルA1に顧客名を入力しています。 その他情報も入力しているので、一人の顧客に対して、A1～G5まで入力しています。 一人の顧客に数行使用しているため、次の顧客名はセルA6に入力しています。 （A1,A6,11,A16,A21…という感じで顧客名が入力されています） 次の会議が水曜日にあるため、焦っております。 どうかお助けください。
- ベストアンサー
- オフィス系ソフト
- エクセル2007 マクロについて教えてください
エクセルのデータが2個あります。 それぞれ、ファイル名は 顧客データ.xlsと個別シート.xlsです。 顧客データ.xlsには、10名のお客様の情報があり、Ａ１セルには ＩＤ番号 と入力してあり、 Ａ２～Ａ１１セルにＩＤ番号が入力されています。 『個別シート.xlsにマクロで顧客データ.xlsのデータをコピーし、ＩＤ番号のフォルダをデスクトップに新規作成し、ＩＤ番号を付けて保存する』マクロを作成中です。 顧客番号が1234のお客様のデータを、個別シートにコピーし、デスクトップに1234というフォルダを新規作成し、その中に 個別シート_1234.xls というファイル名で保存をしたいです。 顧客データを自動でコピーするまではできましたが、それ以降ができません。 MkDir "C:\ Documents and Settings\xxx\デスクトップ\nknk\ID " ChDir "C:\ Documents and Settings\xxxi\デスクトップ\nknk\ID " ActiveWorkbook.SaveAs Filename:="個別シート_" & ID & ".xls" ActiveWorkbook.Close マクロを実行すると『実行時エラー76：パスが見つかりません』とエラーになります。 （フォルダ作成の命令文のところが黄色くなります。） ちなみに、個別シートの指定したセルに、ＩＤはコピーされています。 正しく実行できる文を教えてください。また、以降の命令文は正しいでしょうか。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルマクロ ファイル名を変更したとき
マクロ初心者です。 データファイルからシートを複写挿入するマクロです。 コピー先ファイル名を都度変更したいのですが、その場合マクロにコピー先ファイル名が入っているのでエラーになります。名前が変わっても実行できるようにするにはどうしたらよいのでしょう？ なお、複写元のデータファイルは複写後に閉じます。 Workbooks.Open Filename:="データファイル.xls" Sheets("Sheet1").Copy Before:=Workbooks("コピー先ファイル名.xls").Sheets(1)
- ベストアンサー
- オフィス系ソフト
- エクセル マクロで可能!?
エクセルで個人データを管理しています。マクロでできるのかわかりませんが、できるなら挑戦してみようと思い質問しました。 データは、縦に個人別に並べてあります。また1人のデータにつき4行を使って横長にその個人のデータを記入しています。よって左端に名前等の基本データが記入されていています。下のような感じです。 （シート１） 名前A データ ××○○○・・・・・・ 名前B データ ×○○×○・・・・・・ 名前C データ ○○××○・・・・・・ ・ ・ そこで、ある個人のデータの名前周辺部分を別シートにそのまま同じ形式でコピーをしたいのですが、それをマクロでできないのかなと思い質問しました。下のように全ての人をコピーする必要がないので解らなくなっています。 （シート２） 名前A 名前C 名前G ・ ・ 考えているのはシート１の各名前の前にコマンドボタンを配置し、それに『指定部分をコピーしてシート２に貼り付け』というマクロを組めばいいのでないかと思っています。しかし、全ての個人をコピーする必要がないため、コピー先の場所をどう指定してやればいいのかがわかりません。コピーをした順番に上から順番に埋まってほしいのです。 以上、どなたかわかる方お願いします。 エクセルを文章で状況説明するのは難しいです…
- 締切済み
- オフィス系ソフト
