Excel 2013 Macro Check cell for content then run another Macro or repeat same macro.

[ThomasArthur]

Hi
Just starting with VBA macros.
here is the part I'm having trouble with
============================
Sub SplitCust()
'
' SplitCust Macro
'

'
Windows("CDR Usage.xlsx").Activate
Range(Selection, Selection.End(xlToRight)).Select
Selection.Copy
Selection.End(xlDown).Select
Here is where I need to check if 2 cells down is blank or not blank, if blank run another macro,
if not finish down to Application.CutCopyMode = False line then loop back to Selection.Copy line above
Selection.End(xlDown).Select
Selection.Insert Shift:=xlDown
Application.CutCopyMode = False
End Sub
=============================
Any and All help appreciated.
Tom

 

[Sektor]

Selection.Copy

You copy selection, but paste it nowhere.

 

[My Aswer Is This]

I think it would be better if you explained to us what your end goal is.
Running the same script over and over can be done but this is not the best way to do it.

 

[ThomasArthur]

Hi
I do paste.
"Selection.Insert Shift:=xlDown"
Inserts copied Cells.

 

[ThomasArthur]

Hi
I have telephone call charge data pulled from a data base.
This is various rows each extract.
I use Sort to have the data in the Customer order.
I then use Sub-Total to to have total for each customer.
There is also a blank cell between each customer because of the sub-total.
I then want to insert the headings to the first line after the blank.
But I want to stop and go to the next macro if the second cell down is also blank.
the next macro copies each customer to a new sheet.
Then using sub-total on each splits up the local, mobile, international, etc calls.

Does that explain OK.
Let me know if more required.