VBA to do a Index and Match function

Hi Experts
I need some help with VBA.

I need a VBA to perform an Index and Match and populate some columns in the table

• When a job number is entered in the Production Order column "G" need a VBA to do an Index and Match function and pupulate the Item Code; Description & Quantity columns by looking up in the Database Table

The Database table grows by 40 rows a day, so in a month it could grow by 800 rows. Would a VBA running Index and Match be the best and fast solution?

I have attached a sample file

Thanks
Regards
Rahul

According to your thread title this is the worksheet event for the Index / Match part
but using instead the search Excel inner feature as a starter, to paste to the worksheet TAG Data module :

PHP Code: 

Private Sub Worksheet_Change(ByVal Target As Range)
      Const D = "Database"
        Dim Rg As Range
    If Not Intersect(Me.ListObjects("TAG_Data").DataBodyRange.Columns(6), Target(1)) Is Nothing Then
        Set Rg = Worksheets(D).ListObjects(D).DataBodyRange.Columns(1).Find(Target(1).Value, , xlValues, xlWhole)
        Application.EnableEvents = False
      With Target(1, 2).Resize(, 3)
         If Rg Is Nothing Then
            .ClearContents
         Else
            .Value = Rg(1, 2).Resize(, 3).Value
             Set Rg = Nothing
         End If
      End With
        Application.EnableEvents = True
    End If
End Sub 


Do you like it ? So thanks to click on bottom left star icon « ★ Add Reputation » !

Hi Marc
I have modified my original request and deleted the VBA requirement for the button
One question per thread as you suggested

I will post another thread for my other question

I had to remove the TAG_Data table so need the VBA modified

Will ask the question again as a separate thread, could you help me with that?

Regards
Rahul