VBAノート– category –
-
文字を区切りたい【VBA】
【経緯】 取得したファイルの1,1にある文字を区切りたいと思い、 今回書いてみました。 【仕様】 csvファイルを選んだら、そのファイルの(1,1)を取得します。”日付:20240831”という文字列が文字が貼っているので、これを:で区切って「20240831」という情報... -
印刷する【VBA】
【経緯】 Excelファイルを印刷したいと思い、今回書いてみました。 【仕様】 実行したら、 Sheet1が印刷される という仕様です。 【コード】 それではコードです。 Sub PrintOrderList() Dim ws As Worksheet ' 印刷するシートを指定 Set ws = ThisWorkboo... -
注文を締めるコード【VBA】
【経緯】 弁当を注文するExcelファイルがあります。 時刻になると、明日の日付の欄を入力できないようにするコードを作ってみました。 【仕様】 実行したら、 明日の日付の欄がシート保護する という仕様です。 Excelファイルの構成は、D4からAH4まで日付... -
セルの中が「30」以上になったら、書き込みができないようにしたい
【概要】 Excel VBAを使って、棚卸をしています。「30g以上になったら、報告する」というルールでしたが、守られておらず、困ったので、 いっそのこと「30gになってたら、記入させない」ということにしました。 【Excelの構成】 A列に品名B列に数C列にgE1... -
Excel VBAで遭遇する一般的なエラーとその対処方法
【概要】 Excel VBAを使ってプログラムを開発していると、様々なエラーに遭遇することがあります。この記事では、実際に経験したエラーについて、原因とエラーの説明、対処方法を紹介します。 【実行時エラー 1004: Copyメソッド の失敗】 原因とエラーの... -
ExcelからPowerPointへグラフと表を貼り付けるVBAマクロの作成
【概要】 Excelに貼ってあるグラフや表をパワーポイントに展開したくて、今回やってみました。 【全体のコード】 以下は、ExcelからPowerPointへグラフと表を貼り付けるVBAコードです。 Sub ExportChartsAndTableToPowerPoint() ' PowerPointを操作するた... -
キーボードの「F9」をしたら、セルの色が黄色。「F10」を押したら、セルの色が赤【VBA】
【経緯】 以前、「あるセルの範囲で”F9”キーを押したら、コードが動く」というのを作りました。 今回は、”F9”、”F10”キー両方できないかやってみました。 【仕様】 セルS1:S3にカーソルがあって、”F9”キーを押したら、セルの色が黄色に変わる。”F10”キーを... -
あるセルの範囲にいて、キーボードの「F9」をしたら、指定したセルに飛ぶ【VBA】
【経緯】 同僚から、 「F9からF16セルの間にカーソルがあって、なにかキーボードを押したら、”J7”にカーソルが飛ぶ」 という仕様にできないかと依頼があり今回やってみました。 【コード】 では、コードです。 シートのコードモジュール（Sheet1など）: Pr... -
【PowerPoint】パワポに.bmpファイルの画像を貼りたい。【VBA】
【経緯】 PowerPointのVBAでプログラムを書いています。 .bmpの画像をいちいち切り取りソフトで画像を切り取りは貼ってを繰り返していたので、 これを自動化できないか、今回やってみました。 【仕様】 プログラムを走らせると、ダイアログが出てきて、画... -
csvファイルをExcelに読み込む。【VBA】
【経緯】 csvファイルをExcelに貼り付けていたのですが、コピペがめんどくさいので、今回、 データベースになっているcsvファイルをExcelに読み込む コードを書いてみました。 【コード】 では、コードです。 Sub ImportCSVFile() Dim fd As FileDialog Se... -
【PowerPoint】パワポのタグからマクロを実行したい。【VBA】
【経緯】 PowerPointのVBAでプログラムを書いています。 ユーザーフォームをつくったのですが、図形でボタン作るものださいし、 「ホームタグあるあたり(ヘッダーあたり)に追加できないかな？」 と思い、今回やってみました。 【Custom UI Editor Toolを使... -
【PowerPoint】パワポのスライドにある各図形の名前と種類を表示するメッセージボックスを表示【VBA】
【経緯】 PowerPointのVBAでプログラムを書いています。 「各図形の名前と種類を表示するメッセージボックスを表示したい」 と思い、今回やってみました。 【コード】 では、コードです。 Private Sub CommandButton_run_Click() ' スライド1を取得 Dim pp... -
【PowerPoint】エクセルファイルを開いて、グラフのリストを作成する【VBA】
【経緯】 PowerPointのVBAでプログラムを書いています。 「エクセルファイルを開いて、グラフのリストを作成したい」 と思い、今回やってみました。 【コード】 では、コードです。 ' Excelアプリケーションを作成 Dim xlApp As Object Dim xlWorkbook As ... -
【PowerPoint】ユーザーフォームでダイアログを開いて、エクセルファイルを選べるようにする【VBA】
【経緯】 PowerPointのVBAでプログラムを書いています。 「ユーザーフォームでダイアログを開いて、エクセルファイルを選べるようにしたい」 と思い、今回やってみました。 【仕様】 ユーザーフォームにCommandButton1というボタンがあります。TextBox1と... -
Excel VBAで散布図のグラフの線の色を変えたい【VBA】
【経緯】 VBAでプログラムを書いています。 「VBAで散布図のグラフの線の色を変えたい」 と思い、今回やってみました。 【仕様】 ExcelのSheetにたくさんの散布図があります。散布図には「NO1,NO2,NO3」とデータがグラフとなっています。 セルA1に「NO1、N... -
Excel VBAで散布図のグラフの線の太さを変えたい【VBA】
【経緯】 VBAでプログラムを書いています。 「VBAで散布図のグラフの線の太さを変えたい」 と思い、今回やってみました。 【仕様】 ExcelのSheetにたくさんの散布図があります。セルP3に数値を入力するセルがあります。隣に図形で”実行”というボタンがあり... -
グラフのx軸の数値を変える【VBA】
【経緯】 データをまとめた、Excelデータあり、たくさんのグラフを可視化しています。 グラフはx軸が時間軸になっており、時間軸を変えてみるとき、 たくさんのグラフの数値を変えなければいけなくて、すごく時間がかかっていました。 なので、今回は、複... -
G2からG100のどれかのセルにカーソルを合わせたら、フォルダの中に入っているcsvファイルが開く【VBA】
【経緯】 VBAでプログラムを書いています。 「G2からG100のセルにカーソルを合わせたら、フォルダの中に入っているcsvファイルが開く」 という仕様にしたくて、今回やってみました。 【コード】 まず、csvファイルが入っているフォルダを用意して下さい。 ... -
G2からG100のどれかのセルにカーソルを合わせたら、プログラムが走る【VBA】
【経緯】 VBAでプログラムを書いています。 「G2からG100のセルにカーソルを合わせたら、プログラムが走る」 という仕様にしたくて、今回やってみました。 【コード】 早速コードです。VBAエディタを開いてください。 左側にあるプロパティエクスプローラ... -
複製ボタンを作ってみた【VBA】
【経緯】 VBAでプログラムを書いています。 ExcelでSheetを複製して、使い回していました。 マウスを使うと、工程が多いので、ボタンを作って、簡潔にできないか、 今回、勉強しました。 【コード】 ExcelのSheetに図形で「複製」とボタンを作ります。マク... -
「Enter」押したら、指定したセルに飛ぶ【VBA】
【経緯】 VBAでプログラムを書いています。 Excelsheetに値を記入するところが、セルA1、セルC4、セルＦ３とあり、 いちいちマウスや矢印キーで移動するのがめんどうくさいので、 入力(Enter)を押したら、カーソルが飛ぶ仕様を 今回、勉強しました。 【コ... -
セルの文字を消す。【VBA】
【経緯】 VBAでプログラムを書いています。 初期化というか、ボタンを押したら、指定したセルの値を削除したくて、 今回、勉強しました。 【コード】 A1セルとB1から10行目とC列全部の文字を消すという想定です。 以下がコードです。 Private Sub CommandB... -
ボタンを押したら、ユーザーフォームが出てくる【VBA】
【経緯】 ユーザーフォームを使って、プログラムを書いてます。 出来上がったユーザーフォームをExcelsheetから呼びだしくて、 今回、勉強しました。 【コード】 まず、Sheetに図形でボタンを作ります。 VBAエディタ内の標準モジュールに以下のように記述... -
ユーザーフォームで入力した値の履歴を記録する【VBA】
【経緯】 ユーザーフォームを使って、プログラムを書いてます。 いつ、ユーザーフォームを入力したのか、値は何だったのか、記録を残したくて、 今回、勉強しました。 【コード】 以下がコードです。ユーザーフォームがあり、そこにテキストボックスが２つ... -
プログラムを実行したら、ユーザーフォームを消す。【VBA】
【経緯】 ユーザーフォームを使って、プログラムを書いてます。 プログラムが出来上がって、実行したら、ユーザーフォームがそのまま残っているのが、 気になったので、 今回は、プログラムを実行したら、ユーザーフォームが消える仕様にしました。 【Unlo... -
値をセルにランダムで入れたい【VBA】
【経緯】 VBAでプログラム書いていて、 値をセルにランダムで入ったら、いいなと思い、 今回作ってみました。 【コード】 早速、コードです。Array()に値を入れたい所のセルを書いています。"mori"という値をランダムでArrayで指定したセルに入るようにし... -
ThisWorkbookで各sheetの操作をしたい。【VBA】
【経緯】 VBAでプログラム書いていて、 各sheetに同じプログラムを記入していた。 プログラムの量も多くなるし、仕様を変えるとき、Sheet全部を書き換えないといけなくなるので、めんどくさかった。 なので、今回はThisWorkbookにプログラムを書いて処理で... -
値を入力したら、カーソルが横に動く【VBA】
【経緯】 列の値を入力して、Enterキーを押すと、カーソルが下に動いていた。 カーソルが横に動くと、便利なことあるので やってみました。 【コード】 早速、コードです。B列の入力するととなりのC列にカーソルが動く、C列の入力するとＤ列に。。。。とい... -
メール送信自動化(Outlook)【VBA】
【経緯】 申請書をExcelで作ったあと、メールを送信していた。 宛先も本文も一緒なので、いちいちメールをコピペするのがめんどくさかったので、今回メール送信を自動化してみました。 【想定】 Excelで申請ファイルがあります。 Sheet1に申請のテンプレが... -
だれがファイルを開いているか知りたい【VBA】
【経緯】 共有サーバーを使っていて、 例えば、森が先にファイルを開いていて、 次に林が開いて、編集作業をすると不具合があった。 なので、今回それの解決した方法をつづります。 【設定】 設定は、 「森がファイルを開いてます。(見てるだけ) 次に林が...
