メンバーシップ

金欠くん

東大経済学部卒。初心者向けにマクロの記事を書いています。開発のご相談はTwitterま…

金欠くん

東大経済学部卒。初心者向けにマクロの記事を書いています。開発のご相談はTwitterまで。@_toushi__

メンバーシップに加入する

■なにをするサークルか VBAに関する悩み・相談を共有する場です。 ■活動方針や頻度 主にDiscord内で ■どんな人に来てほしいか どんな方でも歓迎ですが主に非エンジニア、日曜エンジニア向けです。 ■どのように参加してほしいか 自由にお時間あるときに参加してください。

  • ミニ

    ¥300 / 月

VBA | たまに使うシリーズ

並べ替え Call db.Range("A2:E400").Sort(Key1:=db.Range("B2"),Order1:=xlDescending) Call db.Range("A2:E400").Sort(Key1:=db.Range("A2"), Order1:=xlAscending) 数式をソートするとバグるので注意。ソートしなくて良い。 重複削除 db.Range("A1:E40000").RemoveDuplicates (Array(1, 2, 3,

金欠くん

    • VBAエラー一覧

      随時書きためていく所存。2021/5/26更新。 VBAのエラーが発生した際によくある原因を掲載しているつもりです。 変数が定義されていません。 変数が定義を定義してあげましょう。こんな感じで。 Forに対応するNextがありません。 Nextをつけてあげましょう。閉じてあげないとだめです。 0で除算しました 0で割るとこのエラーが出ます。 インデックスが有効範囲にありません マックスの値を超えて操作しようとした時に出ます。 今回だとbの配列は約100行しか確

      金欠くん

      • 適時開示をキーワードで検索、Excelに一括ダウンロードする方法

        東証の適時開示ですと30日分しか表示されないので過去分の適時開示をキーワード検索する際苦労します。 AppSpotというサイトから適時開示に含まれるキーワードが検索可能ですが、一覧でExcelに落としてさらにソートしたいときはAppSpotだけでは不可能。そこでマクロでExcelに落としてしまいましょう。 ※マクロ書けない方はExcelを直接ダウンロードも可能です(有料) 特にスクレイピングに関して禁止している文言はないので拝借します。 ■完成形セルD1でキーワードを

        300
        金欠くん

        • 【ショートカット】表示形式を日付に変更する

          Sub 表示形式を日付に変更() Selection.NumberFormatLocal = "yyyy/m/d"End Sub たまに発生するコピペしたら数字になっちゃった!って時に便利です。

          金欠くん

        VBA | たまに使うシリーズ

        金欠くん

        マガジン

        • 投資家向けマクロ集
          1本
        • マクロを使ったエクセル時短術
          4本

        記事

          【VBAスクレイピング】TDnetから適時開示を取得する

          東証のTDnet上にアップロードされる適時開示は日々たくさん提出されますがETFの日々の開示事項とか、全く知らない会社の適時開示とか見なくて良い情報もたくさんあります。 そこでスクレイピングを用いて、取得したい銘柄のみをピックアップするマクロを紹介します。特別なアドオンは不要&エクセルのみで完結します。 2020/12/24日実行時の画面(時価総額上位30銘柄をピックアップ) できること・約1か月前までの適時開示を取得できます。 ・１回の実行で取得できるのは１日分のみ

          300
          金欠くん

          【VBAスクレイピング】TDnetから適時開示を取得する

          金欠くん

          【Excel】全シートの目盛りを非表示にする

          マクロを使って全シートの目盛りを非表示にします。 コンサルの方は結構使う機会が多いようですね。 手順1 : Personalマクロを開くAlt + F11でエクセルのコード編集画面を開けます。 PERSONAL.XLSBがない場合はこちらから作成しましょう。 手順2 : コードを貼付けこちらをどこでもModuleはどこでもよいので貼り付けます。 Sub memori_sakujo()For Each s In ActiveWorkbook.Sheets Dim

          金欠くん

          【Excel】全シートの目盛りを非表示にする

          金欠くん

          Personalマクロを開く

          Personalマクロブックというのはマクロ保存専用のマクロブックです。 ・特徴 通常のエクセルブックとは違い開いても表示されません。エクセルを起動すると同時に立ち上がります。 ・メリット マクロは保存したエクセルブックを開いていないと使えませんが、Personalマクロブックは保存したマクロをショートカットキーに登録しておくことでどのエクセルでも使用することができます。(なんせずっと開いてるからね!) ・開き方 まだPersonalマクロブックにマクロを保存した

          金欠くん

          Personalマクロを開く

          金欠くん

          セルの色を一瞬で変えるショートカット

          何かチェックしたいときokとか入力するよりショートカットで色を塗る方が楽なシーンは結構あります。 今日はショートカットでセルに色を塗る方法を紹介します。 Ctrl + Shift + Gでセルに緑色が塗られます。 ・手順1 : Personalマクロを開く Alt + F11でエクセルのコード編集画面を開けます。 PERSONAL.XLSBがない場合はこちらから作成しましょう。 ・手順2 : コードを貼付け こちらをどこでもModuleはどこでもよいので貼り

          金欠くん

          セルの色を一瞬で変えるショートカット

          金欠くん

          【爆速】Excelの値貼付け

          Excelで値貼付けをショートカットで行うっていうのは結構ストレスじゃありませんか？Alt + E + S +Vでも可能ですが、このポップアップ邪魔ですよね そこでマクロを使ってポップアップが出ない、Ctrl + M だけで値貼付けができるようにしていきます。 小さな差ですが、ボタンを押す手間が省けると心が軽くなりますね..! ・手順1 : Personalマクロを開く Alt + F11でエクセルのコード編集画面を開けます。 PERSONAL.XLSBがない場合は

          金欠くん

          【爆速】Excelの値貼付け

          金欠くん