vba

まいどどうも今日もGD250ネタです。アプリのこの「ファイルを保存」ボタンを押すと詳細データ(ログ)がテキスト形式で出力されるんですね中身を開くとこんな感じぱっと見5レコードで1セットという感じ。んでこれをエクセルに出力するVBAマクロを作ってみました。動作はこんな感じこの出力結果から作ったグラフがこちらからこれはアプリから出力できる30秒ごとのログこっちから作ったグラフわざわざマクロ作ったけどこっちで十分ですな😅

先日、PCをWin10から11にアップグレードしたとき、Accessのマクロでエラーが出た。これは非常に厄介な問題だ。そもそも引数とは何なのか。指示をしたときにそれに符合したものを返してくる、ということらしい。引数とは何かを、関数と戻り値との関係も合わせて図解にしてみたプログラミング初心者が引っかかることが多い「引数」という単語。頻繁に使用される割には、説明がなくモヤモヤして先に進めなくなることは多いです。そこで、引数を図解で理解できるように解説していきます。naka

この記事では、AccessをExcelに変換する方法についての質問に答えます。この記事では、AccessデータベースをExcelファイルに変換する5つの代替方法について説明します。AccessデータベースからExcelスプレッドシートへの変換を支援する中で、私たちは最新のベストプラクティスを発見しました。ほとんどの場合、Accessはプライマリデータベースとして使用されます。ただし、Accessは非常に厳格であり、誰でも使用できるわけではないため、Acces

「Excelで翻訳作業をもっとスムーズにしたい！」「大量のデータを一括で翻訳する方法は？」「ExcelでGoogle翻訳を自動化するには？」「翻訳精度を高めるためにおすすめのツールは？」そんな疑問を持っている方に向けて、Google翻訳とExcelを活用する方法を詳しく解説します。さらに、作業効率を劇的に向上させる便利ツールやガジェットも紹介するので、ぜひ最後まで読んでください！Google翻訳をExcelで活用する3つの方法Goo

ファイルをコピーするSubtest()’ファイルをコピーするFileCopy"D:\test\B\A_210720-2.docx","D:\test\B\A_210720-2B.docx"EndSub実行結果コードのなか赤文字のところは、コピーもとのフルファイル名です。これに対して、青字のところは、コピー先のフルファイル名です。同じフォルダーにファイルをコピーする際、ファイル名を変更することが必要です。しない場合、もちろんエラーが出ます。それ

Excelシート内のセルに入力されている文字の一部だけを色を付けて表示したいことがあります。この点について、できる/できないことをまとめてみます。(1)手入力で設定下図のように、セルに入力された文字列の一部だけ色・フォントサイズ・太字など書式を変更することができます。これは、そのセルを選択し、セル内のテキストの一部だけを選び、その書式を変更するだけですね。少し前までは、一部の文字だけそのフォントを変更することはできませんでしたが、現在はフォントも他と変えることができます。また、

前回でテーブルの構成要素を検討しましたので早速テーブルの作成、フォームの作成と進みたいのですがその前にやるべきことがあります今回は「非連動フォーム」を利用しますテーブルにはデータ保護のために規制を設定しています連動フォームであればACCESS側で自動チェックされ問題なしですが「非連動フォーム」では自動チェックされませんそのためにフォーム自体にチェックする機能をプラスする必要があります機能を作成する時に必要なものがテーブル作成時に設定したさまざまな規制ですこの規制を明確化する

いよいよ、ネタも尽きてきたのですが過去投稿をみて漏れていたので追記しておきます。以前にエクセルVBAでOutLookを操作してメール送信する方法を紹介しましたがもう一つ、Windows標準装備のCDO(MicrosoftCollaborationDataObjects)を使ったメール送信方法です。他にも検索するとサンプルコードがありますがエクセルの神髄（エクセルVBAでメール送信（CDO))を参考にしました。OutLookと違って、設定の部分が必要です。メーラーに

10秒後にマクロを実行するSubtest()’10秒後指定マクロを実行するApplication.OnTimeNow+TimeValue("00:00:10"),"Greeting"EndSubSubGreeting()’挨拶のマクロ（実行対象マクロ）MsgBox"WellcomtoYokbali168"EndSub実行結果ApplicationオブジェクトのOnTimeメソッドで、指定時間後にマクロを実行

2次元配列で、別シートへコピペSubtest()'2次元配列で、別シートへデータをコピペDimDataDimr,cAsLongData=Sheets(1).Range("A1").CurrentRegion.Value'1次元の最大インデックスを取得(行)r=UBound(Data,1)'2次元の最大インデックスを取得(列)c=UBound(Dat

