Table name issue

[mtterry]

The code pasted below is resulting in a table name that starts with an underscore, and I can't understand why - any help would be appreciated.

ActiveSheet.ListObjects.Add(xlSrcRange, Range([A1].End(xlDown), [A1].End(xlToRight)), , xlYes).Name = _
Month(pmtDate) & "_" & Year(pmtDate) & "_" & uploadType

 

[RoryA]

A table name can't begin with a number, so Excel is adding an underscore for you.

 

[Johnny Thunder]

This part of your code ").Name = _" is defining the name being given so if you remove that underscore it will go away.

The code pasted below is resulting in a table name that starts with an underscore, and I can't understand why - any help would be appreciated.

ActiveSheet.ListObjects.Add(xlSrcRange, Range([A1].End(xlDown), [A1].End(xlToRight)), , xlYes).Name = _
Month(pmtDate) & "_" & Year(pmtDate) & "_" & uploadType

 

[RoryA]

This part of your code ").Name = _" is defining the name being given so if you remove that underscore it will go away.

That's a VBA line continuation character, not part of the name string being assigned.

 

[mtterry]

Correct, if I made it all one line without the continuation _ I have the same problem

 

[RoryA]

Yes, because of the number at the start.

 

[mtterry]

So I don't suppose you have an idea of how to get rid of that leading underscore?

 

[RoryA]

Don't start the name with a number. Table names follow the same rules as defined names - they have to start with a letter or underscore.

 

[mtterry]

Thank you