EXCELのVBAです。

Question

kitatom

37

37もっと見る

60pt

コンピュータインターネット

EXCELのVBAです。

(1)H列にあるデータのうち、文字列「aaa」に一致する行数を取得

(2)H列にあるデータのうち、文字列「aaa」に一致するセル番地を取得

以上です。

以上のコードが書ける方、どうぞお教えください。

回答の条件

1人5回まで

登録：2006/06/14 01:05:58
終了：2006/06/14 01:35:12

※ 有料アンケート・ポイント付き質問機能は2023年2月28日に終了しました。

gong1971 2006/06/14 01:39:36

終了ですか...そ、そんなぁ...
gong1971 2006/06/14 01:46:31

あ、新たに質問されていましたね。良かったです。(^^)
villain 2006/06/14 02:15:21

すみません。
一つずれてましたね。
H列じゃなくてI列を参照しています。

Cells(I, 9)をCells(I, 8)にすればちゃんと動作します。

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

リクエスト送信済

回答リクエストを送信したユーザーはいません

villain · Answer 1 · 2006-06-14T01:29:13+09:00

これでどうでしょうか。

もし、違ったらすみません。

Sub Get()
    Dim J As Long
    For I = 1 To 65536
        If Cells(I, 9).Value = "aaa" Then
            J = J + 1
            Cells(I, 2).Value = "アドレス: " & Cells(I, 9).Address(False, False)
        End If
    Next
    Cells(1, 1).Value = "総数: " & J
End Sub

EXCELのVBAです。

回答（1件）

villain174122006/06/14 01:29:13

コメント（3件)

この質問への反応（ブックマークコメント）