try this code for  *ComboBox1_Change()*

Private Sub ComboBox1_Change()
Dim rw As Long, cl As Range, found As Range

 Set found = Worksheets("ThamDinh").Range("A:A").Find(Me.ComboBox1.Value,
LookIn:=xlValues)
    If Not found Is Nothing Then
        rw = found.Row
        tbxSoTT = Worksheets("ThamDinh").Range("a" & rw).Offset(0, 0)
        tbxTenDuAn = Worksheets("ThamDinh").Range("a" & rw).Offset(0, 1)
        tbxDot = Worksheets("ThamDinh").Range("a" & rw).Offset(0, 2)
        tbxHuyen = Worksheets("ThamDinh").Range("a" & rw).Offset(0, 3)
        tbxSoToTrinh = Worksheets("ThamDinh").Range("a" & rw).Offset(0, 4)
        tbxNgayKyTTr = Worksheets("ThamDinh").Range("a" & rw).Offset(0, 5)
        tbxNguoiXuLy = Worksheets("ThamDinh").Range("a" & rw).Offset(0, 6)
    End If
End Sub

check the attachment see if it helps



On Sun, Dec 16, 2012 at 2:41 PM, Prince <prince141...@gmail.com> wrote:

> hi be tran van
> share your file with me.
>
> regards
> prince
>
> On Saturday, December 15, 2012 9:58:14 PM UTC+5:30, bé trần văn wrote:
>
>> Welcome Prince.
>>
>> File TIEN TIM 3 if I format the Number type, the error happened 1004
>> (Unable to get the match property of the WorksheetFunction class), in
>> column A, I need to be of type Number, you can help me to use the
>> Number format (because I need the model number), like ComboBox2 (Find
>> treatment) used for any format.
>> Thank you.
>>
>>
>> 2012/12/15, Bé Trần Văn <betnmtd...@gmail.com>:
>> > Thanks Prince.
>> > Thanks for your quick reply, once again thank you.
>> >
>> > 2012/12/15, Prince <prince...@gmail.com>:
>> >> Hi bé trần văn
>> >>
>> >> your data in column A:A have spaces thats why it is not matching with
>> >> current selection of the combo box. but for now i have trim the data
>> in
>> >> column  A and it is working.
>> >> please see the attached.
>> >>
>> >> regards
>> >> prince
>> >>
>> >> On Friday, December 14, 2012 9:35:43 PM UTC+5:30, bé trần văn wrote:
>> >>>
>> >>> In File TIEN TIM 3, in combo Find the handle has done well, but in
>> the
>> >>> Find combo TT when click 1 in the combo, the data in row 5 is
>> >>> displayed on the form in error, I find no error.
>> >>> Hope you fix this for, thanks a lot.
>> >>>
>> >>
>> >> --
>> >> Join official Facebook page of this forum @
>> >> https://www.facebook.com/**discussexcel<https://www.facebook.com/discussexcel>
>> >>
>> >> FORUM RULES
>> >>
>> >> 1) Use concise, accurate thread titles. Poor thread titles, like
>> Please
>> >> Help, Urgent, Need Help, Formula Problem, Code Problem, and Need
>> Advice
>> >> will
>> >> not get quick attention or may not be answered.
>> >> 2) Don't post a question in the thread of another member.
>> >> 3) Don't post questions regarding breaking or bypassing any security
>> >> measure.
>> >> 4) Acknowledge the responses you receive, good or bad.
>> >> 5) Jobs posting is not allowed.
>> >> 6) Sharing copyrighted material and their links is not allowed.
>> >>
>> >> NOTE  : Don't ever post confidential data in a workbook. Forum owners
>> and
>> >> members are not responsible for any loss.
>> >> ---
>> >> You received this message because you are subscribed to the Google
>> Groups
>> >> "MS EXCEL AND VBA MACROS" group.
>> >> To post to this group, send email to excel-...@googlegroups.com.
>> >> To unsubscribe from this group, send email to
>> >> excel-macros...@**googlegroups.com.
>> >> Visit this group at http://groups.google.com/**
>> group/excel-macros?hl=en<http://groups.google.com/group/excel-macros?hl=en>.
>>
>> >>
>> >>
>> >>
>> >
>>
>  --
> Join official Facebook page of this forum @
> https://www.facebook.com/discussexcel
>
> FORUM RULES
>
> 1) Use concise, accurate thread titles. Poor thread titles, like Please
> Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
> will not get quick attention or may not be answered.
> 2) Don't post a question in the thread of another member.
> 3) Don't post questions regarding breaking or bypassing any security
> measure.
> 4) Acknowledge the responses you receive, good or bad.
> 5) Jobs posting is not allowed.
> 6) Sharing copyrighted material and their links is not allowed.
>
> NOTE : Don't ever post confidential data in a workbook. Forum owners and
> members are not responsible for any loss.
> ---
> You received this message because you are subscribed to the Google Groups
> "MS EXCEL AND VBA MACROS" group.
> To post to this group, send email to excel-macros@googlegroups.com.
> To unsubscribe from this group, send email to
> excel-macros+unsubscr...@googlegroups.com.
> Visit this group at http://groups.google.com/group/excel-macros?hl=en.
>
>
>



-- 
*Regards*
* *
*Ashish Koul*


*Visit*
*http://www.excelvbamacros.com/*


P Before printing, think about the environment.

-- 
Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To post to this group, send email to excel-macros@googlegroups.com.
To unsubscribe from this group, send email to 
excel-macros+unsubscr...@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros?hl=en.


Attachment: TIEN TIM 3.xlsm
Description: Binary data

Reply via email to