No.4ベストアンサー
- 回答日時:
tool_goo さん、こんにちは
そういう時は、Variant変数を定義し、Split関数で分割します。
改行コードを含んだ文字列が、変数HTMSTRに格納されているとして、
別途Variant変数 LINESTR を定義します。
Dim LINESTR As Variant
LINESTR = Split(HTMSTR, vbCRLF)
これで、LINESTRは、1行ごとの文字列が格納された配列として取り扱うことができます。
LINESTR(0) : 1行目の文字列
LINESTR(2) : 2行目の文字列 ・・・
改行コードが不明なので、上では vbCRLF と記載しました。上の例で上手くいかなければ
vbCR あるいは vbLF で試してみてください。
配列に格納されればあとは皆様の回答どおりに操作してください。
No.3
- 回答日時:
>変数に格納した値
これは具体的にどういう仕組み、場合に得られたものか、書いておくべきであると思う。
ーー
(1)3変数に入れた。例 INPUTBOXなどで受け入れた。
(2)配列に入れた
(3)シートのセルに入れた=>取り出し
(4)その他 (コピペ、他ファイルから、その他)
ーー
それらがよく説明されていないので答えにくいが
行を示すポインタの役割をする変数 i を使い
Sub test02()
i = 3
hensu1 = "AA": hensu2 = "BB": hensu3 = "CC" <--この部分は他の部分で終わっているのかも
Cells(i, "A") = hensu1
Cells(i + 1, "A") = hensu2
Cells(i + 2, "A") = hensu3
End Sub
A3,A4,A5セルにセットする例。
質問に疑問を持った点が十分説明されておらず、回答がしにくい。
まだこういう公のコーナーに質問するのは早すぎるのでは?
VBAの本を読んで例題をやってみて、少し経験を積んでそれから質問すべきと思う。
ーー
>変数に格納した値
AA
BB
CC
は1変数に上記データ(改行コード入り)がある場合(これならVBA中級でも質問する人が居るかも)と、3変数にある場合と考えられて表現が紛らわしい。
情報を小出しにするつもりではなかったのですが説明不足でした
まず変数に格納しているのはhtmlのソースです
エクセルから開いたページの改行コードCRLFで書かれたソースをセルに一行ずつ入力したいのです。
ソースを一行ずつ取得できれば問題はなかったのですが一気に取得するため
普通にセルに入力するとセルに内改行になってしまいます。
そのためこのような質問をしました。
長々と書きましたがやりたいことは
1変数に格納した可変のhtmlソースをセルに一行ずつ入力したいのです。
No.2
- 回答日時:
一例です。
配列 =Array("AA","BB","CC")
Cells(1, "A").Resize(UBound(配列) + 1) = Application.Transpose(配列)
No.1
- 回答日時:
たとえば次のように。
sub macro1()
dim a ’変数
dim i as long
a = array("aa","bb","cc")
for i=0 to ubound(a)
cells(i+1,"A") = a(i)
next i
end sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBA 検索と入力 Excel ブック ぶぶぶ シート ししし 列V 検索対象の列です 最終行は、お 6 2023/05/17 01:40
- Visual Basic(VBA) 顧客ごとに違う点検案内を作成するマクロ 4 2022/09/16 05:34
- Visual Basic(VBA) A列にある値をB列・C列にVBAで切り出し 3 2022/04/09 19:20
- Visual Basic(VBA) エクセルVBAについて 2 2023/01/31 16:21
- Excel(エクセル) 指定値をマクロで検索&シート移動 2 2022/04/27 23:29
- 日本語 読解力の質問です(Excel含む) 12 2022/08/02 13:25
- Excel(エクセル) 条件に合った数値の合計を表示させたい関数と条件指定の方法 3 2023/05/13 16:07
- Excel(エクセル) エクセルの自動更新のタイミングについて 1 2022/07/20 16:12
- Excel(エクセル) エクセル・セルに数式を入力してセル指定計算 2 2023/04/21 12:46
- Visual Basic(VBA) エクセルVBAについて質問です。 セルA1に"あ" セルB3に"い" セルC5に"う" と入力されて 2 2023/06/10 13:24
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
[エクセル]連続する指定範囲か...
-
Excelのセルの色指定をVBAから...
-
ExcelのINDEXとMATCH関数でスピ...
-
Excelのオートフィルタで抽出し...
-
[VBA]改行入りのセルの値を配列...
-
DataSetから、DataTableを取得...
-
array関数で格納した配列の型を...
-
Excel オートフィルタのリスト...
-
VBA listBoxについて
-
表にフィルターをかけ、絞った...
-
Excel VBA 配列の分割について
-
エクセルで、絶対値の平均を算...
-
VB6・Split関数・連続した空白...
-
csv形式のファイルを配列に...
-
【C#】二次元配列へのcsvファイ...
-
EXCEL VBA 2次元配列に格納さ...
-
.NET - 配列変数を省略可能の引...
-
配列のSession格納、及び取得方...
-
[マクロ]配列を区切り文字で変...
-
エクセルVBAで変数をセルに一行...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ExcelのINDEXとMATCH関数でスピ...
-
array関数で格納した配列の型を...
-
Excelのセルの色指定をVBAから...
-
[エクセル]連続する指定範囲か...
-
エクセルで、絶対値の平均を算...
-
VBA listBoxについて
-
表にフィルターをかけ、絞った...
-
VBA 配列に格納した値の平均の...
-
iniファイルのキーと値を取得す...
-
[VBA]改行入りのセルの値を配列...
-
配列がとびとびである場合の書き方
-
エクセルでエラーを無視して一...
-
DataSetから、DataTableを取得...
-
Excel オートフィルタのリスト...
-
Split関数でLong配列に格納する...
-
読み込みで一行おきに配列に格納
-
VB6.0 ファイルの一括読込み
-
SUMPRODUCT関数を用いた最小値
-
INDEX(D:D,L3)の意味は?
-
Dictionaryを使い4つの条件の一...
おすすめ情報