0

したがってexcel、次のようなスプレッドシートがあります。

DATE                   |  PART#      | XXX    | XXX | 

2013-06-28 13:32:23    |  40240      | XXX    | XXX | 

2013-02-21 13:32:23    |  40240      | XXX    | XXX |

日付を起点に、多数のエントリーがあります。私の質問は、特定の日付までに行と列を見つけるにはどうすればよいですか? PART#のおよびその他の属性を知りたい場合、どうすれば2013-06-28 13:32:23それを見つけることができますか?

新しいシートMACROを作成し、スタイルを設定してから、古いシートからテキストを転送します。問題はテキストの転送にあります。レポートを生成するためにテキストを取得する行を指定したいと考えています。

4

1 に答える 1

0

以下は、検索値が見つかったすべての行を検索します。

Sub getVal()
    Dim searchRange As range
    Dim result As range
    Dim rangeStart As String

    Set searchRange = Application.ActiveSheet.UsedRange
    Set result = searchRange.Find(After:=searchRange(1), _
        What:="6/28/2013  1:32:23 PM", _
        LookIn:=xlFormulas, SearchDirection:=xlNext)

    If Not result Is Nothing Then
        rangeStart = result.Address

        Do
            MsgBox (" row " & result(0).Row & " " & result.Address)
            Set result = searchRange.FindNext(After:=result(1))

        Loop While Not result Is Nothing And rangeStart <> result.Address
    Else
        MsgBox "Not found"
    End If
End Sub
于 2013-07-01T17:27:30.620 に答える