2014-01-01から1年間の記事一覧

ExcelVBAでカレンダー入力をする

意外なことにどのバージョンでもOKな標準コントロールがないみたい。以下で配布しているモジュールをインポートして使うといい感じ。 http://www.asahi-net.or.jp/~ef2o-inue/download/sub09_020_025.html

ExcelVBAのユーザーフォームを「Esc」キーで閉じる CommandButtonの CancelプロパティをTrue

ESCキーを押した時にCancel=Trueのボタンを押したこととして処理するみたいネタ元 http://vba.doorblog.jp/archives/51316717.html

ExcelVBAのユーザーフォームでフォームの閉じ方

ダイアログを後でも出したり、情報を取得する用事があるならMe.Hide もう用事なしならUnload Me ネタ元 http://www.asahi-net.or.jp/~ef2o-inue/vba_k/sub04_080.html

2014/12月の Office 更新プログラムインストール後、VBA でエラーが発生する

コントロールのキャッシュは手動で安全に削除する事ができるので、フォームを利用できる Office アプリケーションをすべて終了してから .exd ファイルを削除すれば、問題は回避できます。以下の手順で削除してください。また更新プログラムのインストール前…

【商用利用可】【無料素材】【著作権表示義務なし】写真・イラスト素材サイト

たまに使うhttp://matome.naver.jp/odai/2134253163241637501

ExcelVBAで存在するIEオブジェクトを探して根こそぎQuitする

Public Sub ie_quit() Dim objShell Dim objWindow Set objShell = CreateObject("Shell.Application") For Each objWindow In objShell.Windows If TypeName(objWindow.Document) = "HTMLDocument" Then objWindow.Quit Sleep 100 End If Next Set objShell…

.NETでJSONを扱える超軽量ライブラリ「DynamicJson」

C#

NuGetでインストールできるよネタ元 http://yuuxxxx.hatenablog.com/entry/2014/01/13/231500

C#でWebSocktを使う

C#

もともとHTML5の規格の一部だったのが独立したものらしい。 標準のライブラリはないので、なにか別なとこから持ってこないといけない。NuGetを使って「WebSocket4Net」というのを使ってみた。いい感じ ネタ元 http://kimux.lolipop.jp/?cat=3 そもそもWebSoc…

緊急!更新プログラムインストールしたらActiveXコントロールが動作しなくなったらコレアンインストールしよう!

Excel2007がKB2596927、Excel2010がKB2553154、Excel2013がKB2726958をアンインストール。 ネタ元 https://twitter.com/daccho_seines/status/542648986767609856

WordPressの自動バックアップ運用はプラグイン「BackWPup」で決まり

確かに便利。Free版でもDropboxにバックアップできるのがステキ過ぎる。ver3からかなり簡単UIになった様子。ネタ元 http://kyamamu.com/blog/wordpress-backwpup 復元方法は 解答したファイルを FTPを使ってサーバにアップします。 phpMyAdminからデータベー…

vb.netでIE操作時、ファイルのダウンロードボタンの押下する方法

消えると困るのでコピペ自分環境ではIE窓検索がうまく行かない&最終的に例外がでたけど押せるのは分かった。 Private Delegate Function D_EnumChildWindowsProc(ByVal hWnd As IntPtr, ByVal lParam As IntPtr) As IntPtr Private Declare Function FindWi…

vb.netでIAccessibleを使いたいときの設定

プロジェクトの右クリックメニューから追加>参照でCOMのAccessiblilityにチェックを入れ、Accessibility.IAccessible として宣言すると使えます。

特殊フォルダーのパスを取得するVBScript

vbs

Option Explicit 'ShellSpecialFolderConstants 'http://msdn.microsoft.com/en-us/library/windows/desktop/bb774096.aspx Private Const ssfDESKTOP = 0 Private Const ssfPROGRAMS = 2 Private Const ssfCONTROLS = 3 Private Const ssfPRINTERS = 4 Priv…

ExcelVBA・マクロを簡単に高速化する方法

VBA・マクロの先頭付近に次の3行を追加する : Application.ScreenUpdating = False Application.EnableEvents = False Application.Calculation = xlCalculationManualVBA・マクロの最後付近に次の3行を追加する : Application.ScreenUpdating = T…

VisualStudioのインストーラーでマネージドDLLをCOM登録させる設定方法

VS2010で確認。インストーラーに追加の際、「プロジェクト出力」にしないで「ファイル」にしてDLLを直接指定するとプロパティのRegisterの欄で「vsdraCOM」が指定できるので、それを指定。「プロジェクト出力」でやると「vsdrfCOM」しか選べないのだ。 んで…

