Vba code to find value across multiple worksheets and return adjacent data

Hi

I have looked all over and I cannot find an answer to what I originally thought would be quite straight forward
I am trying to make a front page for my parts and prices workbook which allows a user to enter a part number and the vba code returns the information for that part number.

The workbook consists of multiple worksheets (which is ongoing) one for each supplier and are named by supplier, so all unique, but all the layouts are the same.
The part number begins in C11 and the rest of the required information is in D11-G11

This is my borrowed code which will find and tell me which cell the entered part is in but I need it to return the rest of the information for that part number, vendor price cost etc

Public Sub FindText()

Dim ws As Worksheet, Found As Range
Dim myText As String, FirstAddress As String
Dim AddressStr As String, foundNum As Integer

myText = InputBox("Enter text to find")

If myText = "" Then Exit Sub

For Each ws In ThisWorkbook.Worksheets
With ws

Set Found = .UsedRange.Find(what:=myText, LookIn:=xlValues, LookAt:=xlPart, MatchCase:=False)

If Not Found Is Nothing Then
FirstAddress = Found.Address

Do
foundNum = foundNum + 1
AddressStr = AddressStr & .Name & " " & Found.Address & vbCrLf

Set Found = .UsedRange.FindNext(Found)

Loop While Not Found Is Nothing And Found.Address <> FirstAddress
End If

myNext:
End With

Next ws

If Len(AddressStr) Then
MsgBox "Found: """ & myText & """ " & foundNum & " times." & vbCr & _
AddressStr, vbOKOnly, myText & " found in these cells"
Else:

MsgBox "Unable to find " & myText & " in this workbook.", vbExclamation
End If
End Sub

Any help on this is greatly appreciated as I have no idea how macros work I just cannot get my head around it no matter how I try so I have massive respect for those of you that do
Thanks

Hi Thanks for the reply

I have attached a sample workbook

If you go to cell D3 on any supplier worksheet you can enter a part number and the rows down to D8 return the description and prices.
What I am trying to do is use the worksheet named "Search" to have a message box in which a user can enter a part number and the rest of the information, description and prices appear with it.
I have to have multiple worksheets as once I list all the suppliers and parts there will be more than the 65000 rows in total

I am trying to avoid having to select each worksheet in turn and hope to eventually lock out all of the supplier worksheets so end users can only access the "Search" worksheet.
Sorry should also mention if I can get the "Search" page working I will not need rows D8 - D11
the worksheets are just for the data

Hope my explanation is clear enough

Thanks again

I haven't made it look very pretty yet so feel free to use artistic licence but yes the Search sheet is blank, this is where end users will enter and retrieve data your suggestion of entering a number in A2 and returning the relevant data next to it is fine

All part numbers are unique values it is unlikely but not impossible that different suppliers my use the same number one day if this could be factored in that would be useful but as I say it is unlikely we have been using these suppliers for some years and haven't had a duplicate yet

Thanks again

That's exactly it thanks so much