Copy and paste to right spot in a table

[SueKi]

I've built a model to help me set production scenarios on a number of items. As I finalize the inputs for each item - number of machines, target inventories, etc - I'd like to copy the results to another page that has the list of items. I think I could figure out how to add it the bottom a list, but how do I tell it to look the item up in column A and paste it X columns to the right?

 

[SueKi]

OMG! I think I got it!!!! (excuse the newbie excitement) I need to add more lines of copy/paste, but this one worked!!!!

This is without the offset, but that was something I thought I was going to have to do, but I'm just as happy to tell it what column to paste in.

Sub Macro1()
'
' Macro1 Macro
'  
Dim greige As String
Dim TRow As Long
 
'Hold greige number to find where to paste
greige = Worksheets("Model").Range("B3").Value
   
'Find what row the greige is on in "Summary Data Run Rates" for pasting
TRow = Application.WorksheetFunction.Match(greige, Worksheets("Summary Data Run Rates").Range("c1:c200"), 0)

'Make sure you dind't forget to add type and notes

  Dim answer As Integer
  answer = MsgBox("Did you add item type and notes?", vbQuestion + vbYesNo)
 
  If answer = vbNo Then Exit Sub

'Copy / Paste

Worksheets("Summary Data Run Rates").Range("BV" & TRow) = Worksheets("Model").Range("E10").Value

End Sub