管理人

Excel VBA すべて

フォルダ名とファイル名とセルの値を取得しハイパーリンクで開く

複数のフォルダーの中にあるエクセルのファイルを検索してフォルダ名、ファイル名、セルの値をエクセルのシートに表示します。フォルダ名はエクセルシートのセルA2から下に、ファイル名はセルB2から下に、セルの値はC2から下に表示されます、表示された...
Excel VBA すべて

ファイル名とセルの値を取得しハイパーリンクで開く

複数のフォルダーの中にあるファイルを検索してファイル名とセルの値を表示します。検索したファイル名はエクセルシートのA列のセルに表示し検索したセルの値はB列のセルに表示されます、表示されたファイル名をクリックするとファイルを開くことができます...
Excel すべて

Excelでフローチャート作成

仕事の作業手順の作成やExcelVBAのプログラムの動きの確認にフローチャートを利用したいと思っている方は案外多いのではないでしょうか。私も年に数回ほど仕事の流れを確かめたいときや後輩に仕事を教えるときなどにフローチャートを利用しています。...
Excel VBA For Each…Next

For Each … Nextで条件分岐したいとき③

前回のブログでフォーム表示ボタンをクリックするとユーザーフォームが表示されるところまで行いました。今回は指定したシートがあるか調べるために「ForEach…Next」を組み込んだコードがどの様に動作しているか確認したいと思います。1.ブレー...
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...