参照渡しを用いて、再帰的に処理を進める関数を作っていて、 型が違うエラーが出て、はまった対応のメモ。 ' 関数funcを参照渡しから値渡しにすると動くが、なぜかこのコードは動かない。 Sub ボタン2_Click() Dim val1, val2 As Integer Dim str As String …

お客のWindows7端末で、Javaを最新にアップデートしようとしたら、 エラーになってしまい、「なんとかして！」と言われて対応した時のメモ*1 オラクルのHPからインストールをするとエラーが出る。*2 手元にexeをダウンロードして、管理者権限で起動したがや…

月例会でバラバラに提出された報告資料を、総括ファイルにワンタッチでまとめるvba。 これで毎回ブックを開いて、シートのコピーをしなくてよいわけだ。 ' 同じ階層の、特定のエクセルファイルのシートを結合する ' このvbaで発生するいかなる問題に対して、…

サーバのアクセス件数を収集中に、新しいWEBアプリがリリースされたので、月例会資料に追加したが、 何も考えずに、追加したところ、、合計の後に追加されてしまった（汗） 凡例を選んでもダメだし、データ削除、新規作成も阿保なので、google先生に聞いてみ…

業務上、まったく関連のない複数のLANに対して、ノートパソコンを持って 行ったり来たりする中で、毎回手動で切り替えるのが面倒に感じたのでバッチを作成した。Windows7 Pro で動作確認した。 @echo off :: ＠ネットワーク切り替えバッチ＠ :: 便宜上、IPア…

:: 実行年月の１ヶ月前をYYYYMM形式で出力（バグあり） ::8月と9月の出力がおかしい ::デバッグ用 set DT1=201008 ::set DT1=%date:/=% set YYYY=%DT1:~0,4% set MM=%DT1:~4,2% ::ゼロ埋めするかどうか set FLG_ZERO=0 if "%MM%"=="01" goto NOT_ZERO if "%M…

::デバッグ用 set DT1=201108 ::set DT1=%date:/=% set DT1=%DT1:~0,6% set /a DT1-=1 set YYYY=%DT1:~0,4% set MM=%DT1:~4,2% if "%MM%"=="00" ( set /a YYYY-=1 set MM=12 ) echo %YYYY%%MM% pause