拡張子をみて保存形式を切り替えてくれる Dim vntFileName As Variant 'ファイルを保存するダイアログを開きます vntFileName = _ Application.GetSaveAsFilename( _ InitialFileName:=ThisWorkbook.Name _ , FileFilter:="エクセルファイル(*.xls),*.xls" &…

Flagsに4を指定 Const navNoReadFromCache = 4 ... objIE.Navigate "https://www.yahoo.co.jp", navNoReadFromCache なぜ4なのかはここの定義参照 typedef enum BrowserNavConstants { navOpenInNewWindow = 0x1, navNoHistory = 0x2, navNoReadFromCache = …

ギザギザしてるなーとおもったら こうじゃなくて canvas.drawBitmap(bitmap, matrix, background);こう //現在のセーブカウントを保持（カウント＝０） int count = canvas.getSaveCount(); //セーブ（カウント＝１） canvas.save(); //ResourceからBitmapを…

config_cmsd.js に config.allowedContent = true;を追記 ネタ元 http://cms.al-design.jp/phpbb/viewtopic.php?f=11&t=2569

#ifで Function GetExcelProcessBit() As String #If Win64 Then GetExcelProcessBit = "64" #Else GetExcelProcessBit = "32" #End If End Function

Function GetProcessBit() As String Dim colItems As Object Dim itm As Object Set colItems = CreateObject("WbemScripting.SWbemLocator").ConnectServer.ExecQuery("Select * From Win32_OperatingSystem") GetOSProcessBit = "32" For Each itm In col…

スタートアップはタスクマネージャに存在するネタ元 http://soft.livedoor.biz/archives/1543066.html

無料でアメリカやイギリスなどを経由して自分のIPアドレスを隠せるソフト「SafeIP」 http://gigazine.net/news/20130221-safe-ip/ Chromeの拡張でいいならなら Chrome Web Store - Stealthy https://chrome.google.com/webstore/detail/stealthy/ieaebnkibon…

Shared とつけるだけです。 Public Class config 'インスタンス化しなくて良いように共有メンバとして宣言する。 Private Shared _pdf_filename As String = "" 'PDFファイル名を格納します。 Public Shared Property pdf_filename() As String Get Return _…

無料版と有料版があるが、リンク切れチェックは無料版で十分。コメント化している部分もリンク切れチェックするなど余計なところもあるが、実用に耐えうる http://www.asterworld.com/ja/product/018/download.html