Hello,

I need help designing a VBA Macro: I have in cell A1 "Paid" in cell G8
"total" in cell H8 $100.00

What I need is: to cell.find "paid" then to do cell.offset to G8 to
select.copy the value in H8. Is this possible ?
Regards,

Minimally, the code looks like this:

Sub Copy_If_Paid()
If ActiveCell.Value = "Paid" Then
ActiveCell.Offset(0, 7).Copy
End If
End Sub

This works when the cell pointer is already on cell A1. A lot depends
on how your information is displayed on the spreadsheet. Do you have
many rows of Paid / Unpaid entries? Often I'll have a macro process
many rows in a spreadsheet, and I'll use a DO loop to repeat an
operation until it reaches the first blank row, or I enter the word
"Stop" when the data rows have ended.
What does your information look like?

Dave O

Thank you.
But I still need to offset the activecell to "Total" to select.copy the
value in H. Since I won't know how many rows there are between "Paid" "Total"
Regards,

"Dave O" wrote:

Minimally, the code looks like this:

Sub Copy_If_Paid()
If ActiveCell.Value = "Paid" Then
ActiveCell.Offset(0, 7).Copy
End If
End Sub

This works when the cell pointer is already on cell A1. A lot depends
on how your information is displayed on the spreadsheet. Do you have
many rows of Paid / Unpaid entries? Often I'll have a macro process
many rows in a spreadsheet, and I'll use a DO loop to repeat an
operation until it reaches the first blank row, or I enter the word
"Stop" when the data rows have ended.
What does your information look like?

Dave O

Hi
is your 'Total' label always in column G?

--
Regards
Frank Kabel
Frankfurt, Germany

Jeff wrote:
Hello,

I need help designing a VBA Macro: I have in cell A1 "Paid" in cell G8
"total" in cell H8 $100.00

What I need is: to cell.find "paid" then to do cell.offset to G8 to
select.copy the value in H8. Is this possible ?
Regards,

Total is always in column G and the value I need always in column H
Thanks,

"Frank Kabel" wrote:

Hi
is your 'Total' label always in column G?

--
Regards
Frank Kabel
Frankfurt, Germany

Jeff wrote:
Hello,

I need help designing a VBA Macro: I have in cell A1 "Paid" in cell G8
"total" in cell H8 $100.00

What I need is: to cell.find "paid" then to do cell.offset to G8 to
select.copy the value in H8. Is this possible ?
Regards,

Hi
one way in VBA

dim return_value
return_value=application.vlookup("Total",range("G: H"),2,0)
msgbox return_value

--
Regards
Frank Kabel
Frankfurt, Germany
"Jeff" schrieb im Newsbeitrag
...
Total is always in column G and the value I need always in column H
Thanks,

"Frank Kabel" wrote:

Hi
is your 'Total' label always in column G?

--
Regards
Frank Kabel
Frankfurt, Germany

Jeff wrote:
Hello,

I need help designing a VBA Macro: I have in cell A1 "Paid" in cell G8
"total" in cell H8 $100.00

What I need is: to cell.find "paid" then to do cell.offset to G8 to
select.copy the value in H8. Is this possible ?
Regards,

Thank you,
That's What I wanted, but I need first to do a cell.find in column A
for"paid" then I can do your macro.
Regards,


"Frank Kabel" wrote:

Hi
one way in VBA

dim return_value
return_value=application.vlookup("Total",range("G: H"),2,0)
msgbox return_value

--
Regards
Frank Kabel
Frankfurt, Germany
"Jeff" schrieb im Newsbeitrag
...
Total is always in column G and the value I need always in column H
Thanks,

"Frank Kabel" wrote:

Hi
is your 'Total' label always in column G?

--
Regards
Frank Kabel
Frankfurt, Germany

Jeff wrote:
Hello,

I need help designing a VBA Macro: I have in cell A1 "Paid" in cell G8
"total" in cell H8 $100.00

What I need is: to cell.find "paid" then to do cell.offset to G8 to
select.copy the value in H8. Is this possible ?
Regards,

Hi
why do you need this 'find' command first?

--
Regards
Frank Kabel
Frankfurt, Germany
"Jeff" schrieb im Newsbeitrag
...
Thank you,
That's What I wanted, but I need first to do a cell.find in column A
for"paid" then I can do your macro.
Regards,


"Frank Kabel" wrote:

Hi
one way in VBA

dim return_value
return_value=application.vlookup("Total",range("G: H"),2,0)
msgbox return_value

--
Regards
Frank Kabel
Frankfurt, Germany
"Jeff" schrieb im Newsbeitrag
...
Total is always in column G and the value I need always in column H
Thanks,

"Frank Kabel" wrote:

Hi
is your 'Total' label always in column G?

--
Regards
Frank Kabel
Frankfurt, Germany

Jeff wrote:
Hello,

I need help designing a VBA Macro: I have in cell A1 "Paid" in cell
G8
"total" in cell H8 $100.00

What I need is: to cell.find "paid" then to do cell.offset to G8 to
select.copy the value in H8. Is this possible ?
Regards,