My response wasn’t meant to be negative (I apologise if it was): I just seemed to get it to work by removing that line. It didn’t otherwise work at all.
Is there a way to extract a text string of the upper left and a text string of the lower right from the ‘Selection’ property? If it is, the two could be joined together and inserted into the publishobjects.add function
Then all the macro would need to do is call one function !
Again, sorry if I am seeming to be negative, I’m just trying to be analytical.
Unfortunately if you save the new sheet it will save a looooad of the blank cells alongside with it. This is why I am trying to go down the route of forcing excel to save a range of cells
In my experience writing macros for a bunch of computer novices to use, you are asking for trouble by assuming they can do even the most simple of tasks. In fact, when I’m writing something like that, I find that even if you write it assuming that the stupidest person on the planet is going to be using it, they will still find a way to screw it up. I write stuff like that assuming that the user is malicious, and will try every way they can think of to screw it up. I then try to foil their attempts to do so, and I find that that method works pretty well.
What I would do if I were you (and I absolutely, positively, could not find a way to take the user out of the equation when choosing the cells) is if the selection.count=1, I would throw up a message box to that effect and exit the sub. If selection.count>1, I would throw up a message box saying “You have selected cells a, b, and c. Is this correct?” before saving the file. But I would try really, really hard to find a way to automatically select the cells. Time spent doing that will probably save you ten times as much time fixing screw ups down the road.