2020-06-06から1日間の記事一覧

VBA備忘録 3:配列、値渡し(ByVal)

【文字列を配列(リスト)で変数に格納】 ⇒Array関数を使用する。要素数は0スタート、変数はvariant型。 Sub test() Dim name As Variant Dim str As String Dim i As Integer name = Array("山田", "田中", "中山") '文字列(今回は名前)を格納 For i = 0 To …

VBA備忘録2:whileループ、文字列検索(Match関数(worksheetfunction),Findメソッド(range))

【指定した文字列と同じセルを検索し、セル位置の情報を表示】 Sub test2() Dim c As Range Dim f_address As Range With Range("A:A") '範囲指定 Set c = .Find("リンゴ", LookIn:=xlValues, LookAt:=xlPart) 'Findメソッドで文字検索 f_address = c.Addres…