へなちょこOLのおもちゃ箱

お題 constがカオス・・・ｗ 似たようなものがいっぱいあってごっちゃごちゃだから、まとめよう。 と思ったらちょっと罠があったので、メモ。 実装 ●定義 Public Type FileInfo     fileName As String     shtName As String     beginRow As Long &..

FULL OUTER JOINをやらなくてはいけない案件があって、せっせとSQLを書いてました。 実際のカラムはValしたりCdateしたりAsしたりと長いので、3カラムずつで。 1つのSQL文で書かなきゃいけないので、LEFT JOINとIS NOT NULLしたRIGHT JOINをUNIONすればいけっかなーなんて軽い気持ちで書いてて・・・ ※仕事のやつをそのまま載せるわけにはいかないので、てきとーに書いてます。 たぶん間違ってるけど、そこは突っ込まない..

突然の出会い ブックを開くときにフォームを表示する。 Private Sub Workbook_Open() 　UserForm1.Show vbModeless End Sub よくあるやつ。 いつも通りに書いて、ファイルを開きなおしたら Σ(ﾟДﾟ) なんで!? [OK]を押したら、そのままファイル閉じた・・・。 もう1回ファイルを開いたら、エラーは出ないけど、Excelのタイトルバーに、ファイル名[修復済み].xlsm..

依頼 ユーザーから、「緑の三角うっとおしい」って。 「数式は隣接したセルを使用しません」が出てるけど、「大丈夫だから。気にしないで」って言ってみたが、「消せるなら消してよー」 あ、ハイ・・・。 エラーインジケーター エラーインジケーターの操作は、 range.Errors.Item(引数).Ignore = Boolean 引数がわからないので、MSDNを開いたら・・・ https://docs.microsoft.com/en-us/of..

事件勃発 今まで問題なく回っていたのに、ある日突然、アプリケーション定義エラー 問題のコードはコチラ Sub test() 　With Range("A1").Validation 　　 .Delete 　　 .Add Type:=xlValidateList, _ 　　 Operator:=xlEqual, _ 　　 Formula1:=strFormula 　 End With End Sub .Addで出た なんでーー??? ..

お隣さんの悩み お隣さんからの質問。 「たまに、Excel起動するとすんごい縦長なんだけど、何とかならんかのぅ？」 とりあえず現象が起きたときに声掛けてってゆっといたら、その日のうちに遭遇。 こんなカンジだったｗ ※イメージです 　さすがに職場のスクショは撮れないので、家で再現しました 設定確認 [スタート]→[Excel]を右クリック→[その他]→[ファイルの場所を開く]→Excelを右クリック→[プロパティ] 実行時の..