Excel VBA For Each…Next For Each … Nextで条件分岐したいとき③
前回のブログでフォーム表示ボタンをクリックするとユーザーフォームが表示されるところまで行いました。今回は指定したシートがあるか調べるために「ForEach…Next」を組み込んだコードがどの様に動作しているか確認したいと思います。1.ブレー...
管理人
Excel VBA For Each…Next 
Excel VBA For Each…Next For Each … Nextで条件分岐したいとき②
2023年9月の記事でForEach...Nextの使い方を書きましたが、実際にForEach...Nextを使用する場合どのようにプログラムの中に組み込めばよいのか悩まれている方も多いのではないでしょうか。そこで今回はExcelVBAで簡...
Excel VBA すべて ファイル名一覧を取得してハイパーリンクで開く
複数のフォルダーの中にあるファイル名(ブック名)を検索してファイル名を表示する方法を紹介します。検索したファイル名はエクセルシートのセルB2からセルM2の下にを表示されます、表示されたファイル名をクリックするとファイルを開くことができます。...
オートバイ CBX400F
CBX400Fインテグラのカウルを外してサービスマニュアルでフロントのライト周りの部品を注文して普通のCBX400Fにしました、ワイヤーハーネスはそのまま使用したのでライトケース内に収めるのに少し苦労しました。ノーマルのCBXとインテグラの...
Excel VBA For Each…Next For Each … Nextで条件分岐したいとき
ForEach...Nextで分岐処理したいときはFlag(フラグ)をつかうと分かりやすいコードが書けます、下のコードはブック内にSheet3があるかどうか調べるコードです。Subブック内からシート3を探す()DimSheetAsWorks...
Excel VBA ThisWorkbook.Path ThisWorkbook.Path
自分で作ったExcelマクロ有効ブック（.xlsm）から他のブックを開いて処理したいとき皆さんはどうしているでしょうか。ブックが保存してある場所によって「開くファイルの置いてある場所」+「ブックの名前」のうち「開くファイルの置いてある場所」...
機械加工 ワイヤーカットの加工速度について
コーナーRの制限が無い加工の場合は太いワイヤーを使用しましょう。0.25mmから0.40mmに変えると作業時間を半分に短縮することができます。ワイヤーの線径による加工速度の違いワイヤー径加工速度0.25mm1.70mm/mim0.40mm3...
ラジオ スカイセンサー5600
ソニーICF56001970年代にBCLブームというのがありまして、簡単いうと海外の日本語放送を高感度なラジオで聴いて放送局にはがきを送るとベリカードというカードをもらえるという、インターネットが発達した現在では何それ？と思うような趣味があ...
機械加工 てこ式ダイヤルゲージの測定子の製作
ドリルの振れを測定する「てこ式ダイヤルゲージ」の測定子です。通常の硬球付きのものですとドリルの刃先の振れを測定すると刃先が欠けてしまいます。樹脂ボール付きの測定子を作ってみました。＾＾
Excel VBA すべて エクセルVBAの学習方法
エクセルVBAの学習を始めたころ思ったことは、どうして上手くプログラムが組めるようにならないのだろう？という疑問でした。“技術の習得には1000時間(1日3時間で1年)ぐらいかかる”と世間一般で言われていますが本屋でExcelVBAの本を何...