[[20040615124656]]　『VBA：一番上でなく一番下に入れるには』（ＶＢＡのお勉強）　ページの最後に飛ぶ

『VBA：一番上でなく一番下に入れるには』（ＶＢＡのお勉強）

[いまＶＢＡを本で勉強中のものです。新しいデータをＳｈｅｅｔ２の一番上に書き加えていくやりかたとして

 Ｗｏｒｋｓｈｅｅｔｓ（”Ｓｈｅｅｔ２”）．Ｒｏｗｓ（”１：１”）．Ｓｅｌｅｃｔ
 Ｓｅｌｅｃｔｉｏｎ.ＩｎｓｅｒｔＳｈｉｆｔ：ｘｌＤｏｗｎ
 Ｗｏｒｋｓｈｅｅｔｓ(”Ｓｈｅｅｔ２”).Ｒａｎｇｅ(”Ａ１”).Ｖａｌｕｅ＝Ｋａｚ
 Ｗｏｒｋｓｈｅｅｔｓ（”Ｓｈｅｅｔ２”）．Ｒａｎｇｅ（”Ｂ１”）．Ｖａｌｕｅ＝Ｓｅｉ

とありますが、一番上でなく、一番下に入れるにはどうしたらよろしいでしょうか。おしえてください。]

 あなたはVBA を勉強する前に、

 全角（Ｗｏｒｋｓｈｅｅｔｓ）と半角（Worksheets）の違いを勉強してください。

 Sub test()
     rw = Selection.SpecialCells(xlCellTypeLastCell).Row
     'MsgBox rw
     Cells(rw + 1, 1).Value = Kaz
     Cells(rw + 1, 2).Value = Sei
 End Sub

 （kazu）

 おはようございます。
 見てて気になったので・・・

 >あなたはVBA を勉強する前に、
 >全角（Ｗｏｒｋｓｈｅｅｔｓ）と半角（Worksheets）の違いを勉強してください。

 もし質問者の方が初めてこういう場所へ書き込みを行った方だとしたら、
 上ような言われ方をされたら、かなりショックを受けるものと思われます。

 （kazu）さまは、ここの運営者なのですからできればもう少し言葉をお選びになった
 ほうがよろしいかと思います。

 確かにネット上では英数は半角が基本ですし、VBAでの記述も半角が条件です。
 質問者の方は半角だと相手が見づらいのではないかとの配慮からかもしれません。
 （会社などの資料で、上司から文字が小さくて見難いと怒られたことが多い私の憶測です）
 単純に『英数は半角での入力をお願いします。または、VBAは半角入力ですよ。』で
 いかがなものでしょうか。

 他意はございませんので、ご勘弁くださいm(_ _)m

 （川野鮎太郎）

 > ...初めてこういう場所へ書き込み...かなりショックを受けるものと思われます。
 > ...ここの運営者なのです...もう少し言葉をお選びになったほうが...

 うーーむ、たしかにその通りですね。 
 全角英字が以前から、気になっていたのでついこのような書き込みになって
 しまいました。
 反省します。

 （kazu）

質問者です。できました。ありがとうございました。Ｋｚａｕさま、川野さま、ありがとうございました。全角，半角については、変換が面倒なので全部全角にしただけで、なにも考えませんでした。ご注意ありがとうございました。

コメント返信：

[ 一覧(最新更新順) ]

[[20040615124656]] 『VBA：一番上でなく一番下に入れるには』（ＶＢＡのお勉強） ページの最後に飛ぶ

[[20040615124656]]　『VBA：一番上でなく一番下に入れるには』（ＶＢＡのお勉強）　ページの最後に飛ぶ