VBA小技集(Office Boole)
Public Sub ReadText1() ' Openステートメントを使用 ' 行単位で読み込み Dim FileNumber As Long Dim FilePath As String Dim TextLine As String Dim ar As Variant Dim i As Long Dim gyo As Long FileNumber = FreeFile FilePath = ThisWorkbook.Path & "\test.txt" Open FilePath For Input As #FileNumber gyo = 1 Do While Not EOF(FileNumber) Line Input #FileNumber, TextLine ar = Split(TextLine, ",") For i = 0 To UBound(ar) Cells(gy
EXCEL VBA マクロ TIPs. [ 配列のまとめ。コピーとかも。 ]
EXCEL の仕事で、配列は使わなかったんだけど、ちょっと気になったので調査してみた。 配列には、静的配列、動的配列、Variant 配列、の 3つがある。 配列を定義すると、０始まりで、添え字と同じ番号までメモリが確保される。 Dim h(1) As Integer Dim h(0 to 1) As Integer これは、二つとも、h(0), h(1) のメモリエリアを確保する。 １始まりにしたい場合は、プロシジャーの外の宣言部（モジュールの先頭）に、 Option Base 1 と記述。 静的配列は、いわゆる、普通の配列。 Dim sh(3) As Integer 動的配列は、 Dim dh() As Integer と添え字を付けずに定義する。これは、このままではメモリ領域を確保しない。 ReDim dh(3) みたいな感じで再定義して、初めてメモリ領域が確保されて、使えるようにな
初心者のためのExcel エクセルマクロVBA入門-配列に配列を入れる - 初心者のためのExcelマクロ超入門（絶対できるVBA開発）
今日はもう少し配列について突っ込んでいきたいと思います。今日配列の配列です。 ( ﾟдﾟ)アァ・・・もう無理・・・ 大丈夫です。とりあえず、一番簡単な2つ構造だけ押さえればVBAの世界ではとりあえずやっていけると思います。なぜなら。。。 配列に配列を入れるとエクセルの表そのものだから！ です。 1つの変数に配列をまとめて入れてそれをまた配列にする。 とりあえず、一番VBAの案件でかなりの割合であるのが・・・ CSVやExcelファイルの取込 これです。大体、受注のデータだったり、発注のデータだったりしますが、列ごとに日付とか商品とか、数量とか、金額とか書いている「表」を取り込んで、加工してとか、、、そういう感じですよね。 それを取り込むのに役に立つのが2次元の配列なんです。 表で考えるとわかりやすいと思います。 図のように横に向かって1つのデータが並んでいます。これは1つの配列として扱いま
配列研究室 STEP 3
5.ワークシート関数の利用 ここで述べたように、Excelのワークシート関数には、引数として配列を扱えるものが結構あります。 一見「セル範囲」を指定しているように見えても、実はその範囲の値を配列として処理しているのです。 「セル範囲」というのはVBAのデータ型で言うとRangeですが、実際にRange型の引数しか指定できないのは、RANKやOFFSET、SUMIF、COUNTIF、PHONETICなどです。 一方、SUMや、VLOOKUPの「範囲」のような引数は、Range型ではなくVariant型であり、セル範囲として与えられたとしても、最終的には配列的に処理されます。さらに、セル範囲ではなく、直接配列を指定することも可能です（こちらも参照）。 これらの「配列を扱える」ワークシート関数の多くは、VBAのコードの中で、2次元までの配列を処理するために利用することができます。 たとえば、数値
Office TANAKA - Excel VBA Tips[重複しないリストを作る(1)]
「キー」と「値」がセットになっていて、「神奈川県」というキーで「横浜市」という値を検索できるような仕組みです。Dictionaryオブジェクトでは、こうした連想配列にデータ(キーと値のセット)を追加したり、検索したり、任意のキーがすでに存在しているかどうかを調べことなどができます。なお、連想配列では同じキーを登録できません。 Dictionaryオブジェクトを使って重複しないリストを作成するには、次のように考えます。 セルA2からセルA8まで順にデータを取得します 取得したデータが連想配列に登録されていなかったら登録します 取得したデータが連想配列に登録されていたら何もしません 流れはこんな感じです。さて登録するデータですが、連想配列では「キー」と「値」の二つが必要です。今回のケースでは「名前」データしかありません。「名前」を「キー」にするとして、「値」には何を登録したらいいのでしょう。
初心者のためのExcel(エクセル)マクロVBA入門-成績表マクロの作成：ユーザー定義型を使う - 初心者のためのExcelマクロ超入門（絶対できるVBA開発）
前回書いたユーザー定義型のコードについてもう少し詳しく説明します。 ' 科目のユーザー定義型 Public Type Kamoku Name As String '科目名 Score As Variant '点数 End Type と ' 科目の配列を作成します。 Dim arryKamoku() As Kamoku でしたね。 ユーザー定義型はオリジナルの変数の型となる。 Publicは他のモジュールでも使いたいので付けています。Typeステートメントがこれからユーザー定義型を作るよ。という意味になり、その後にオリジナルの名前「Kamoku」があります。Typeの終わりはEnd Typeとなります。 その後、NameとScoreという2つの変数を作成していますね。 これで、KamokuはNameとScoreの２つの変数を扱うことができます。当然ですが、この中にはいくつでも変数を作成でき、
多次元配列
このように名前が「佐藤」さんの住所は「東京都」で名前が「山田」さんの住所は「札幌市」です。このように1つの行に対して2つの項目があるものが2次元の配列となります。 このデータを配列に保存する場合には次のように2つの配列を用意する必要があります。 Dim clientName(3) As String Dim clientAddress(3) As String clientName(0) = "佐藤 一郎" clientAddress(0) = "東京都" clientName(1) = "山田 花子" clientAddress(1) = "札幌市" clientName(2) = "加藤 健一" clientAddress(2) = "名古屋市" clientName(3) = "中村 吾郎" clientAddress(3) = "東京都"
Office TANAKA - Excel VBA関数[Array]
構文 Array(arglist) 引数arglistには、配列として格納するデータをカンマ（,）で区切って指定します。 解説 配列を格納したバリアント型を返します。 配列として宣言していないバリアント型変数に代入して、バリアント型変数を配列と同じように操作できます。 引数を指定しないと、長さ0の配列を返します。 サンプル１ 次の例は、バリアント型変数aに配列を代入し、４番目のデータThuを表示します。 Sub Sample() Dim a As Variant a = Array("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun") MsgBox a(3) End Sub ※Tips 配列で使用されるインデックスの最小値は、Option Baseで指定します。
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
http://www.keep-on.com/excelyou/2000lng4/200010/00100258.txt