Excel 2013 - VB 7.1 - Macro for moving "one cell" down reports System Error & H80010108

[astra]

Hello to Excel forum.

I mostly read solutions and collect some good ideas from Excelforum :-)

However, I have one issue with code bellow:

Please Login or Register  to view this content.

When I check in debbuger it stops at point .Offset(rOriginalSelection.Rows.Count + 1, 0).Select.

Q: How I reproduced error message?

A: If I open excel file it works just fine and I can easily move cell value down.
However, once I change focus to another column and put some data to another cell and return back to desired cell to use again macro I get an error.

I put you an example of Excel screen:
You can see button and code of macro for that object. On left side is "red" marked cell I can move down. It Works fine till the moment I put any value in excell, if I return back to button than I get an error.

http://shrani.si/f/1S/Ij/4IPhU4n3/screen.png

To be honest, I'm not expert in programming. It seems excel or "macro is lost" when I abort to use down function for another work with data.

Thank you for any suggestion on that matter.

Matej

[astra]

As there was no reply for a long time and I am hungry for solution, I can write here solution I have got it from great person employed in company Kompas Xnet.

Solution is very simple, declaration should be PUBLIC and not local with DIM.

That enables to jump in and out to another activities inside Excel application.

Please Login or Register  to view this content.

BR, Matej