2013-01-01から1年間の記事一覧
よく忘れるのでメモ var h = document.documentElement.scrollTop || document.body.scrollTop; http://blog.alt-scape.com/archives/266 http://blog.alt-scape.com/archives/266
for(Map.Entry<String, String> e : map.entrySet()) { System.out.println(e.getKey() + " : " + e.getValue()); } http://d.hatena.ne.jp/yamama_lanchester/20080530/1212122258</string,>
"com.microsoft.sqlserver.jdbc.SQLServerDriver"の場合 Connection conn = コネクション作成します。 String SQL = SQL作成します。 Statement stmt = conn.createStatement(ResultSet.TYPE_SCROLL_SENSITIVE, ResultSet.CONCUR_UPDATABLE); ResultSet rs =…
Format(CDate("1868/12/31"),"ggge") →明治1年 Format(CDate("1868/01/01"),"ggge") →1868 http://www.accessclub.jp/bbs5/0033/vba10325.html
基準となるセルの位置から指定したオフセット分だけ移動 http://www.officepro.jp/excelvba/cell_range/index6.html Find検索 http://blog.livedoor.jp/katsuyausami/archives/51667888.html http://www.moug.net/tech/exvba/0050116.html Excelプロセスが残…
Function exRunMcrObj() 'xls の マクロを実行 On Error GoTo Err_exRunMcrObj Dim xls As Excel.Application Dim wkb As Excel.Workbook Dim sMDBName As String With CreateObject("Scripting.FileSystemObject") sMDBName = .GetFileName(CurrentDb.Name)…
Function GetXlData() As Boolean ' パス&ファイル名のエクセルデータを丸ごと読み込んで ' データ変換後 Access に取り込む。 GetObject() 使用。 ' Access側の既にあるテーブルに全て文字列フィールドとして格納。 ' 参照設定:Microsoft DAO x.x Object …