- ベストアンサー
エクセルVBAで変数をセルに一行ずつ入力したい
mu2011の回答
- mu2011
- ベストアンサー率38% (1910/4994)
一例です。 配列 =Array("AA","BB","CC") Cells(1, "A").Resize(UBound(配列) + 1) = Application.Transpose(配列)
関連するQ&A
- エクセルのセル分けについて教えてください。
エクセルで、1つのセルに aa,"bb","cc,"dd","ee" というように入力されています。 それをaa bb cc のようにそれぞれのセルに分けたいのですが、方法が分かりません。 ご存知の方がいらっしゃいましたら、教えてください。宜しくお願いします。
- ベストアンサー
- オフィス系ソフト
- splitを使って、コンマ区切りで変数を出したいです。
こんにちは。 いつもお世話になっております。 データファイルを開き、一覧を $all_dataに入れました。 その後、 ($aa,$bb,$cc) = split(/\,/,$all_data); と書いて、変数$aa $bb $cc へ入れたいのです。 3個程度の変数に格納するのは、問題なく出来たのですが、 ($aa,$bb,$cc)を、($aa,$bb,…36個)の変数で指定した途端 $all_data の最後のデータのみ$aa $bbに入り、その後の $cc以降の変数は、空白となってしまいました。 一覧を、$all_dataに入れた後、print で一覧を出してみたのですが、 あいう,えお,かき,くけこ,…<略>… と、36個の文字が,で区切られて出てきました。 何が悪いのか判らなくて、途方にくれております…。 split を使って36個もの変数に直そうとするのが 間違いなのかな、と思って @array = split(/\,/,$all_data); として、 $aa = $array[0]; $bb = $array[1]; としてみたのですが、$all_dataの最後と、最後から 二つ目のデータが$aa $bb に入り、$cc 以降は 空白となってしまいました……。 どうか、ご指導よろしくお願い申し上げます。
- ベストアンサー
- Perl
- エクセルのVBAを使って、セルの値の検索をしたいと思ってます。
エクセルのVBAを使って、セルの値の検索をしたいと思ってます。 ですが、cells.findのように、アクティブセルが移動することなしに、値のみを取得し、変数に格納したいと思っていますが、どうすればよいか、見当がつきません。 繰り返し構文を使えば、検索はできますが、それだと、無駄に重くなりそうなので、何か良い方法はありませんか?
- ベストアンサー
- オフィス系ソフト
- エクセルファイルのセル値に特定文字列を追加して別ファイルに
VB2008でのプログラム方法についての相談です。以下の手順を実現したいです。 (1)エクセルファイルのあるセル中にあるデータを取得 例)A1セルの値"AA"、A2セルの値"BB"、A3セルの値"CC"..... (2)決まりきった特定文字列と(1)の値を結合 例)くっつけたい文字列 " "+AA ⇒ くっつけたい文字列"AA" くっつけたい文字列 " "+BB ⇒ くっつけたい文字列"BB" くっつけたい文字列 " "+CC ⇒ くっつけたい文字列"CC" (3)テキストファイルを生成 ○○○.txt 例) くっつけたい文字列"AA" くっつけたい文字列"BB" くっつけたい文字列"CC"
- ベストアンサー
- Visual Basic
- エクセルの条件検索
行の先頭の値を返すには エクセル関数をどのようにつかったらよいのでしょうか? たとえば CC1を検索すると Bが表示されるようにしたいのですが A AA1 AA2 AA3 AA4 B BB1 BB2 CC1 D BB4 AA5 この表には同じ値は絶対ありません。 VLOOKUPなど LOOKUPを主に検索をしてみたのですが、わかりませんでした よろしくおねがいいたします。
- ベストアンサー
- その他MS Office製品
- エクセルで消えないセルを作りたい。
よろしくお願いします。 エクセルで、例えばB2のセルに「aa」、B3のセルに「bb」と入力したとします。 そして、A1からC3まで範囲選択をしてDeletをおしてもB2のセルの「aa」だけは消えないようにすることは可能でしょうか? エクセルは2000です。
- 締切済み
- オフィス系ソフト
- セルの隣のセルの値を取得 VBA
初歩的な質問ですいません 検索したセル(最大値)の隣のセルの値(L)を取得したいです。 どこまでのコードを貼り付けたらいいかわかりませんが、 ret = Application.Max(Range("M:M")) と変数に格納したのですが、その後 piyo = ret.ActiveCell.Previous このようにしてみましたが、取得出来ていないようです。 記述法なのか、よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- EXCEL VBA Byte型に"0"を付けたい
EXCEL VBAにてあるセルの値をByte型の16進数に 変換していますが、変換後の値の頭に"0"が付かなくて 困っています。 Dim a As String Dim aa As String Dim b As Byte Dim bb As Byte a = Val("&H" & Cells(1, 1)) aa = Format(a, "00") b = aa bb = Format(b, "00") 変数など簡略化していますが、こんな感じです。 最後の"bb"の中身が、例えば"01"ではなく"1"と なってしまっています。 バイナリエディタで表示した時に、"111"ではなく "010101"と表示させたいのですが、、、 この方法にこだわっている訳ではないので 他の方法も含めて、ご教示お願いします。
- ベストアンサー
- Excel(エクセル)
- またまたVBAのデータの型変数で質問
あるセルに「=IF(N50 =O50,"","×")」の関数が入ってます。比較して合っているならNULL、相違なら×(バツ)をいれるというものです。 質問はこのセルの値をマクロである変数に格納するにはどんな型を使用すればいいのか?です。 格納できればどんな方法でもいいです。 Dim buf as String と変数の宣言してbufに上記の関数の結果のみを入れたいのですが型が違いますとエラーがでます。セルが算術式のときの型ってなんでしょうか? 目的はNULLは大丈夫なのですが、バツ(×)を変数に格納したいです。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト