macro question

[jmuscat]

I want a macro to find a specific word say in column A,then pick up the amount of the next column (b) of the same row and return the amount to another column say H.
The problem is that the place where I want the amount to go will always change, but would be at the next available blank row in Column H.
Can anyone help with code?
jmuscat

 

[DaleWatson123321]

jmuscat,

I've created a working example for you. If you'd prefer, you can email me and I'll send the file via return email.

Here are the steps I took.

1) Assigned the range name "colmAB" to columns A:B

2) Assigned the range name "inp" to cell C2

3) Entered the following formula in cell D2
=VLOOKUP(inp,colmAB,2,FALSE)

4) Added a macro button, and named it "Add to List"

5) Attached the following VBA routine to the macro button...

Sub AddToList()
curnum = Range("num&quot.Value
If IsError(curnum) Then Exit Sub
If curnum = "" Then Exit Sub
NextCell = [H65536].End(xlUp).Offset(1, 0).Address
Range(NextCell).Value = curnum
Range("inp&quot.ClearContents
End Sub

I hope this is what you were seeking. Please advise as to how it fits. Or if you'd prefer the file, email me - use BOTH addresses below to ensure you reach me.

Regards, ...Dale Watson

HOME: nd.watson@shaw.ca
WORK: dwatson@bsi.gov.mb.ca