Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

35652 / 76732

←次へ　｜　前へ→


	【46276】Re:配列文字列の列方向へのコピー

かみちゃん - 07/1/29(月) 14:21 -


	引用なし

	パスワード

こんにちは。かみちゃん　です。

>配列に格納されている文字列を、以下のように列の方向へコピーする

以下のような感じです。

Sub Sample1()
　Dim vntData() As Variant
　
　vntData = Array("あ", "い", "う")
　Range("K4").Value = vntData(0)
　Range("K8").Value = vntData(1)
　Range("K12").Value = vntData(2)
End Sub

Sub Sample2()
　Dim vntData() As Variant
　Dim lngRow As Long
　
　vntData = Array("あ", "い", "う")
　For lngRow = 0 To UBound(vntData)
　　Cells(lngRow * 4 + 4, 11).Value = vntData(lngRow)
　Next
End Sub

★次々とご質問されるのは、構いませんが、すでにいくつかコメントを差し上げてていますが
それらへの返答はないものでしょうか？

0 hits

▼

【46274】配列文字列の列方向へのコピー okitsun 07/1/29(月) 14:04