Subscript out of range

[pvzshark]

Good day all. I am getting an error subscript out of range. I know why i am getting it, I just need your help to bypass it.

I am importing data from mysql. Financial year vs last year financial year. but being in April the may, June July etc months does not exist for this year so i need to ignore it.
Below is wehre i do calculations for the columns 40 and 41. but they do not exist with this import but might for a future import. How do i if exist then else ignore?

ActiveSheet.ListObjects("Table_pastel_12_cust_rank").ListColumns(40). _
TotalsCalculation = xlTotalsCalculationSum

ActiveSheet.ListObjects("Table_pastel_12_cust_rank").ListColumns(41). _
TotalsCalculation = xlTotalsCalculationSum

 

[pvzshark]

Wel no I get it, geesh ffs. so when post on another forum just add link from this one. easy as pie. now fluff, do you know vba?

 

[Fluff]

I would strongly suggest you take the time to read the rules of this, as you obviously haven't bothered to do so yet. This includes insulting other people.

 

[pvzshark]

Again fluff. Do you know vba at all? will you be able to help here, or are you just gonna fill this post with bad remarks? if you do know vba please help. how do I
in stead of just resume next, hide the column as well? If you do not know how to answer let me know and I will stop asking you. Maybee get someone who might be able to answer?

On Error Resume Next
ActiveSheet.ListObjects("Table_pastel_12_cust_rank").ListColumns(35). _
TotalsCalculation = xlTotalsCalculationSum
On Error Resume Next
ActiveSheet.ListObjects("Table_pastel_12_cust_rank").ListColumns(36). _
TotalsCalculation = xlTotalsCalculationSum
On Error Resume Next

 

[pvzshark]

Fluff just does not like me because the springboks took the world cup. lol. Sorry I had to. lol