エクセルVBAについて次の２つの質問にお答えください。

Question

668

70pt

質問①
B1に入力されている文字列（例えば「東京」）とD1に入力されている文字列（例えば「品川」）の中間に「★」をつけてC2に入力（つまり「東京★品川」）するというマクロを作成してください。

質問②
ブック内にある最後尾のシートをアクティブにするマクロを教えてください。

回答の条件

※ 有料アンケート・ポイント付き質問機能は2023年2月28日に終了しました。

コメントはまだありません

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

回答リクエストを送信したユーザーはいません

きゃづみぃ · Answer 1 · 2007-10-11T07:19:08+09:00

①

Sub Macro1()
   Range("C2") = Range("B1") & "★" & Range("D1")
End Sub

これだけでいいのかな？

②

Sub Macro1()
   Worksheets(Worksheets.Count).Select
End Sub

たけじん · Answer 2 · 2007-10-11T14:25:40+09:00

機能だけなら、

FOR I=2 TO 65535

CELLS(I,3)=CELLS(I-1,2) & "★" & CELLS(I-1,4)

NEXT I

で①です。

が、C2に

=B1 & "★" & D1

と書いて、あと一列フィルしてもできちゃいますが。

②

ActiveWorkbook.Sheets(ActiveWorkbook.Sheets.Count).Select

で良いでしょうか

回答（2件）