[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。
http://www.digidigiday.com/digidigi/dgbrand/dgbrand.html
F2でリネームする際に、拡張子を除く部分を自動で選択してくれる
さらにF2で拡張子のみも選択できる。
3Dフリップ
http://tokyodownstairs.blogspot.com/2007/12/winflipjapanese.html
もうほとんどブログではなくオンラインメモ帳として機能しているオイラのブログ。
今日もまたメモ書きです。
行選択
rows("4:4").select 4行を選択
rows("1:4").select 1~4行を選択
列選択
columns("C:C").select C列を選択
columns("A:C).select A~C列を選択
変数使ってセルの選択
Dim retu1 As Integer
Dim gyou1 As Integer
Cells(retu1,gyou1).Selet
選択したセルから数値分離れたセルを選択
ActiveCell.offset(3,5).Range("a1").Select
アクティブのセルからカーソルキーを下に3回右に6回押した位置
sumifを変数を入れて使ってみる
Dim hensu1 As Integer
Dim hensu2 As Integer
Dim hensu3 As Integer
Dim hensu4 As Integer
ActiveCell.FormulaR1C1=
"=SUMIF(R[" & hensu1 & "]C[-2]:R[" & hensu2 & "]C[-2],""名前"",R[ " & hensu3 & "]C[-3])"
ダブルクォーテーションで囲まれた範囲は文字列として認識される。&を使い文字列結合して式を完成させる。
上記のSUMIFの場合
ActiveCell.FormulaR1C1= (アクティブセルに式を入れる(.Formula))
"=SUMIF(R[" 【文字列】
&
hensu1
&
"]C[-2]:R[" 【文字列】
&
hensu2
&
"]C[-2]," 【文字列】
"名前" 【文字列】
",R[ " 【文字列】
&
hensu3
&
"]C[-3])" 【文字列】
となる。
あれ、文字列文字列文字列があるが。
とりあえずは変数は文字列として代入すると計算されないので
””の外に書けば動く。
http://www.kashim.com/eve/
HTML自動補完してくれるし、文法チェックしてくれるし、軽いし。
設定しないでも自動でそういうのやってくれるのがいい感じ。
作った人、ほめてつかわす。あっぱれあっぱれ。