ChatGPT×ExcelVBA今回も「ChatGPT」を使って、どんな感じで「ExcelVBA」プログラムが作成できるか試していきたいと思います。ファイル操作6(ファイル名やフォルダ名の一括変更)今回は、ファイルやフォルダの名前を変更するプログラムを作成していきファイル名を一括変更①下のフォルダにあるファイル、「在庫表_1月」から「在庫表_6月」の6ファイルの名前を変更するプログラムを作成します。②内容としては、・セルB1に

はじめに野鳥写真をアメブロにアップロードするにはファイルサイズを３Mbまでに抑えなければならない。撮影したままの写真ではファイルサイズが大きすぎてアップロードできない。そこで自分はWindows標準ソフトである「ペイント」で開いて、サイズを調整して保存しファイルサイズを縮小させている。（下図例961Kb→301Kbに縮小）↓この作業を枚数分繰り返してブログにアップロードしているのだが枚数が多いとかなり手間だ。自動化できないものか。ということで、

microsoft365のアプリには当初からVBA（マクロ）が使えますアプリの機能,windowsの機能などを使うことができ、本格的な操作ができますしかし下記の状況で悪意のあるウイルスを混入できることから、デフォルトでは実行が無効になっています。SHIFTキーを押しながらアプリを起動するとマクロを起動させないことができます。開発でマクロのソースを見ることは可能ですが、プログラマでないと、どのような操作をするのかわかりません言語仕様が過去のもので、最新の言語と比べ見劣り作成者が素人なので

仕事でExcelマクロを書くことになった。VBE（ExcelのVBAエディタ）の使い勝手があまりよくないのでVSCodeで書けないか調べてみたところVSCodeの拡張機能あった。使い方よくわからないので、ググったところ詳しく解説してるブログを発見【VSCode】XVBAを使ってExcelVBA開発|とあるエンジニアの備忘録以前VSCodeのインストールを紹介しましたが、今回はVSCodeの拡張機能「XVBA」を紹介致します。XVBAVSCodeの拡張機能です。

今年最後のエクセル記事になると思います。以前にPowerAutomateDesktopからエクセルのVBAを実行するフローを紹介しましたがその逆ができないのか？既にあきらめていましたがPowerAutomateDesktopでフロー名を検索して実行するだけのマクロがあったので紹介します。PadFlowRun.exeをダウンロードして使用します。コマンドプロンプトは"C:\PadFlowRun\PadFlowRun.EXE""test1"だけです。一方でUI

昨日、twitterで見つけた記事↓をもとにして面白い表を作成しましたhttps://hamachan.info/win7/Excel/active.html勤務スケジュールが勤務者の顔を表示しながらダイナミックに動きます条件付き書式とVBAのSelectionChangeイベントを組み合わせて選択した行と列に色を塗るところは、上記のURLにある通りです。上の表は更に、２つの仕掛けを付け加えて”選択したセルにある名前”と対応する画像を表示できるようにしました詳細についてはこ

この度は当ソフトをダウンロードいただきありがとうございます。本プログラムはワークシート・ブックのパスワードをワンクリックで解除可能にするエクセルアドインソフトです。ダウンロードご自分が設定したパスワードを忘れた場合だけご利用ください。機能①ワークシートパスワードの解除機能②ワークブックパスワードの解除機能③ワークシートとワークブックのパスワード一括解除機能④オープンパスワードの解除※６桁以内の純英数字機能⑤VBAパスワードの解除※VBAパスワードを解除する際、そのファイルを開

今日は、簡単なExcelマクロを作成した。もっと効率の良い記述ができるといいのだが...*****************************************************************<オブジェクト名を取得する>*****************************************************************SubGetName()DimjAsIntegerj=ActiveSheet.CheckBox

RGBとは、色の表現方式の一つで、赤（Red）、緑（Green）、青（Blue）の配合比率を変化させて、すべての色を表現する方式です。Excelでは、RGB関数を使ってセルの背景色など色を指定することが多いです。今日は、セルの背景色などを、RGB形式で取得する方法を見てみましょう。セルの背景色（RGB）を取得するSubtest()’セルの背景色（RGB）を取得するDimmyRAsLongDimmyGAsLongDimmyB

VBAで元データ範囲の自動取得Subtest()'元データ範囲の自動取得DimmyRAsRange'A2を含むセル範囲を変数myRに代入SetmyR=Sheets(1).Range("A1").CurrentRegionEndSubSubtest2()'VBAでピボットテーブルを作成DimWSAsWorksheetDimPVCAsPivotCacheDim

