VisualBasic for Applicationsの略。 マイクロソフト社製の各Office製品に附属している、それぞれのアプリケーション（Excel、Accessなど）の操作に特化したVisualBasicの亜種。
csvファイルなどテキストファイルを読み込みするとき、1行目が項目行の場合、そこはインポートしなくていいんだけどな、というときがあります。特に、連続してcsvファイルを読み込みするときなど。 いつも、Line Input #1 とかでテキストファイルの読み込みをやってます。 で、もし項目行と判定できたら読み込みしない、とかしてました。 ふとネットでもっと良い方法をみかけたのでこれだ～採用～と思ったので、備忘録として記録しておきたくここに書きます。 この1組、2組、3組というファイル名のcsvファイルを読み込みします。 まず、こう書きました。 Sub Sample() Dim path As S…
CSVファイルをADOで扱う連載の16回目です。前回の記事はこちらになります。 hirocom777.hatenadiary.org 複数ファイルから読込む 前回は、ORDER BYを使った読込みデータの並べ替え方法をご紹介しました。読込みと並べ替えを一度にできると後の処理が便利です。 今までは1つのCSVファイルから読込んでいましたが、今回は複数のCSVファイルを色々な形で読込んでみようと思います。 今回もSQLを指定してCSVファイルを確認できるツール（CSV_ReaderSQL）を使います。ツールは以下からダウンロードしてください。 CSV_ReaderSQL110.zip - Goog…
今回は、Excelファイル内に、別のＥｘｃｅｌファイルの情報を読み込む方法について解説しています！ また、別のＥｘｃｅｌファイルはダイアログにより選択できるように実現しています！ 集計用ファイル(Excelファイル)にデータファイル(Excelファイル)を読み込むなど、色んな使い道があるかと思います！ では、早速解説します！ www.youtube.com こんな感じです！ 応用すれば、Excelファイル読込だけではなく、テキストファイルやCSVファイル読込にも活用できます！ 今回は、ダイアログを用いてファイル情報を取得する方法についての解説でした😊 こちらで配布しています！ it-yobi.…
先日から、円の中で円を転がす多重スピログラフに挑戦している。 infoment.hatenablog.com まとまった時間が取れない中で、さらに考えがまとまらず、結構な時間が 掛かってしまった。 今日も、前回の続きから。 横着して、今回はコメントを説明に代える。 Sub スピログラフ_2() Dim π As Double π = WorksheetFunction.Pi Dim r(1 To 4) As Long r(1) = 11 r(2) = 5 r(3) = 2 r(4) = 2 ' 円の分割数。 ' 36であれば、36点で円を描画する。点から点の回転角は360/36=10°となる。…
今回は、1枚のシートに書かれたタスク管理表を、自動で担当者ごとにシート分けする方法について解説しています！ 使い方はいろいろあります！ 例えば、 全員分のタスクをExcelに落とす際、 色んなシートを行き来するのが面倒… だけど、最終的には、担当者ごとにシート分けしたい… などです！ もちろん、こんな感じに分割できるよ！というのが分かれば、タスク管理表である必要もありません！ では、早速解説していきます！ www.youtube.com こんな感じです！ また、こちらで配布しています！ it-yobi.com という感じで、今回の内容は以上です！ では、引き続きよろしくお願いします！ また次回…
この記事の更新をもって、ブログの連続投稿が50日になりました🎉さすがに50日お付き合いいただいた方はいないと思いますが、 3日でも4日でもお付き合いいただいた皆様ありがとうございます(´∀｀) 今年のブログ更新数をみるとこんな感じで↓「4か月ぶりに更新をしたかと思ったら、その日から50日連続投稿」 というすさまじく極端な更新でしたね。 医療系がウィルスに振り回されるのはしょうがないのです。 当初は別に連続投稿を目標にしていたわけではないのですが、 10を超えたあたりで「せっかくだしやってみようかな」と思い立って、 50日間続けてみました。 100日は絶対無理なので、いったんここで区切りにして感…
知らずに落ちると抜け出せなくなるVBAの落とし穴です。 Findメソッドがうまくセルを見つけてくれない Findメソッドの検索オプションが勝手に変わる Findメソッドを使用したマクロが遅い あたりにお悩みの方は、この落とし穴に落ちていないかご確認ください。 Findメソッドはオートフィルターによる非表示セルを見つけられない Findメソッドはユーザーと検索オプションを共有する FindメソッドはMATCH・VLOOKUP関数より十数倍遅い まとめ セル範囲の検索に用いられることの多いFindメソッドさんですが、 実は「危ない＆遅い」の2大プログラミング罠要素を兼ね添えた、 結構な地雷メソッド…
今回は、住所と郵便番号を検索する最も簡易的な方法を解説しています！ その方法は、 郵便局のホームページから住所情報を取得し、 Excelにて管理するといった方法です！ 早速ですが、解説していきます！ www.youtube.com こんな感じです！ 簡単な関数だけで実現でき、Excel上でデータを保管できるので、 ネットに繋がっていなくても検索できるのが便利な点ですね！ 動画内で参考にした郵便局のホームページはこちらになります！ www.post.japanpost.jp ちなにみネット環境でしたら、ＡＰＩを活用するという方法でもシステムを作ることができます！APIの活用方法は少しややこしいの…
先日、数回にわたってExcelでスピログラフを再現してみた。 infoment.hatenablog.comこれを考え出すと、すぐに脳みそがオーバーヒートするので、今回は少し 時間をおいてみたのだが・・・現在、煮詰まってます。 とりあえず、今はこれで精いっぱい。次回に続きます。
インクリメント演算子とは、 i = i + 1 このコードを ++ i こうやって短縮表現するための演算子です。 他言語経験者の方にはおなじみの書き方ですね。 さてこの演算子をVBAで使用する方法ですが、 残念ながらVBAにはインクリメント演算子がありません。 流石に演算子を自作するのは不可能ですので、 自作の関数で無理やり代用しましょう。 Long型の引数を参照渡しByRefで受け取って、 1を足して返すだけでこの処理はできますので、関数はこんな感じになります。 Sub 十十(ByRef i As Long) i = i + 1 End Sub この関数を使えば、 i = 1 十十 i Ms…
本日VBA動作確認のため、2018年購入PCにようやくOffice2016をインストールした。 このPC、普通の量販販売モデルなのでOfficeもプリインストール製品であるし、なんなら購入時に設定しておくのが普通なんだろうが、我輩は当時「あ～別に今はいっかなぁ(´･ω･`)」とか思って設定しなかった。 それからしばらくして、やはり普通に考えてExcel使用できないのは不便なので、Officeを入れることに。 そのときにはすでに製品の空き箱は部屋の中でモノに埋もれている状況であったので、己の怠慢さに負け、前使っていたPC(今はLinuxとして生き返って親が使用中)のOffice2010をインスト…
業務システムと言えば帳票出力機能は欠かせないものですよね。今回はLaravelで扱いやすいdompdfとよばれる、pdf形式で帳票出力できるライブラリを使ってみたいと思います。 インストールについては、ググっていただければたくさんでてきますのでそちらを参照ください。 dompdfの便利なところはhtmlを読み取って、それをpdfにしてくれるというところです。 つまりはLaravelのbladeファイルとの相性がよく、コーディングもしやすいわけです。 線を一本一本引いたりする必要もないし、タグ操作でいろいろとできるわけですね。 さて、ここからが本題なのですが、htmlを作るのって簡単かといわれれ…
まえきんです！ 今回は日付が今年の何週目かを取得する方法 について学習しましたのでご紹介します。 日付がその年の何週目にあたるのかを調べるには、 Format関数の書式記号“ww”で取得することができます。 下記のように任意の日付をセルB2に入力した状態でマクロ実行ボタンを押下すると 以下のメッセージボックスが表示されます。 メッセージボックスにはセルB2に入力された日付が、2021年の何週目に あたるかの情報が表示されています。2021/10/23って43週目なんだ。 ・・・といった感じでこれだけのコードで調べられるとは、、便利なものですね！✨ 次回#154-1は「日付が今年の何日目かを取得…
1枚のシートに複数のデータを挿入し、一括印刷します。 ※テンプレートは、2ｘ6の12枚ラベルのみです。その他のレイアウトはユーザー側でシートを新規追加作成します。例)2ｘ4の8枚シート youtu.be
キャッチ画像には主語がないので何のことか分かりにくいと思います。 数日前に会社でVBAの勉強会を実施した際 雑談の中で「VBA自体は分かってきたのですが自分の仕事の中で使う事が出来ません」、「具体的にどうやって使ってますか？」という質問をいただいたことがありました。 これは勉強会が終わってからも定期的にいただく質問でした。皆さん悩んでいる様です。回答するという意味も込めて記事にしてみようと思います。 案件としてはVBA関連ですが関数を使う時、すべて手作業での仕事でも対策は同じです。 Excelで作業するうえではすべてに共通する対策となりますのでVBA分からない人も読んでみてください。 方法とし…
まえきんです！ 今回は時間を計算する方法について学習しましたのでご紹介します。 時間を計算するにはDateAdd関数を使用すると便利です。 下記のように任意の時間をセルB2に入力した状態でマクロ実行ボタンを押下すると 以下のメッセージボックスが表示されます。 今回はこの時間の1時間後を計算するマクロを考えます。 セルB2には2021/10/22 20:00がセットされています。 冒頭で登場したDateAdd関数は DateAdd(間隔, 数値, 時間) で構成されます。 引数の設定方法は以下の通りです。 引数1：間隔（h：時間、n：分、s：秒）👈今回は1時間後を計算するのでh：時間 引数2：数…
よく使うのはバッチファイル、VBA、SQLSERVER もう、毎日使っている 後、サクラエディタ、秀丸ファイラ、 5年ぐらい前なら、python, shellscript, postgresql で、accessはダメだとか、sqlserverはどうとか言う人に限って、、
「IoT」「AI」「5G」「ビッグデータ」「VR/AR」といった新技術の登場による第4次産業革命のまっただ中でのコロナ禍。産業界では、デジタルトランスフォーメーション（DX）への取り組みが本格化、あらゆる業種でITスキルを持つ人材ニーズが高まり、また優秀な文系出身者が手に職をつけようとITエンジニアを目指す例も増えています。当メディアを運用する（株）エスユーエスもその例にもれず、文系新卒向けに開催している説明会は常に大盛況。このような中で、理系出身エンジニアがしっかりと稼いでいくために、今から身につけるべき力とはどのようなものなのでしょうか？ 目次 文系出身エンジニア増加の背景に、IT人材への…
まえきんです！ 今回は和暦に変換する方法について学習しましたのでご紹介します。 日付の西暦を和暦に変換するには、#149👇でも登場したFormat関数を使用します。 【Excel VBA学習 #149】日付から曜日を取得する Part3 - まえきんブログ (hatenablog.jp) 下記のように任意の日付をセルB2に入力した状態でマクロ実行ボタンを押下すると 以下のメッセージボックスが表示されます。 Format関数はセルに表示形式を設定した結果を返す関数です。 [セルの書式設定]ダイアログボックスで使用する書式記号が使えます。 今回のVBA学習では西暦を和暦に変換する際に使用する 以下…
EXCEL VBAを使いたくなりました なぜって、EXCELの大量のSQL全文をWORDの表に貼り付ける必要があるからです。 SQL全文を200個も貼り付けしてたら、虚しくなります。 Excel VBAは、20代の時にちょっとかじった程度で、もう色々忘れているので、思い出すためのメモ。 参考にしたサイトはこちら。 tonari-it.com EXCEL VBAを始める準備編 EXCELに開発タブを表示する オプションメニューで[リボンのユーザ設定]を選択後、「開発」にチェックをしてOKする EXCELに開発タブが表示される VBEを起動する 開発タブメニューから「Visual Basic」をク…
東京商工会議所では、新型コロナウイルスが感染拡大する中、企業での対策に活用できる情報として、産業医有志グループ（※）より提供される「企業向け新型コロナウィルス対策情報」を配信（不定期）しております。 （※）本対策情報は、産業医有志グループ（今井・櫻木・田原・守田・五十嵐）が作成し、厚生労働省新型コロナウイルス対策本部クラスター対策班・和田耕治先生（国際医療福祉大学・公衆衛生学教授）のサポートも受けたものです。詳細は本ページ下部の「文責」をご覧ください。 ※本内容は2021年10月15日に配信されたものです。経営者・総務人事担当者のみなさま、日本でワクチン接種が進み、接種歴に基づく行動制限緩和も…
個人用の記録と愚痴です。2019年に担当した新人研修、自分がいない日に、いろいろ問題をおこしてくれちゃった課長氏が代理でVBAプログラミングの成果物についてレビュー指摘を出してしてくれました。しかし、内容があまりにあまりだったので、後追いで新人にメッセージを書いてフォローすることに。その時に出したメッセージが発掘されました。消すのもなんなのでメモしておきますw登場するSさんについては既に4月の時点でいろいろとマズい達周りが目立っており、新人達もなんとなく違和感を抱えていました。Sさんを非難するような文章になっているのはそのためです（あまり良い事ではないのですが）。 送ったメッセージ Sさんから…
まえきんです！ 今回は月末の日を取得する方法について学習しましたのでご紹介します。 今回はある月の月末日を調べてみましょう。例えば、今月10月の 月末は2021/10/31です。それにはDateSerial関数で翌月1日のシリアル値を 取得し、そこから1を引く形で月末の日を算出します。 下記のように任意の日付をセルB2に入力した状態でマクロ実行ボタンを 押下すると以下のメッセージボックスが表示されます。 想定通り、月末の日が取得できました！ ピンポイントで求めたい情報や関数がなかったとしても このように考え方ひとつで求めたい情報に辿り着けるのは プログラミングの面白いところですね😊 次回#15…
papasensei365.com
qiita.com
earningmoney.hatenablog.com
www.excelspeedup.com
www.officepro.jp
risa.hatenablog.com
forest.watch.impress.co.jp
atmarkit.itmedia.co.jp
nattou-curry-2.hatenadiary.org
