Therefore, I think that there is a relationship between The example find code and amendment code .. but I don't know what is it exactly??!!!
Hi,
As I expected, There is a relationship between The searching Code and Amendment Code, which complete each other.
Searching Code's job is looking for the concerned record (selected by ComboBox) and stops on it by (Using Select property).
Then, Amendment code pastes the new changes to the recoded selected by Searching code.
Anyhow, I summarized the code to fit my need.
Private Sub ComboBox1_Change()
On Error GoTo 1
With MyRange.Find(ComboBox1)
.Select
TextBox1 = .Offset(0, 1)
End With
1 End Sub
Private Sub CommandButton1_Click()
With ActiveCell
.Value = ComboBox1
.Offset(0, 1) = TextBox1
End With
Unload Me
End Sub
The only problem with this code is that it works only on the database sheet .. but when we run the code from another sheet, it doesn't work at all,
Therefore, for me the only solution for that is the trick I mentioned in My post # 14.
Thanks for all,
Bookmarks