macro only run if cell is not empty

i have a macro thats copy a row to a worksheet. To make it perfect i want
that the macro looks if for example Cell A 5 in that row is not empty. If its
not empty run de macro thats copy the row to a worksheet. If its not empty
that the user got an error windows for example: A5 is empty Macro do not work.

is this possible...?

greetings.

try this

Public Sub test()
If Range("A5") <> "" Then
(macro name)
Else
MsgBox "A5 is empty Macro does not work."


End If
End Sub

"Pieter" <[email protected]> wrote in message
news:[email protected]...
> i have a macro thats copy a row to a worksheet. To make it perfect i want
> that the macro looks if for example Cell A 5 in that row is not empty. If
its
> not empty run de macro thats copy the row to a worksheet. If its not empty
> that the user got an error windows for example: A5 is empty Macro do not
work.
>
> is this possible...?
>
> greetings.
>
>

If Range("A5") = Empty Then
MsgBox "Cell A5 is empty!"
Else
Call copymacro_name
End If


Regards,
Stefi

„Pieter” ezt �*rta:

> i have a macro thats copy a row to a worksheet. To make it perfect i want
> that the macro looks if for example Cell A 5 in that row is not empty. If its
> not empty run de macro thats copy the row to a worksheet. If its not empty
> that the user got an error windows for example: A5 is empty Macro do not work.
>
> is this possible...?
>
> greetings.
>
>

thanks for the quick response but
this is only working when cell A5 is empty.
it must also work when i want to run de macro on row 150 for example.
so then A 150 the macro had to check if its empty or not.

gr.

"Stefi" wrote:

> If Range("A5") = Empty Then
> MsgBox "Cell A5 is empty!"
> Else
> Call copymacro_name
> End If
>
>
> Regards,
> Stefi
>
> „Pieter” ezt �*rta:
>
> > i have a macro thats copy a row to a worksheet. To make it perfect i want
> > that the macro looks if for example Cell A 5 in that row is not empty. If its
> > not empty run de macro thats copy the row to a worksheet. If its not empty
> > that the user got an error windows for example: A5 is empty Macro do not work.
> >
> > is this possible...?
> >
> > greetings.
> >
> >

If Range("A" & ActiveCell.Row) = Empty Then
MsgBox "Cell A5 is empty!"
Else
Call copymacro_name
End If

Regards,
Stefi

„Pieter” ezt �*rta:

> thanks for the quick response but
> this is only working when cell A5 is empty.
> it must also work when i want to run de macro on row 150 for example.
> so then A 150 the macro had to check if its empty or not.
>
> gr.
>
> "Stefi" wrote:
>
> > If Range("A5") = Empty Then
> > MsgBox "Cell A5 is empty!"
> > Else
> > Call copymacro_name
> > End If
> >
> >
> > Regards,
> > Stefi
> >
> > „Pieter” ezt �*rta:
> >
> > > i have a macro thats copy a row to a worksheet. To make it perfect i want
> > > that the macro looks if for example Cell A 5 in that row is not empty. If its
> > > not empty run de macro thats copy the row to a worksheet. If its not empty
> > > that the user got an error windows for example: A5 is empty Macro do not work.
> > >
> > > is this possible...?
> > >
> > > greetings.
> > >
> > >

Perfect this is exactly what i want...

thanks

"Stefi" wrote:

> If Range("A" & ActiveCell.Row) = Empty Then
> MsgBox "Cell A5 is empty!"
> Else
> Call copymacro_name
> End If
>
> Regards,
> Stefi
>
> „Pieter” ezt �*rta:
>
> > thanks for the quick response but
> > this is only working when cell A5 is empty.
> > it must also work when i want to run de macro on row 150 for example.
> > so then A 150 the macro had to check if its empty or not.
> >
> > gr.
> >
> > "Stefi" wrote:
> >
> > > If Range("A5") = Empty Then
> > > MsgBox "Cell A5 is empty!"
> > > Else
> > > Call copymacro_name
> > > End If
> > >
> > >
> > > Regards,
> > > Stefi
> > >
> > > „Pieter” ezt �*rta:
> > >
> > > > i have a macro thats copy a row to a worksheet. To make it perfect i want
> > > > that the macro looks if for example Cell A 5 in that row is not empty. If its
> > > > not empty run de macro thats copy the row to a worksheet. If its not empty
> > > > that the user got an error windows for example: A5 is empty Macro do not work.
> > > >
> > > > is this possible...?
> > > >
> > > > greetings.
> > > >
> > > >

You are welcome! Thanks for the feedback!
Regards,
Stefi


„Pieter” ezt �*rta:

> Perfect this is exactly what i want...
>
> thanks
>
> "Stefi" wrote:
>
> > If Range("A" & ActiveCell.Row) = Empty Then
> > MsgBox "Cell A5 is empty!"
> > Else
> > Call copymacro_name
> > End If
> >
> > Regards,
> > Stefi
> >
> > „Pieter” ezt �*rta:
> >
> > > thanks for the quick response but
> > > this is only working when cell A5 is empty.
> > > it must also work when i want to run de macro on row 150 for example.
> > > so then A 150 the macro had to check if its empty or not.
> > >
> > > gr.
> > >
> > > "Stefi" wrote:
> > >
> > > > If Range("A5") = Empty Then
> > > > MsgBox "Cell A5 is empty!"
> > > > Else
> > > > Call copymacro_name
> > > > End If
> > > >
> > > >
> > > > Regards,
> > > > Stefi
> > > >
> > > > „Pieter” ezt �*rta:
> > > >
> > > > > i have a macro thats copy a row to a worksheet. To make it perfect i want
> > > > > that the macro looks if for example Cell A 5 in that row is not empty. If its
> > > > > not empty run de macro thats copy the row to a worksheet. If its not empty
> > > > > that the user got an error windows for example: A5 is empty Macro do not work.
> > > > >
> > > > > is this possible...?
> > > > >
> > > > > greetings.
> > > > >
> > > > >

Hi, a newcomer here trying to get to grips with Macros so thanks in advance of any help.

The above solution is good as it looks through the whole named column (e.g. A) for cells that are not empty. But when I test it this seems to also include the first cell which is part of my data header across the whole first row. Is there any way to skip that?

Also what I want to do is once I find a cell with something in it I wish to create a blank row below it e.g. If something is found row 3 in Cell C create a new row so row 4 is blank.
Then repeat until I reach the end of the file.

Is this possible?

Understood, thanks for the advice