ChatGPTに 「エクセルのシート1のA1からE10のデータをＣＳＶファイルにし、メモ帳で開くＶＢＡコードを書いてください。」 とお願いしたところ、以下のコードを書いてもらいました。 Sub ExportToCSVAndOpenNotepad() Dim ws As Worksheet Dim rng As Rang...

自分用のメモ書きです。 A1セルに他ファイルのリンクが入った数式がある場合、そのリンクのファイルがあるかを判断するコードをChatGPTに書いてもらいました。 数式例は「='C:＼hogehoge＼soresore＼Sheet2'!B1」です。 Sub CheckLink() Dim cell As Range Dim...

タイトル通りです。 Ａセルの文字ごとに設定されている書式を、B1セルに反映させます。 （VBAは1回動作させると、元に戻せません。試される場合は、1回保存するなど、 やり直しのきく状態にしていただくことを強くおすすめします。） クラスを使いますが、大したことないですので、ご安心ください。 右クリックでクラスモジュールを...

Ｆ8キーで1行ずつ再生している時、途中をすっとばしたい、と思われることがありませんか？ そんな時は、移動したい行にカーソルを置き、「Ctrl＋F9」キーを押せばＯＫ牧場です。 但し、宣言行（Dim~ではじまる）にカーソルを置いて、上記ショートカットキーを押すと、エラーが出てしまいますので、それ以外の行にしてください。 ...

最近、やっとシグマが理解できるようになりましたので、備忘まで。 1+2+3+・・と表記の長いものを、シグマ記号ですっきり表せるのが便利です。 1+2+3+4+5を下記にシグマ記号で表しました。 ①の数値（この場合１）からはじまり、②（この場合５）で終わる。その間、1ずつ増やしながら足していきます。（iは別にkでもjでも...

VBAでセルに直接数式を入力するには、入力セルに「.value」か「.formula」を記入します（スピル関数以外）。 しなくても空気を読んでくれて、入力してくれます。 気をつけていただきたいのは、""の記入の仕方です。 外側でダブルクォーテーションをもう一度挟みます。 Sub test() Range("E1").F...

今日の日付とキーワード（この場合は「kuma」）が入ったファイルを開き、一番左にあるシートのA1セルの文字を、msgboxで表示するコードです。 このマクロを書いたファイルと同じ場所にあるファイルが対象です。 尚、ファイルを探す方法は、エクセルレジェンドの田中先生のマクロを参考にさせていただきました。 ファイルの一覧を...

変数の宣言、上でまとめてすれば便利だ！と思い込み、ずっとそうしてきたのですが･･･ わかりにくいんですよね。 結論から言いますと、使用する直前で宣言するのが良いようです。 実際自分でも試してみましたが、直前の方が分かりやすくて良かったです。 マクロの一部をコピーしたい時も、さっと一部を選択できるので、便利です。 以下、...