VisualStudioのインストーラー作って .NET Framework のバージョンと一致するようにしてください。と怒られたら

「.NET Framework 起動条件 ‘.NET Framework 4 Client Profile’ のバージョンが、選択した .NET Framework ブートストラップ パッケージと一致しません。.NET Framework 起動条件を更新して、[必須コンポーネント] ダイアログ ボックスで選択した .NET Frame…

Excelのアドインをインストーラーを使ってインストールさせる方法

むりやりっぽいけど、 ユーザーの[Application Dataフォルダ] の中のMicrosoft\Addins\フォルダにコピーしてしまえばよい。EXEpressの場合 詳細設定の[解凍]タブの解凍設定で、デフォルト解凍先フォルダを指定するの基準フォルダを[Application Dataフォルダ…

.NET Frameworkのバージョンを整理する

XPだと4.0までネタ元 http://www.atmarkit.co.jp/ait/articles/1211/16/news093.html

Excelマクロ実行中にキーボード/マウスを受け付けなくする

Application.Interactive = False ネタ元 http://msdn.microsoft.com/ja-jp/library/office/ff841248%28v=office.15%29.aspx

ExcelVBAでファイル削除

Kill(pathname)ネタ元 http://www.openreference.org/articles/view/340

Excel:VBA:UTF-8/LFのファイルを読み込む

ADODB.Stream を使います。 Sub loadLogFile2(ByRef fileName As Variant) Dim rowNo As Integer Dim readString As String Dim st As Object Set st = CreateObject("ADODB.Stream") 'ADODB.Stream生成 st.Type = 2 'オブジェクトに保存するデータの種類を…

'BOM無しのUTF8でテキストファイルを作成する

'BOM無しのUTF8でテキストファイルを作成する Dim sw As New System.IO.StreamWriter("C:\test\1.txt") 'File.CreateTextメソッドを使った時は、次のようになる 'Dim sw As System.IO.StreamWriter = System.IO.File.CreateText("C:\test\1.txt") sw.Write("…

一時ファイル名の作成

csvなら string filename = System.IO.Path.GetTempFileName().Replace(".tmp", ".csv"); ネタ元 http://www.freeshow.net.cn/ja/questions/3e61271fbb8728cf42a021eaeb0e0c634976085026290f1c74781ed571fe872e/

Visual Basic .NET で WebBrowser コントロールをホストしてフォーム データをポストする方法

ExcelVBAからVB.NET移植でちょっと困った。VBAでは strHeaders = "Content-Type: application/x-www-form-urlencoded " & vbCrLf 'StrConv で 変換して、バイト型の配列に強引に入れる。 bPostData = StrConv("company=smbc&url=" & url1 & "&url2=" & url2,…

WordPress:手軽にアンケートフォームを設置できるプラグイン「WP-Polls」

カスタマイズも比較的カンタン。ネタ元 http://www.nxworld.net/wordpress/wp-plugin-wp-polls.html

フレッツ光 PR-500MI初期設定

フレッツ光ネクストギガビット対応ひかり電話ルータPR-500MIの初期設定方法。http://ezxnet.com/ntt/entry9933/

DLLにしたVB.NETのクラスで、親クラスメンバ変数の修飾ルールメモ

どのプロセスから呼ばれても、どの子クラスからも同じメモリ領域を参照したい→Public Shared どのプロセスから呼ばれても同じメモリ領域を参照したいが、子クラス別には分けたい→Protected Sharedネタ元 http://homepage1.nifty.com/rucio/main/kiso/Scope.h…

転倒防止シート(ゲルタックシート)のはがし方

転倒防止シートがはがしにくい場合 A 転倒防止シートで固定している家具等を水平方向にひねって下さい。※ガラス製品や壊れやすいものは、(B)の方法ではがして下さい。 床または家具に残った転倒防止シートをゆっくりひっぱってはがして下さい。 転倒防止…

ExcelVBAでコントロールキーを押されているかチェック

#If Win64 Then Private Declare PtrSafe Function GetAsyncKeyState Lib "user32.dll" (ByVal vKey As Long) As Long #Else Private Declare Function GetAsyncKeyState Lib "user32.dll" (ByVal vKey As Long) As Long #End If ... If 0 <> GetAsyncKeySta…

Windows 8 で WOL(Wake On LAN) を使う時の注意点

os

win8からはOSの設定も変ないとWOLできないらしい。ネタ元 http://plaza.rakuten.co.jp/mscrtf/diary/201308080000/