VBA delete cells

[Littlesimon]

Hi,

I'm having a little trouble trying to create a macro. I'm new to macros and although I've been able to search the web to create a few that work I don't understand the code.

In my spreadsheet:

I have sheet 1 & 2 - these are to input data in.

1 New & 2 New just merge the name cells into one cell.

Test puts the students name in the column for their grade under the score that they got.

I'm trying to delete the cells that return 0 but I don't want the names to move up into the wrong score range.

Example is what I would like. I will have 8 columns in total once it is complete.

Any help would be greatly appreciated.

[xladept]

If you delete the rows you'll lose the names, why not just ignore them??

[Littlesimon]

Because it is for others to use and it would be much better without them. Can I delete the cells that contain 0 by a certain range in a column? For example B5:B42 and then B44:B81 and so forth. Might not be the quickest way?

[xladept]

Well - it works

Please Login or Register  to view this content.

[Littlesimon]

That's great. Thank you very, very much! Is it hard to change the range to B:I?

[xladept]

Hi LittleSimon,

Thanks for the rep!

I Need to know the specifics - is B the first column and I the last?

We could use:

Please Login or Register  to view this content.

[Littlesimon]

Yes I want to delete 0 values in columns B to I as I will add more data so it can be used for upto 8 classes. I would also like to delete these columns if they are empty. I'm not sure where to put this sorry - Cells(i,2).Resize(1,8)
Thanks again for your help.

[xladept]

It looks like we'll have to rewrite the program. I don't know when I'll have time. Probably a different approach is needed. I'll ask the other contributors to help

[karedog]

Maybe :

Please Login or Register  to view this content.

[Littlesimon]

Thanks. I've actually nearly finished putting together the sheet as it would need to be. I should have done that before putting it up sorry. I'll attach it when it's done.