配列の勉強中です
1行目にタイトルが入っていて、2行目以降に値が入っているシートで、C列に"年"、D列に"月"、E列に"日"が入っています。
そこで、同じ行のA列にC〜Eの値を結合して「年/月/日」の表示にしたいのですが、配列を使うにはどう書けばいいでしょうか?
Sub Test()
Dim i As Long
Dim LastRow As Long
LastRow = Cells(Rows.Count, 2).End(xlUp).Row
ReDim MyArray(LastRow - 2, 3) As Variant
ReDim DayArray(LastRow - 2) As Variant
MyArray = Range("C2:E" & LastRow)
For i = 0 To LastRow - 2
DayArray(i) = MyArray(i, 1) & "/" & MyArray(i, 2) & "/" & MyArray(i, 3)
Next i
Range("A2:A" & LastRow) = DayArray
End Sub
探検
Excel VBA 質問スレ Part67
■ このスレッドは過去ログ倉庫に格納されています
91デフォルトの名無しさん (ワッチョイ cfcc-pPzt)
2020/06/30(火) 18:34:02.50ID:iUIa6Vpk0■ このスレッドは過去ログ倉庫に格納されています
ニュース
- 【米FRB】0.25%利下げ決定 3会合連続、雇用下支え [蚤の市★]
- 訪米認証「ESTA」、SNS利用情報の提出義務化へ 日本人観光客も対象に [蚤の市★]
- テレビ朝日本社から20~30代の関連会社社員とみられる男性が転落し死亡 六本木けやき坂通りの通行人にはけが人なし [少考さん★]
- テレビ朝日 本社から男性が転落し死亡。関連会社社員か 当たった通行人が左肩軽傷 [阿弥陀ヶ峰★]
- 「残クレ」でマイホーム、国が銀行向け保険 新型住宅ローン普及促す -日経 ★3 [少考さん★]
- 小島瑠璃子さん、代表取締役を務める会社を破産申請 [牛丼★]
- 福井県民の最大の罪は俺を神奈川に放流しちゃったこと
- 【朗報】VTuber、とうとうスパロボに参戦する
- スーパーカブでトコトコツーリングってのが流行ってるらしくてやってみたいんだがどれ買えばいいのかわからん:⁠'⁠(
- 高橋洋一、終わる [523957489]
- 毎日菊花茶飲んでたら美肌になったよ
- 粗品「南原が3億も貰えんの?」 [279254606]
