نوشته اصلی توسط
esyoo
نوشته اصلی توسط
m_d6712
برای من که به صورت تایم نوشته می شود. می خوای فایلتو بزار!
فیلدی که می خوای به صورت تایم نشون به رو نوعش رو Time کن ! نباید مشکلی باشه!
ممنون دوست عزیز
فایل رو پیوست کردم.
دقت کنید که من به صورتtable نمی خوام!
با تشکر
http://www.4shared.com/file/NYzJVIxM/find_time.html
کد 1 را وارد کنید.
این رو با کد خودت جایگزین کن؛ درست میشه!:::
کد:
Private Sub CommandButton1_Click()
For Each c In Range("a1:a20")
If c.Value = TextBox1.Text Then
ListBox1.AddItem c
ListBox1.List(ListBox1.ListCount - 1, 1) = c.Offset(0, 1).Text
ListBox1.List(ListBox1.ListCount - 1, 2) = c.Offset(0, 2).Text
ListBox1.List(ListBox1.ListCount - 1, 3) = c.Offset(0, 3).Text
ListBox1.List(ListBox1.ListCount - 1, 4) = c.Offset(0, 4).Text
ListBox1.List(ListBox1.ListCount - 1, 5) = c.Offset(0, 5).Text
End If
Next
End Sub
علاقه مندی ها (Bookmarks)