2010-09-08から1日間の記事一覧

2010年09月08日のツイート

@shikaku_t: カーソルの今いる位置を返す URL2010-09-08 13:38:06 via Hatena @shikaku_t: 2つめのシートを選択(アクティブに)する URL2010-09-08 10:44:49 via Hatena @shikaku_t: レンタルサーバー借りるなら、キャンペーン待ちしたほうがいいよ URL2010-0…

レンタルサーバー借りるなら、キャンペーン待ちしたほうがいいよ

『他社サービスよりお引越しの方』対象初期費用半額キャンペーン!!〜2010年9月14日(火) 利用中のロリポップがまたキャンペーン中。 こんな頻繁にキャンペーンしてるのに なんで正規の値段で借りちゃったんだろうなと後悔する。 なにやら『コロリポプラン…

2つめのシートを選択(アクティブに)する

ActiveWorkbook.Worksheets(2).Activate ネタ元 http://www.happy2-island.com/excelsmile/smile03/capter00401.shtml

カーソルの今いる位置を返す

ActiveCell.Row 現在選択しているセル(カーソルがいるセル)の行番号 ActiveCell.Column 現在選択しているセル(カーソルがいるセル)の列番号 ネタ元 http://www.happy2-island.com/excelsmile/smile03/capter00701.shtml

選択している行/列の数を返す

Selection.Rows.Count 現在選択している範囲の行数 Selection.Columns.Coun 現在選択している範囲の列数 ネタ元 http://www.sanynet.ne.jp/~awa/excelvba/kouza/chapt_02/009.html

数字を文字列化 & 余計なスペース削除

dim number number = 123 dim number_s number_s = Trim(Str(number))Str()だと符号用のスペースが付く。 Trim()は左右の全角半角空白を削除してくれるネタ元 http://homepage2.nifty.com/sak/w_sak3/doc/sysbrd/vb_k06.htm

セルの値を取得

○○.Valueネタ元 http://tuevin.jugem.jp/?eid=45

新規でシート作成

一番後ろに追加している Worksheets.Add after:=Worksheets(Worksheets.Count)ネタ元 http://www.moug.net/tech/exvba/0040018.htm

シートを削除する

Activesheet.Deleteネタ元 http://officetanaka.net/excel/vba/sheet/sheet04.htm

現在の日時を得るならNow 日付だけならDate 時間だけならTime

メモ

フォルダの作成

Sub MAKE_DIR(strDIRNAME As String) 'ディレクトリ名 フルパスを受け取り、作成する。 'いきなりMKDIR関数で作ると、重複時にエラーが発生するので、 'DIR関数でディレクトリ(フォルダー)の存在をチェックする。 If Dir(strDIRNAME, vbDirectory) = "" Then…

SaveAsメソッドでテキストファイル保存すると書式が変更される

日付の書式がm/d/yyに変わってしまう。どーもおかしいと思ったら、そういう仕様のようだ。 SaveAsメソッドでテキストファイル保存すると書式が変更される Microsoft Excel 2002以降なら、SaveAsのLocal 引数に True を指定すると、思い通りの形式で 保存され…

アンジェラ・アキを見た

川崎ラゾーナでミニコンサートやってた。アルバム発売日だったのですね。けっこうサッパーンとくる(聞いたことある感がある)曲が多いです。LIFE(初回生産限定盤)(DVD付) アンジェラアキ