DateSerial関数で月末月初の日付を指定Subtest()’DateSerial関数で月末月初の日付を指定'当日Range("A1")="当日"Range("B1")=DateSerial(Year(Now),Month(Now),Day(Now))'当月月初Range("A2")="当月月初"Range("B2")=DateSerial(Year(Now),Month(Now),

フィルタ可視セルのみを削除Subtest()'フィルタ可視セルのみを削除'警告や確認を促すメッセージを非表示Application.DisplayAlerts=FalseWithRange("A2").CurrentRegion.Rows("3:"&.Rows.Count).SpecialCells(xlCellTypeVisible).DeleteEndWithApplicatio

はじめに僕はX-TAを買ってコードの勉強をはじめてまだ数週間ですが、色んな方のサイトを拝見して勉強しました。こういった改造コードの解説サイトは充実しています。ではなぜ改めてまた書くのか？それは、そういった方々のサイトの内容で曖昧な部分があったり、食い違っている部分があるからです。この記事には自分が完全に理解した、もしくは成功したというものしか載せません。だから、よりわかりやすく、信頼のおける情報を書いていきたいと思います。基本用語の確認************まず、上のアスタリスクの

楽天RSS2に関するテクニカルメモです。まず前提として、自分は楽天証券のRSSをフル活用して2011くらいから株式相場で地味、かつ継続的に利益を上げています（専業）。プログラム知識は今一つ。そもそもPCにもあまり興味もなくて、よき道具として使えればそれで完結のタイプです。しかしPCの扱いがデイトレード技術の2～3割を占めるスキルであることは体感しているため最低限の勉強は趣味と思うようにして行っています。使用しているExcelのバージョンは2016です。株8プログラム6く

ShapointのList関連最終話Microsoft365アプリのListOfficeアプリのExcelお互いに連携出来たら便利皆さん、同じような事を考えるようです。ネットで検索するとExcelのテーブルをListへインポート逆にSharePointのListをExcelへエクスポートの作業が手動で可能です。う～ん、もっと便利に・Listの一部部分をExcelへ抽出・ExcelのデータをListへ追記こんな事が出来たらと思うでしょう。今のところ便利な機能は

「４時間のエクセル仕事は２０秒で終わる」ダイヤモンド社仕事に必要な部分だけを効率的に学べる本。エクセルには関数が500個近くあるそうですが実際によく使用するのは5つくらい。マクロも同様に9割は使わず1割の知識があれば会社の業務の9割以上をカバーできるようです。マクロの専門的な難しい内容が極力省かれ学んだことがない人でも簡単に操作できるよう学習用ファイルをダウンロードし操作しながら読み進めていくように書かれています。VBAがどんなものか短時間でかじれるので本格的なテキスト

とあるフォルダ下の全ファイル一覧が欲しくてdircmdをvbaから呼び出してみた。Sub大体こんな感じ()ConstCS_CMD="dirC:\Users\alice\bob\/b/s"DimsBufAsString,vAsVariantWithCreateObject("WScript.Shell").Exec("%ComSpec%/c"&CS_CMD)sBuf=.StdOut.ReadAl

こんにちは！給排水衛生・空調・消化設備工事のダイセツ工業株式会社です最近の雨はとてもひどく強風も続くので、梅雨という感覚がいまいち持てない今日この頃。地球温暖化で雨がどんどん降らなくなるのは怖いですが、豪雨が続くこともとても怖いことですよね。もう被害が拡大しないことを祈るばかりです。さて今回は、「Excelでの見積書作成をもっと便利にしてみたかったのでVBAとか使ってみた」という内容をお伝えしていこうと思っています！VBAとか高校以来全く手を付けておらず、かろうじ

ExcelVBAの開発タブのActiveXコントロールにて、非同期処理が実現可能なのをご存知だろうか?普通のフォームコントロールの場合、例えば、ボタンをクリックすると(MsgBox等を出すと分かりやすいのだが)、そこで一旦処理が止まってしまいますが、ActiveXコントロールの場合だと、ボタンをクリックして、MsgBox等を出していても、処理が同時並行で行われる事が有ります。ExcelVBAの場合、他の言語と比べると、コード記述上での並列処理というのは出来ないに等しいのだが、Act

フィルターで特定文字を含むデータを抽出Subtest()’名前に田を含むものを絞り込むRange("A1").AutoFilterfield:=1,Criteria1:="*田*"EndSub実行結果フィルターで特定文字を始まるデータを抽出Subtest2()’名前に岡を始めるものを抽出Range("A1").AutoFilterfield:=1,Criteria1:="岡*"EndSub