Excel

ExcelでシートをコピーするWSH

変更履歴シートなど複数のExcelファイルに一律で他のブックのシートをコピーするVBA。 '--------------------------------------------------------------------------------------'' Excel シートをコピー' コピー元の指定したシートをフォルダ内のすべての…

excelアドインを有効にする

Excelのアドインが起動するたびに無効(アンロードされました)となる。 以下、レジストリの値を変更したら解決した。 HKEY_CURRENT_USER\Software\Microsoft\Office\Excel\Addins\<アドイン>の LoadBehaviorの値を3にする

Excel関数でファイル名を取得

Excelの関数でファイル名や拡張子を取得する方法は以下の通り。 ディレクトリの一覧情報をいろんな用途で使用したい場合に便利。 フルパスからファイル名を取得する =MID(SUBSTITUTE(A1,LEFT(A1,FIND(">",SUBSTITUTE(A1,"\",">",LEN(A1)-LEN(SUBSTITUTE(A1,"…

WordをExcelに変換

Wordで作成されたドキュメントをお手軽にExcelに変換する手順は以下の通り 1. Wordのドキュメントを名前を付けて保存⇒html形式で保存する 2.1のhtmlをExcelで開く 3.2で開いたドキュメントをxlsx形式で保存する インデントとか図がずれてしまうの必…

RAND関数

RAND関数は0から1未満の小数の値を無作為に返す。 これを利用してくじ引きなどプレゼン中に使用することも可能 0〜9をランダムで返す =INT(RAND()*10)

Excelを1ブックにまとめる

指定したフォルダ内の複数のExcelファイルを1つのブックにまとめるVBS。 まとめた結果シート名が重複したらダメかも。 '-------------------------------------------------------------------------------------- ' ' Excel 1ブックにまとめる ' (指定し…

WEBサイトの表をインポート

WEBサイトで表形式で表示されている内容をEXCELに取りこみたいことがある。 普通に表をコピー⇒ペーストでも可能だが以下の方法でスマートにインポートすることも可能である。 1.ツールバーの「データ」→「WEBクエリ」をクリック 2.取込したいサイトのURLを入…

リンクを貼るマクロ

一覧のテキストに対応したシートへのハイパーリンクを追加するマクロ。 ブックの先頭に一覧(目次)があり、その後ろに詳細のシートがあるようなブックにリンクを追加するときに便利。 ※ActiveSheetオブジェクトを使用しているので、実行中にマウス等で他のシ…

複数のブック、シートのセルの値を出力する

指定したフォルダ内にあるExcelファイルのセルの内容をテキスト(CSV)に出力する '-------------------------------------------------------------------------------------- ' ' Excel 値出力 ' (指定したフォルダにあるExcelファイルのセルの値を出力する)…

このファイルはインターネット上の場所から取得されており

インターネット等で取得したExcelファイルを開くと以下のようなメッセージが表示されることがある。 このファイルは 、インターネット上の場所から取得されており、安全でない可能性があります。 クリックすると詳細が表示されます これはExcelの保護された…

全画面で印刷プレビュー

Excel2010のデフォルト設定では全画面での印刷プレビューができない。 しかし、以下の手順でクイックツールアクセスバーに印刷プレビュー(全画面表示)を追加することにより 全画面での印刷プレビューが可能となる。 1.リボンの上にある「クイックツールア…

Excelの緑の三角を消す

Excel 2010でセルの左上にExcelの緑の三角が表示されることがある。 これは数式のエラーチェックを行っているのが原因である。 以下の手順で表示しないようにすることができる。 1.「数式」→「エラーチェック」→「エラーチェック」を選ぶ2.「オプション…

ページ数を取得するVBA

Excelのページ数をテキストに出力するVBA。 ただし、改ページの設定によっては若干の誤差が発生することがある。 '-------------------------------------------------------------------------------------- ' ' Excel ページ数を取得するスクリプト ' (指…

Shapeオブジェクトのサイズ変更

ExcelのShapeオブジェクトのサイズを一括変更するVBS ハードコピーのサイズを揃えたいときに便利かも '-------------------------------------------------------------------------------------- ' ' Shapes サイズ一括変更 ' (指定したExcelファイルのShap…

Excelの1024文字制限

Excelのセルに表示できるのは1024文字まで ただし、データとしては32767文字まで格納することができる (数式バーでは確認できる) どうしてもセルに表示したい場合はMID関数とかを利用して別のセルに表示するしかないかも =MID(A1,1025,1024) 動作確認環境:Ex…

マクロの削除

Excelのファイルを開いた時にマクロを使用していなくても 「マクロを含んでいます」のダイアログが表示されることがある 以前、マクロを使用していた場合の残骸が残っている可能性があるので 以下の手順でマクロのファイルを削除するとよい 1.「ツール」→…

シート毎に保存

複数のシートで構成されたExcelのブックをシート毎にブックを作成し、保存するvbs ★の箇所を適当な値に書き換えて利用すること excel_slip.vbs '-------------------------------------------------------------------------------------- ' ' Excel シート…

シート一覧を出力

ExcelのBook内のシート一覧を出力するマクロ Sub Macro一覧最新() 'シート「一覧」に、各シートへのリンクを作成する '※予め、シート「一覧」を作成しておいてください ' (シート「一覧」は先頭にしておくこと!!) Dim i As Long 'シート用カウンタ '編集領…

Excelを別ウインドウで開く

以下の設定で複数のエクセルファイルを開いた際にウインドウを分けることができる。 1.エクスプローラーの「ツール」→「フォルダオプション」を開く 2.「ファイルの種類」タブの拡張子がXLSのものを選んで「詳細設定」ボタンを押す 3.「新規」ボタンを…

シートの削除

VBAからシートを削除するときは「objExcel.DisplayAlerts = False」で アラートを表示しないようにしてから削除しないとシートが削除されない。 'Excelを開く Set objExcel = CreateObject("Excel.Application") Set objBook = objExcel.Workbooks.Open("d:\…

セルのアドレスを取得

セルの行、列からアドレスを取得するにはCellsオブジェクトのAddressメソッドで取得できる。 たとえば、行=2、列=3ならだアドレスは「C2」となる。 以下は行、列を渡してアドレスを返すメソッド ' ' 行と列からアドレスに変換 ' Private Function conver…

Excelの起動するバージョンを切り替える

複数のバージョンのExcelをインストールしている場合、 デフォルトでどのバージョンで起動するかを以下のコマンドで変更することができます。 コマンドプロンプトより以下のコマンドを実行してください。 Excel 2003をデフォルトとする "C:\Program Files\Mi…

ExcelでDistinct

Excelで重複したデータは表示しないようにする方法。 手順は以下のとおり。 メニューの「データ」→「フィルタ」→「フィルタオプションの設定」 →「重複するデータは無視する」のチェックをオンにする。 すると、以下のようなデータが・・・ 名前 ________ ha…

デフォルトのフォントを変更

Excelを開いたときのデフォルトの設定を変更するのは以下のとおり。 フォントの他にシート数(デフォルトは3)やユーザ名も変更できる Excel2003の場合 「ツール」→「オプション」→「全般タブ」 Excel2007の場合 左上のOfficeボタン→Excelのオプション→基本設…

列折り返しツール

Excelを規定した列ごとに折り返すツール。 データのダンプをExcelに貼り付けて保存する場合に項目数が多いと 印刷時に改ページされて印刷枚数が増えるので、折り返して印刷枚数を減らすのを目的に作成。 '-------------------------------------------------…

印刷時にはみ出る

画面内では納まっているのに印刷すると文字がセルや罫線からはみ出ることがある。 対処方法は以下の通り。 セルの書式設定の「縮小して全体を表示する」にチェックをつける。 セル幅の自動調節(ヘッダの列の区切りをダブルクリック)を行う。 そもそもプロポ…

CSVファイルを開くと0が消える

CSVファイルを普通にExcelで開くと"01"など先頭に0がついた値が消えてしまう。 消えないように開くには以下の通り。 1.Excelを起動する。 2.「外部データの取込」で開きたいCSVファイルを選ぶ 3.インポートウィザードの途中の「列のデータ形式」を指定する箇…

図の貼り付け

Excelで選択した範囲を図形描画オブジェクトに変換することができる 手順は以下のとおり 1.オブジェクトに変換したい箇所を選択してコピー 2.Shiftキーを押しながらメニューバーの「編集」メニューを開く 3.「貼り付け」の箇所が「図の貼り付け」にな…

Excel Book統合

指定したフォルダ内にある複数のブックを1つのブックにまとめる '-------------------------------------------------------------------------------------- ' ' Excel Book統合 ' (指定したフォルダにあるExcelファイルを1つのファイルにまとめる) ' ' …

Excelを起動すると応答なしになる

Excelファイルを開こうとすると応答なしになる現象が発生した。 (イベントビューアにはApplication Hangというメッセージが。。。) どうやら、Excelのカスタム情報を格納しているファイルが破損したのが原因らしい。 解決方法は以下の通り 1.C:\Documents an…