I have some code that in part searches for the a value found in a
combobox in column A. What I want is the search to find the first
occurance. Once found put the value from that row, column 8, in a
textbox. What I'm getting is NOT the first find, but the last
occurance, thus the value from column 8 of that row. Here's some of
the code:

Gtwy = Sheets("AirlineData").Cells(Rows.Count, "A").End(xlUp).Row
myRw = 1
Do Until myRw = Gtwy
If ComboBox2.Value = Cells(myRw, 1) Then TextBox9.Value = Cells(myRw,
11)

Any ideas on why I'm getting the last entry and not the first one?

If ComboBox2.Value = Cells(myRw, 1) Then
Box9.Value = Cells(myRw,11)
End Do
End If

Basically you must break out of the loop after the first success.
--
Gary's Student


" wrote:

I have some code that in part searches for the a value found in a
combobox in column A. What I want is the search to find the first
occurance. Once found put the value from that row, column 8, in a
textbox. What I'm getting is NOT the first find, but the last
occurance, thus the value from column 8 of that row. Here's some of
the code:

Gtwy = Sheets("AirlineData").Cells(Rows.Count, "A").End(xlUp).Row
myRw = 1
Do Until myRw = Gtwy
If ComboBox2.Value = Cells(myRw, 1) Then TextBox9.Value = Cells(myRw,
11)

Any ideas on why I'm getting the last entry and not the first one?

You mean

Exit Do

- Jon
-------
Jon Peltier, Microsoft Excel MVP
Tutorials and Custom Solutions
http://PeltierTech.com
_______


"Gary''s Student" wrote in message
...
If ComboBox2.Value = Cells(myRw, 1) Then
Box9.Value = Cells(myRw,11)
End Do
End If

Basically you must break out of the loop after the first success.
--
Gary's Student


" wrote:

I have some code that in part searches for the a value found in a
combobox in column A. What I want is the search to find the first
occurance. Once found put the value from that row, column 8, in a
textbox. What I'm getting is NOT the first find, but the last
occurance, thus the value from column 8 of that row. Here's some of
the code:

Gtwy = Sheets("AirlineData").Cells(Rows.Count, "A").End(xlUp).Row
myRw = 1
Do Until myRw = Gtwy
If ComboBox2.Value = Cells(myRw, 1) Then TextBox9.Value = Cells(myRw,
11)

Any ideas on why I'm getting the last entry and not the first one?

Yes. Thanks for the correction.
--
Gary's Student


"Jon Peltier" wrote:

You mean

Exit Do

- Jon
-------
Jon Peltier, Microsoft Excel MVP
Tutorials and Custom Solutions
http://PeltierTech.com
_______


"Gary''s Student" wrote in message
...
If ComboBox2.Value = Cells(myRw, 1) Then
Box9.Value = Cells(myRw,11)
End Do
End If

Basically you must break out of the loop after the first success.
--
Gary's Student


" wrote:

I have some code that in part searches for the a value found in a
combobox in column A. What I want is the search to find the first
occurance. Once found put the value from that row, column 8, in a
textbox. What I'm getting is NOT the first find, but the last
occurance, thus the value from column 8 of that row. Here's some of
the code:

Gtwy = Sheets("AirlineData").Cells(Rows.Count, "A").End(xlUp).Row
myRw = 1
Do Until myRw = Gtwy
If ComboBox2.Value = Cells(myRw, 1) Then TextBox9.Value = Cells(myRw,
11)

Any ideas on why I'm getting the last entry and not the first one?

Gary and Jon....Thanks...worked like a charm!!!



Gary''s Student wrote:
Yes. Thanks for the correction.
--
Gary's Student


"Jon Peltier" wrote:

You mean

Exit Do

- Jon
-------
Jon Peltier, Microsoft Excel MVP
Tutorials and Custom Solutions
http://PeltierTech.com
_______


"Gary''s Student" wrote in message
...
If ComboBox2.Value = Cells(myRw, 1) Then
Box9.Value = Cells(myRw,11)
End Do
End If

Basically you must break out of the loop after the first success.
--
Gary's Student


" wrote:

I have some code that in part searches for the a value found in a
combobox in column A. What I want is the search to find the first
occurance. Once found put the value from that row, column 8, in a
textbox. What I'm getting is NOT the first find, but the last
occurance, thus the value from column 8 of that row. Here's some of
the code:

Gtwy = Sheets("AirlineData").Cells(Rows.Count, "A").End(xlUp).Row
myRw = 1
Do Until myRw = Gtwy
If ComboBox2.Value = Cells(myRw, 1) Then TextBox9.Value = Cells(myRw,
11)

Any ideas on why I'm getting the last entry and not the first one?