せっかく書いた ExcelVBAをいつでもどんな Excel ファイルにでも使えるように設定する方法の紹介です。3秒かかっていた操作を1秒に時間短縮(?)させて、ストレスも大幅軽減！10行以内の簡単だけど便利な、VBAコードも紹介します
********************************************** セリアで売っている車用曇り止めフィルムを試してみました。 貼り付けた翌日は台風のような天候だったので、その効果をすぐに確認できました。 満足度としては・・・ 50点かな。 その日は、夜19時ころ、家族を迎えに行くときに、雨が降り始めました。 「おっ、フィルムの効果を確認できる！」と思い、 ちょっと期待していたのですが・・・ しっかりと水滴が付きました。 フィルムを張っていないときと同じです。 滴り落ちることもありませんでした。 十数分後、雨は本降りとなり、豪雨となりました。風もすごかったです。 そんな…
Excel VBA の Name を使えば、コマンドプロンプトの Rename と同じように大量のファイル名を一括で変換できます。
【コマンドプロンプト】ファイル名をバッチファイルで一括変換 Rename
バッチファイルを作って、複数のファイル名を一括で変換する方法です。 大まかな手順としては 1．変換前のファイル名一覧を作成する 2．バッチファイルを作る です。 1．変換前のファイル名一覧を作成する 2．バッチファイルを作る 2－1－1Excel を使ってコマンドの記述を作成する（ファイル名にスペースがない場合） 2－1－2Excel を使ってコマンドの記述を作成する（ファイル名にスペースがある場合） 2－2 バッチファイルとして保存する 1．変換前のファイル名一覧を作成する 変換前のファイル名を一括で取得するには、以下をコマンドプロンプトで実行します。 dir /b >list.txt 詳細…
********************************************** 冬の時期、A/C を付けずに車をの暖房をつけると、 車内は暖かくなるけどガラスが曇ってしまう・・・ 曇ったらその都度拭いてみても またすぐにくもる・・・ 拭き筋も気になる・・・ 食器用洗剤で拭くと良い とあったので、 試してみたけど、効果があるとは思えなかった。 YouTube で、あまり費用が掛からない方法を試してみたけど、 どういうわけかうまくいかない・・・ あきらめて、これを試してみた ↓↓↓ 窓フクピカ 曇り止め強化タイプ【ソフト99 カー用品 曇り くもり フロント ガラス】 楽天で購入 で…
【Excel/VBAのこと52】Address と Replace
replace が使えるかも ってときは時々あるのですが、記述方法をいつも忘れてしまいます。（ジジイになったのかな？） address を使って備忘録的に書いておきます。
色を判断する関数は無く、Excelの機能でも、色を判断して、そこから次の操作をすることが難しいです。でも、ひと手間加えれば何とかできるかもしれないので、ちょっと考えてみました。。
【Excel/VBAのこと51】シートに添付ファイルを挿入する (マクロの記録で作る)
Excel のシート上にPDFなどのファイルを添付する機能があるのですね。 最近知りました。マクロの記録でどんな記述になるか調査してみました。
【Excelのこと09】3つのセルを比較する If, Excact, And/Or
3つのセルを比較したいとき、いつもは2つずつ比較していましたが、1回で3つのセルを比較する関数を考えてみました。
【Excel/VBAのこと50】Stop で for loop を一時停止させて debugする
For Loop で繰り返し処理を作成して、いざ実行してみると途中でエラーになることがありませんか？「Stop」 を使えば、指定した回数でループを一時停止させることができます。
ランニングにウォーキング、お散歩や近所へお買い物(?) にも便利なランニングポーチ。楽天週間ランキングから6つ集めてみました。
多くの男性のお仕事・・・少しでも楽にしたいですよね。メンズシェーバー 週間ランキングから6選を一覧化してみました。アラブの国の人たちみたいにヒゲがある方が「普通」にならないかなぁ・・・ ならないよなぁ・・・
令和5年4月1日から自転車に乗る人はヘルメット着用が努力義務とされたそうです。（おじさん4月になってから知りました・・・）ちょっと恥ずかしいかもしれないけど、 大事な命も守るためです。すてきなヘルメットを買って、みんなでかぶりましょう。
炎天下での作業やお出かけに、熱中症の予防に、便利な首掛け扇風機。楽天週間ランキングから首掛け扇風機に特化した商品6選を一覧化してみました。
扇風機の代わりに、冷暖房を効率よく使用できるように、 洗濯物の部屋干しの時に、便利なサーキュレータ 楽天週間ランキングTop6を一覧化してみました。
キャンプ、車中泊、普段使いにもなる寝袋。楽天 週間ランキングから上位6品を一覧化してみました。
風が抜ける傘 今回で3回目の購入です。 気に入っています。 強風に普通の傘で耐えるよりもずっと軽い力で耐えられます。
冬の寒い夜のジョギング、ランニングにはウインドブレーカーが必要です。 ネットショップを検索していると「サウナスーツ」というものを発見、購入。これはとても良い防寒着になりますね。
ドアノブに触れると バチッ って痛い静電気・・・ その対策です。 放電すればいいんです。 ある部分で金属に触れても痛くないんです。
雑記です。ダイソーのランニングポーチを購入しました。超簡単なレビューです。
【Excel/VBAのこと49】起動中のフォームのサイズを変える
作業中に起動したフォームのサイズを変更したいと思う時が時々あります。 調べたところ、起動中のフォームのサイズ変更は上級者でないと難しそうでしたので、知っている知識で対応してみました。
雑記です。マグネループが切断されてしまいました・・・捨てるのがちょっともったいなくて、クリップで補修して使っています。
【Excel/VBAのこと48】ミニツール セルテキストエディタ （セルに長めの文章編集）
セルに長文を書く時 Alt + Enter で改行します。 でも、押し忘れることも頻繁にあります・・・ なので、セル長文入力用編集ツールを作成してみました。これがなかなか便利でストレス軽減です！ Alt キーを押さなくてもいいのですから。
【Excel/VBAのこと47】連続で選択したセルの範囲だけ操作する（取り消し線の付いている文字のみ削除）
変更履歴として取り消し線で古い内容を残している資料には、取り消し線ばかりで、どこが最新で必要な個所かわからないものがあります。 そこで、取り消し線の付いている文字のみ削除するマクロを作成してみました。
【Excel/VBAのこと46】連続で選択したセルの範囲だけ操作する（行高 列幅の操作）
表をコピーしてそのまま別のシートに貼り付けると、行高、列幅が貼り付け先にサイズになってしまいます。小さい表であれば一列ごとにダブルクリックして修正してもよいのですが、貼り付け先のシートが包含上になっている場合には行、列を選択するのが非常に面倒です。
【Excel/VBAのこと45】連続で選択したセルの範囲だけ操作する（空白セルに色付け）
先日、資料を作成していて、完成後に確認していたら非表示の列の空白セルに灰色背景色を付け忘れていることに気が付きました。しかも、あちこちにあり、連続していません。 そこで、選択した範囲だけ対象にするマクロを作りました。
【Excel/VBAのこと44】セル、行列 いろいろな選択方法（Range, Cells, Rows, Columns, Selection, SpecialCells）
いろいろなセル、行、列の選択方法です。 私が良く使用する方法と使用頻度が低く、覚えていない便利な方法を備忘録もかねてまとめました。 マクロの記録で判別することもできますが、毎回それをやっているととっても面倒なので・・・
【Excel/VBA 05】Copy and Paste Value Macro
COUNTIF copy and pastevalue COUNTIF function can be used when calculating how many same date is exists or checking same data is no duplicated. However, this function makes your computer slow because it re-calculates every time the sheet is refreshed. This macro shows only the result of function.
【Excel/VBAのこと43】右から左へ読む言語を扱う（Unichar関数）
RTL言語（アラビア語やヘブライ語など右から左に読む言語）を Excel で扱う場合の設定などです。 アラビア語のみの単語や文章の場合には問題ないのですが、「مرحبا Excel」のように、英語が混在する場合、セルの表示と数式バーの表示が逆になることがあり、どちらが正しいのかわからなくなってしまいます。その解決方法です。
Online英会話 DMM 英会話を1か月受講した感想です。 せっかくの外国人と会話できる機会なので、フリートーク中心にして、教材を使って「勉強」という感じにはしませんでした。 世間話やお互いのことを知る時間と考えてレッスンしました。
【Excel/VBAのこと42】ひとつの列を複数条件でフィルタリングする
AutoFilter オートフィルターでひとつの列を複数条件でフィルタリングしたいときは下向き矢印をクリックして対象のデータのチェックマークを付けたり外したりすると、必要なデータだけ絞込ができます。この作業を自動化してみました。 仕事で最近よく使っていてとっても重宝しています。
Online英会話 DMM 体験レッスンの感想です。 今まで会ったことのないアフリカ人と中米の先生とレッスンしてみました。 発音や言い回しは日本人には聞き慣れているアメリカ英語で、ネイティブと会話している感じでした。
Online英会話 レアジョブ DMM Weblio ネイティブキャンプ 金銭的に少し余裕ができたので、オンライン英会話を始めようと思います。 費用を最優先に考慮して4件のオンライン英会話をピックアップして比較してみました。
【Excel/VBAのこと41】改行コード（Chr(10), Chr(13), vbCr, vbLf, vbCrLf）
改行コード Chr(10), Chr(13), vbCr, vbLf, vbCrLf 改行に関係するVBAのコードは5種類あるようです。 Cr・・・Carriage Return(キャリッジリターン）、Lf・・・Linefeed（ラインフィード） 違いは良く割らないのですが、vbCrLf を使っておけば改行されます。
雑記です。ちょっと奮発してエレコムのトラックボール M-DPT1MRBK を購入しました。￥7,000くらいしました。 このトラックボールのぼーるの直径は44mm で前から持っていたロジクールのトラックボールよりも10mm 大きいのです。私にはボールは大きいほうが扱いやすいと感じました。
【Excel/VBA】AutoFilter, Filtering For Blanks or Not Blanks
This macro filter for blanks or non-blanks by one click. I take "Split" function just I learned and array for this macro. You will see how to get the range of the AutoFilter, and this made my macro works on any Excel books
雑記です。在宅勤務が続いておなかにお肉がついてきたので、ストレッチと筋トレをはじめました。 ストレッチをしているときにふと、数の数え方に違和感を感じました・・・
【Excel/VBA】Select and Copy to The End Row LastRow/Selection）
You can select cells from the the first to the end if press Ctrl + Shift + Arrow key. However, if there is a blank cell or cells are merged, you cannot reach to the end. This macro reaches the end cell even if there are hundreds of blank cells or cells are merged.
PCにセキュリティソフトをインストールして、ウイルスの攻撃を防ぎましょう。 私の場合は Windows Defender から切り替わって動作も快適になりました。 マカフィー、カスペルスキー、ノートン、ESET 1年版で4000円くらい 安くはありませんが、試してみる価値はあると思います。 会社PCには必ず入っていますよね？
【その他】Web会議に便利な矢印作る（PowerPoint）and マウスポインターを大きくする
PowerPoint を teams で画面共有して「この資料のこの箇所が・・・」なんて説明するときに便利な「矢印」をワンクリックで表示できるマクロと、マウスポインターのサイズを10倍くらいの大きさにできる設定の紹介です。
【Excel/VBAのこと40】Web会議に便利な矢印をマクロの記録を使って作る
teams で画面共有して「この資料のこの箇所が・・・」なんて説明するときにプレゼンで使用するレーザーポインターみたいなものがあればなぁ って思ったので、ワンクリックで同じような役割をする矢印の図形をマクロの記録を使って作成しました。
【Excel/VBAのこと39】ミニツール シート名、色編集、隣のシートを選択
ミニツール シート名変更は ActiveSheet.Name シートの見出しの色変更は Tab.ColorIndex 隣のシートに移動するためにアクティブシートが左から何番目か取得する必要があります。 ActiveSheet.Indes でわかります。 シート名と色の変更を一度にできるツールです。
【Excel/VBAのこと38】ミニツール 見た目は同じ文字が入っているはずなのに・・・
2つのセルには同じ文字列が入っているのに、関数で調べると False になってしまう。 明らかに空白セルがあるのに、 Ctrl + 矢印キー を押しても、データの途切れで止まらず最後まで移動してしまう。 その場合には、見えないデータが存在しています。 その見えないデータをツールを通して可視化しました。
検索と置換のオプション機能をを使用してデータの更新と同時にそのセルに色を付けて更新箇所がわかるようにできます。置換機能だけでは空白に対して操作することができませんが、検索をしてからその検索結果を選択すれば色つきの空白セルに変更することができます。
雑記です。 電動歯ブラシを買いました。 以前使っていましたが、うまく使いこなせず、あきらめてしまいましたが、再挑戦です。 回転式と音波式の二刀流です。 高価なものを1点買いしなくてもエントリーモデルで違う特徴のあるものを使えばお互いの弱点をカバーしてくれる よね・・・
【Excelのこと07】VLookupの逆をやりたい（Index/Match）
Index関数とMatch関数を組み合わせれば、VLookup関数と同じ結果を返すことができるし、その逆、右の値から左の値を取得することができます。以前に同じ用の記事を書いたのですが、わからづらかったので、書き直してみました。
【Excel/VBAのこと37】ミニツール 大文字小文字を比較（UCase/LCase/Proper/Len）
大文字、小文字に変換するのに Upper, Lower 関数を使います。英語以外の言語の大文字、小文字を調べるのにいちいち余白を使って関数を書いて、調べて、削除するという作業がすごく面倒です。 VBAなら UCase, LCase を使って、ワンクリックで調べるミニツールを作りました。
【Excel/VBAのこと36】Excel で目の体操ゲーム作る
Excel で目のトレーニングになるマクロを作ってみました。 乱数で行と列の番号を決定して、そのセルを選択します。選択したセルを黒に塗ります。それを0.5秒間隔で実行します。 Application.Wait Now() + TimeValue("00:00:00") を使えば一定間隔でマクロを実行させることができます。
雑記です。 似ている格好なので、見間違いました。
通番を入力する方法です。 手入力、黒ハンドルをドラッグ or ダブルクリック、COUNTA関数、COUNTIF関数 で入力できます。 関数を使って通番を入力するときのポイントは指定範囲の先頭セルのみを固定することです。
Making Janken Game (Rock Paper Scissors game). This would be good exercise for VBA beginners. Macros will be introduced in this article. It shouldn't be difficult. I hope this helps your study.
Making Janken Game (Rock Paper Scissors game). This would be good exercise for VBA beginners. Userform, command buttons, labels, and option buttons. the macro is not so difficult. This could be the first step for cultivating your Excel skills.
【Excelのこと05】2つのセルを比較する（イコールで比較、Exact関数）
簡単に2つのセルを比較する方法です。 イコールで比較する、Exact 関数。 Exact 関数は大文字小文字を別物として判定しますが、イコールで比較する場合は、大文字小文字は同じものとみなされます。
【Excel/VBAのこと35】セルの書式を判別する（取消線、文字色、背景色）
(Font.Strikethrough, Font,Color Interior.Pattern)資料が更新されたとき、変更履歴も一緒に作成してくれると、どのセルが更新されたか判別しやすいのですが、作成していない資料も多いです。新しい版に取り消し線や、背景色を付けることで更新箇所を指定しているだけの場合もあります。セルの書式は関数だけでは判別できないので、VBAを使用します。
雑記です。 ギターの練習のし過ぎで手首が痛くなりました。 なので、手首サポーターをネットで注文。 本日到着。 痛みがあったのは昨日までで、今日はほぼ完治。 もっと早く買えばよかった・・・ でも、定期的に痛くなることがあるから、次痛くなった時の為に撮っておきましょ。
【Excel/VBAのこと34】最初の単語の頭文字だけ大文字にする（Left, Mid, LCase, UCase）
各単語の頭文字が大文字で表記されているセルを、先頭の単語の頭文字のみ大文字にして、残り部分はすべて小文字で表記するように修正しないといけなくなりました。 ひとつずつ修正していくには時間がかかりすぎる量があります。そこで、Left, Mid, LCase, UCase を使ったマクロでワンクリックで修正できるマクロを作りました。
雑記です。 ただいま 何もしたくない病 です。 週末の休みは生産的なことは何もしない。体も脳もうまく反応しない。 ただスマホのゲームをしてしまう・・・ でも、部屋を見渡してたら、新しい課題を発見した！ 来週末はこれをがんばろう。
雑記です。 新しいノートPCが欲しいです。 今のはまだ使えそうだけど、10年前ので、zoom の機能に対応できません・・・ 丁寧に使えばまだまだ現役で行けそう。 迷わず購入できるほどのお金持ちではないから、なんとかお得に手に入れたい。年末年始が勝負かな？
【Excel/VBAのこと33】ツールの背景を変える（Pictureプロパティ）
個人利用のツールを作成しても、会社で使用しているツールと同じように灰色一色だとちょっとつまらないと思いました。 自分一人しか使用しないツールなので、ツールの背景に画像を取り込んでみました。 そもそもカスタムツールなのにさらに、独創性が出たような気がしてちょっと嬉しい
雑記です。 YouTubeで「やる気を出す」というキーワードで検索して、幾つかの動画を視聴しました。 姿勢を正す、5秒ルール、作業興奮、目標設定などやる気を出すための方法を提案してくださっています。
【Excel/VBAのこと32】単純な作業でもマクロで自動化（Windows, Selection, PasteSpecial）
マクロはなにもツール化するためとか、複雑な作業を自動化するためだけに使用しなくても、いつもの単純作業を自動化することもできます。 コピー＞ファイル移動＞貼り付け この作業を自動化するだけでもかなりストレスや、指の負担を軽減することができます。
雑記です。 数年前からこの時期になると、指先が乾燥しまくって、干ばつが起こり、皮がはがれて、指が痛い・・・ 指紋が無くなるから、スマホの指紋認証が効かない・・・ 運転手さんのする白い手袋で保護するけど、暑いし、PCでタイプがうまくできないし・・・
Chrome の addin に Grammarly というものがあります。 Chrome 上で英文を記述すると、数秒で添削してくれて、適切な単語や冠詞 （a, the ）が必要なことを教えてくれたり、スペルミスも教えてくれます。 間違っている箇所に赤線で教えてくれるのですが、なんとなく MS Word とは違った印象があります。
雑記です。 見事に凸凹なアクセス数です。 毎日 これ見て一喜一憂していました。 なかなか大勢の人にアクセスしてもらえる記事が書けません・・・ いかん、どんどんネガティブになってしまう・・・
雑記です。 自室の模様替えをしました。 使っていない100ショップのプラの引き出しがあったので、活用しようと子供から引き取りました。 リメークシートとマスキングテープで自分好み、部屋や棚にマッチした色になって満足。
【Excel/VBA 03】Adjust Row Height and Column Width by One Click
You can adjust the row height or the column width by one click if you create the macros and add them to the Ribbon. Write the macro on the Personal Macro Book thus you can use them on any Excel files.
以前の記事で紹介した不要な列をグループ化するツールから、グループ化とグループ化を解除する部分を取り出しました。 単純に選択した行、列をグループ化するだけです。 そのマクロをリボンに登録して、いままでも少ないクリック数で作業完了できます。
雑記です。 自室の模様替えをしました。 5畳程度の狭い部屋です。 部屋の中央部付近にあった棚を壁際に寄せただけで、開放感が出ました。 すごく広くなった感じがします。
【Excel/VBAのこと30】ウインド枠の固定/解除をリボンに登録
仕事で使用している表は割と大きな表が多いです。 他人が作成した資料を参照するときには作成者の好みでウインドウ枠が固定されている場合があり、私には使いづらい時があります。 ウインドウ枠の解除＞再設定をクリックする回数を減らすマクロを作成してリボンに登録しました。
【Excel/VBAのこと29】AutoFilter 空白 or 空白以外で絞込み
AutoFilter の 空白セル or 空白セル以外を絞り込むマクロを作りました。 VBAスタンダードで学んだ、Split 関数、配列 も取り入れてみました。 また、AutoFilter の範囲を取得する方法も見つけたので、それも使っています。 どんな表にも使用できるマクロです。
【Excel/VBAのこと28】画面の拡大縮小ボタンをリボンに登録
画面の拡大縮小のマクロを作成してリボンに登録しました。 マクロを記録したら ActiveWindow.Zoom = 115 と記録されました。 倍率が決め打ちなので、動的に、+/- 5% ずつ変更できるマクロを作りました。 すでに、拡大縮小のボタンをリボンに登録できるように準備されているのですが、倍率の変化が大きすぎてちょっと使いづらいかも・・・
【Excelのこと04】なんかまた敗北感・・・データバーの表
前回、データバーという機能を使って、アクセス数管理表を作りました。 バーと同じセルに数値を表示させないように、好みのデザインに少しだけ改良しました。 バーを単色にして、文字色をバーと同じにしてと考えて改良してみました。 だけど、棒を表示しない というオプションがありました・・・ チェックマーク入れるだけで、私のより完璧に処理されました・・・ また負けた気分・・・
TOEICの長文に苦労している人は多いと思います。私もその一人です。 「お願いいたいします」を「お願い致します」だと（間違っていても）一瞬で認識するような技術を英文でも使えるようにするには、英語の記事をたくさん読むことだと思います。 ホテル、市役所などサイトの文章はTOEICに出てくる文章によく似ています。
【その他】フォルダ内のファイル名一覧作成（コマンドプロンプトとサクラエディタ）
コマンドプロンプトを使用して、ローカルフォルダのファイル名一覧をテキストに作成する方法です。 こうすれば間違ってファイル名を書き換えてしまう事故を防ぐとこができます。 サクラエディタを使用してもファイル名一覧を作成できます。
【Excelのこと03】データバーを使ってアクセス数 管理表を作る （ちょっと改良）
前回、データバーという機能を使って、アクセス数管理表を作りました。 今回は、バーと同じセルに数値を表示させないように、好みのデザインに少しだけ改良しました。 数値を完全に隠すためにデータバーの色を単色に変更しました。 グラデーションの方が好きなんですけど、しかたない・・・
【Excelのこと02】データバーを使ってアクセス数 管理表を作る
データバーという機能が条件付き書式にあることに気が付きました。 簡単に言うと横棒のグラフです。 これを使ってアクセス数を管理する表を作ろうと思います。 表を作る際に、日付の表示形式の指定、Text関数、条件付き書式を使って作っていきます。
【Excel/VBAのこと27】コピーして値貼り付けを自動化（CountIf解除/軽量化）
CountIf おなじデータの個数を計算したり、IDが重複していないかチェックするときに CountIf 関数が使えます。 シートが更新さるたびに再計算され、動きが重くなってしまいます。 そこで、その関数を外して結果だけにするマクロです。
【Excel/VBAのこと26】VBA から CountIf を実行する
CountIf おなじデータの個数を計算したり、IDが重複していないかチェックするときに CountIf 関数が使えます。 データ量の少ないシートで CountIf を使用する場合には問題ないのですが、1000行以上 x 数十列のシートに記述して、作業を続けると頻繁に再計算され、動きが重くなってしまいます。 そこで、マクロで計算して、結果だけ表示させるようにします。
Excel で ビンゴゲームの作成に挑戦です。 マクロの紹介です。 というか発表に近いかも・・前回作ったbingoゲームの使い方を書いておきます。 まぁ使い方と言っても難しくはないですけどね。 1回触ればすぐにわかります。
Excel で ビンゴゲームの作成に挑戦です。 マクロの紹介です。 というか発表に近いかも・・・今回は残りのマクロです。 番号が重複していないかチェックと、Bingoになったかどうかの判定マクロです。 知っている知識だけだから、どうしても長い記述になってしまいます。 でも、完成したから良しとしよう。
Excel で ビンゴゲームの作成に挑戦です。 マクロの紹介です。 というか発表に近いかも・・・今回はフォームではなく、シート上に作成しました。 カードは3つ。 どこで、いつ使うのか・・・それは置いておいて、私の自己学習です。For Next と Do Loop を使い分けて何とか「ちから技」で完成。です。
【雑記】ティバッグの紅茶 グッドアイデア？ それとも 横着？
雑記です。 ティバッグの紅茶を飲むとき、お湯を注ぐときに、お湯の勢いでティバッグが倒れたりしてついているひもがカップの中に入ってしまうことがありませんか？ そうならないための私のお気に入りの解決方法です。
雑記です。 英語の勉強のために毎朝Yahoo USA で記事を読むようにしています。 1記事読めるときもあれば、2段落でギブアップするときもあります。 今日見つけた記事で、私にとってはとても いい話 があったので、紹介します。
Excel で OXゲームの作成に挑戦です。マクロの紹介です。 というか発表に近いかも・・・ 残りのマクロです。 決定ボタン、勝敗判定マクロ、標準モジュールへの記述です。 何とか完遂することができました。 初級レベルにしては良くやりました。
Excel で OXゲームの作成に挑戦です。マクロの紹介です。 というか発表に近いかも・・・ モジュールレベル変数(更新)、まるバツフィールド、重複チェックのマクロです。 一部未開解決だった問題が解決できました。 フラグをいっぱい立てて、1と10で判定します。
Excel で OXゲームの作成に挑戦です。マクロの紹介です。 というか発表に近いかも・・・ モジュールレベル変数、フォームの初期化、リセットボタン、閉じるボタンのマクロです。 リセットはフォームの初期化と兼用して省エネです。
雑記です。 インターネットの接続が不安定なので、softbankの光BBユニット交換して、Buffalo のWiFi 中継器を購入しました。 なんの問題も無く設定、設置完了です。5G は飛んでこないけど、2.4G で安定接続です。 自分PC、会社PC、自分スマホ、家族スマホとタブレット複数台同時接続今のところ問題なしです。
Excel で OXゲームの作成に挑戦です。compが対戦相手で、Rndを使って乱数を発生させて、空いているフィールドの数字が出るまで loop させればなんとかなるかな。 勝敗の判定と、終了の判定が難しい・・・ 乱数が相手になるので、負けることがない、子供だましのゲームになるかな。
雑記です。 もう今夜は終わった・・・ 立ち直れない・・・ 無限ループになって、再起動して、いままでの作業がすべて消えた・・・ 直前でセーブしたはずなのに・・・嗚呼
雑記です。 ブログ村の順位の一個がゾロ目になってました！！！ なんてことないけど、ちょっと嬉しい。
【Excel/VBAのこと25】ツールを作る 列（行）を非表示にする応用編（Group）
指定した列以外をグループ化して非表示にするツールを作りました。 Group, ClearOutline, ColumnLevels:=1 こんなコードを使用します。 チェックボックスを使用して、非表示にしないオプションも付けました。基準列と比較列を隣同士に並べることができて楽に確認作業ができます。
【Excel/VBAのこと24】マクロの記録でコードを探す 列をグループ化する（Group）
基準となるデータの列があって、その列とその隣の列のデータを比較、確認する仕事があります。 2，3列隣であればよいのですが、5列以上先になると目が行ったり来たり・・・ 列をグループ化して不要な列は非表示にしてしまいました。 マクロの記録を使って簡単にコードを調べることができます。
【Excel/VBAのこと23】最終行まで選択してコピー（LastRow/Selection）
一列だけコピーしたくても、一行目がタイトルで、セルが結合されていると、全部の列が選択されてしまい、必要な列だけ選択できません。 また、500行以上あるとドラッグしても途中で手が離れてしまったり、行き過ぎてしまったり・・・必要な一列だけ選択してコピーするマクロです。
【Excel/VBAのこと22】セル内特定の文字列に色を付ける応用編（Characters）
セル内の特定の文字に色を付ける方法 応用編です。 Characters を使用します。 色を付けたい文字列がセルに入力されているか検索して、そのキーワードが存在すれば色を付けるマクロです。 フィルタリングしても同じ結果がでますが、行が非表示にされないので、周りのデータと比較できるメリットがあります。
【Excel/VBAのこと21】セル内特定の文字列に色を付ける（Characters）
セル内の特定の文字に色を付ける方法です。 Characters を使用します。 色を付けたい文字列だけがセルに入力されているれば、置換を使って一括処理ができるのですが、文章中の特定の文字のみの場合は置換は使えません。セル全部の文字が指定した色になってしまいます。
【Excel/VBAのこと20】リボンに登録 いつでも最終行に移動
セルを最終行に移動させるマクロです。 一行で書けます。 個人用マクロブックに書いてリボンに登録して、いつでも使えるようにしましょう。私は仕事で、3,000行くらいの Excel を扱うことがあります。 マウスのホイールでずーっとクルクルして一番下まで移動するのは大変です。
【Excel/VBAのこと19】リボンに登録していつでも文字数カウントできる
文字数をカウントする関数は Len() ですよね。 頻繁に使用する場面はありません。 でも、私の仕事では時々必要になります。 でも、いちいち関数を書くのは面倒なので、 一行だけの、すごく簡単なマクロでを作成して、リボンに登録して、いつでもポチッとして調べます。意外と重宝しています。
【Excel/VBAのこと18】ツールをつくる（任意の行にフィルタを設置するツール改）
前回作成した好きな行にオートフィルタを設置できるツールを少し改良しました。列番号を数字からアルファベットへの入力に変更。 テキストボックスのIME Modeをオフ。 そして、フォームが実行されていてもシートを操作できるように vbModeless を追記です。
先日、本を購入しました。 ネットで買うことが多いのですが、今回は本屋で買いました。 いろいろ考えて、本屋で買った方が安いから という結論に至ったのですが、落とし穴がありました・・・ 損はしていないけど、すごく負けた気分です・・・
サイトマップを作成して、固定ページに追加しました。 固定ページの作成方法を忘れてしまったので、ちょっと焦りました・・・ 少ないとは言え、100記事分のアドレスとタイトルの取得はひとつずつ手動だったので、結構大変でした・・・ でも何とか完成！ 過去の記事も見に行ってくださいね。
サイトマップを作成するにあたり、Excel で準備をしていこうと思います。 リンクの構文は 記事タイトル です。 これを100記事に対してやっていくとすごく大変なので、少しでも効率よく Excel 作成していきます。 ＆でつなげて作成します。
「ブログリーダー」を活用して、tuna-kichi さんをフォローしませんか？
指定した記事をブログ村の中で非表示にしたり、削除したりできます。非表示の場合は、再度表示に戻せます。
画像が取得されていないときは、ブログ側にOGP(メタタグ)の設置が必要になる場合があります。
********************************************** セリアで売っている車用曇り止めフィルムを試してみました。 貼り付けた翌日は台風のような天候だったので、その効果をすぐに確認できました。 満足度としては・・・ 50点かな。 その日は、夜19時ころ、家族を迎えに行くときに、雨が降り始めました。 「おっ、フィルムの効果を確認できる！」と思い、 ちょっと期待していたのですが・・・ しっかりと水滴が付きました。 フィルムを張っていないときと同じです。 滴り落ちることもありませんでした。 十数分後、雨は本降りとなり、豪雨となりました。風もすごかったです。 そんな…
Excel VBA の Name を使えば、コマンドプロンプトの Rename と同じように大量のファイル名を一括で変換できます。
バッチファイルを作って、複数のファイル名を一括で変換する方法です。 大まかな手順としては 1．変換前のファイル名一覧を作成する 2．バッチファイルを作る です。 1．変換前のファイル名一覧を作成する 2．バッチファイルを作る 2－1－1Excel を使ってコマンドの記述を作成する（ファイル名にスペースがない場合） 2－1－2Excel を使ってコマンドの記述を作成する（ファイル名にスペースがある場合） 2－2 バッチファイルとして保存する 1．変換前のファイル名一覧を作成する 変換前のファイル名を一括で取得するには、以下をコマンドプロンプトで実行します。 dir /b >list.txt 詳細…
********************************************** 冬の時期、A/C を付けずに車をの暖房をつけると、 車内は暖かくなるけどガラスが曇ってしまう・・・ 曇ったらその都度拭いてみても またすぐにくもる・・・ 拭き筋も気になる・・・ 食器用洗剤で拭くと良い とあったので、 試してみたけど、効果があるとは思えなかった。 YouTube で、あまり費用が掛からない方法を試してみたけど、 どういうわけかうまくいかない・・・ あきらめて、これを試してみた ↓↓↓ 窓フクピカ 曇り止め強化タイプ【ソフト99 カー用品 曇り くもり フロント ガラス】 楽天で購入 で…
replace が使えるかも ってときは時々あるのですが、記述方法をいつも忘れてしまいます。（ジジイになったのかな？） address を使って備忘録的に書いておきます。
色を判断する関数は無く、Excelの機能でも、色を判断して、そこから次の操作をすることが難しいです。でも、ひと手間加えれば何とかできるかもしれないので、ちょっと考えてみました。。
Excel のシート上にPDFなどのファイルを添付する機能があるのですね。 最近知りました。マクロの記録でどんな記述になるか調査してみました。
3つのセルを比較したいとき、いつもは2つずつ比較していましたが、1回で3つのセルを比較する関数を考えてみました。
For Loop で繰り返し処理を作成して、いざ実行してみると途中でエラーになることがありませんか？「Stop」 を使えば、指定した回数でループを一時停止させることができます。
ランニングにウォーキング、お散歩や近所へお買い物(?) にも便利なランニングポーチ。楽天週間ランキングから6つ集めてみました。
多くの男性のお仕事・・・少しでも楽にしたいですよね。メンズシェーバー 週間ランキングから6選を一覧化してみました。アラブの国の人たちみたいにヒゲがある方が「普通」にならないかなぁ・・・ ならないよなぁ・・・
令和5年4月1日から自転車に乗る人はヘルメット着用が努力義務とされたそうです。（おじさん4月になってから知りました・・・）ちょっと恥ずかしいかもしれないけど、 大事な命も守るためです。すてきなヘルメットを買って、みんなでかぶりましょう。
炎天下での作業やお出かけに、熱中症の予防に、便利な首掛け扇風機。楽天週間ランキングから首掛け扇風機に特化した商品6選を一覧化してみました。
扇風機の代わりに、冷暖房を効率よく使用できるように、 洗濯物の部屋干しの時に、便利なサーキュレータ 楽天週間ランキングTop6を一覧化してみました。
キャンプ、車中泊、普段使いにもなる寝袋。楽天 週間ランキングから上位6品を一覧化してみました。
風が抜ける傘 今回で3回目の購入です。 気に入っています。 強風に普通の傘で耐えるよりもずっと軽い力で耐えられます。
冬の寒い夜のジョギング、ランニングにはウインドブレーカーが必要です。 ネットショップを検索していると「サウナスーツ」というものを発見、購入。これはとても良い防寒着になりますね。
ドアノブに触れると バチッ って痛い静電気・・・ その対策です。 放電すればいいんです。 ある部分で金属に触れても痛くないんです。
雑記です。ダイソーのランニングポーチを購入しました。超簡単なレビューです。
作業中に起動したフォームのサイズを変更したいと思う時が時々あります。 調べたところ、起動中のフォームのサイズ変更は上級者でないと難しそうでしたので、知っている知識で対応してみました。
replace が使えるかも ってときは時々あるのですが、記述方法をいつも忘れてしまいます。（ジジイになったのかな？） address を使って備忘録的に書いておきます。
色を判断する関数は無く、Excelの機能でも、色を判断して、そこから次の操作をすることが難しいです。でも、ひと手間加えれば何とかできるかもしれないので、ちょっと考えてみました。。
