Repeat

D

Dave

Hi, I got the code below to calculate sales tax on invoices. For example in
cell C7 I enter the net invoice amount of $100. Then I run the macro and it
enters in
cell D7 $6.75, and in E7 it totals it to $106.75.

I don't know anything about coding, so don't assume anything with me. What
I want
the macro to do is that once it calculates the sales tax and total invoice
amount in Row 7, is to go to the next row down cell C8. From here I then
enter the net invoice amount and I want to repeat the macro again.

I can't figure this out. Thanks for any input.



Macro3 Macro
' Sales Tax
'
' Keyboard Shortcut: Ctrl+f
'
Range("D7").Select
Range("D7") = "=0.0675*RC[-1]"

Range("E7").Select
Range("E7") = "=RC[-2]+RC[-1]"



End Sub
 
W

Wigi

Hi

In fact, it's not terribly difficult ;-)

Macro3 Macro
' Sales Tax
'
' Keyboard Shortcut: Ctrl+f
'
Range("D" & ActiveCell.Row).Formula = "=0.0675*RC[-1]"
Range("E" & ActiveCell.Row).Formula = "=RC[-2]+RC[-1]"
Range("D" & ActiveCell.Row + 1).Select

End Sub
 
B

Bob Phillips

Enter all the amounts in C7 down and then run this code

Sub AddFormulae()
Dim LastRow As Long

With Activesheet

LastRow = .Cells(.Rows.Count, "C").End(xlUp).Row
Range("D7").Resize(LastRow - 6).Formula = "=C7*6.75%"
Range("E7").Resize(LastRow - 6).Formula = "=C7+D7
End With
End Sub

All done in one hit.
 
D

Dave

Thanks so much, that was great stuff.

Bob Phillips said:
Enter all the amounts in C7 down and then run this code

Sub AddFormulae()
Dim LastRow As Long

With Activesheet

LastRow = .Cells(.Rows.Count, "C").End(xlUp).Row
Range("D7").Resize(LastRow - 6).Formula = "=C7*6.75%"
Range("E7").Resize(LastRow - 6).Formula = "=C7+D7
End With
End Sub

All done in one hit.

--
__________________________________
HTH

Bob

Dave said:
Hi, I got the code below to calculate sales tax on invoices. For example
in
cell C7 I enter the net invoice amount of $100. Then I run the macro and
it
enters in
cell D7 $6.75, and in E7 it totals it to $106.75.

I don't know anything about coding, so don't assume anything with me.
What
I want
the macro to do is that once it calculates the sales tax and total invoice
amount in Row 7, is to go to the next row down cell C8. From here I then
enter the net invoice amount and I want to repeat the macro again.

I can't figure this out. Thanks for any input.



Macro3 Macro
' Sales Tax
'
' Keyboard Shortcut: Ctrl+f
'
Range("D7").Select
Range("D7") = "=0.0675*RC[-1]"

Range("E7").Select
Range("E7") = "=RC[-2]+RC[-1]"



End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top