If ListObjectTables.ListColumns('PropertyNumber').DataBodyRange.Rows(1).Value = ListObjectTables.ListColumns('PropertyNumber').DataBodyRange.Rows(1).Value Then RealPropertyPropertyNumRow1 = ListObjectTables.ListColumns('PropertyNumber').DataBodyRange.Rows(1) If ListObjectTables = 'RealPropertyRentalPropertyTaxableMajorMaintenanceOrRepairExpensesSubTable' Then I have tried to replicate the formula in VBA with the following code and it is throwing error that 'property or method not supported' Populating the formulas for Sequence Columns in all the RealProperty Tablesĭim RealPropertyPropertyNumRow1 As Integerĭim RealPropertyPropertyNumRows As Integerįor Each ListObjectTables In RealPropertySht.ListObjects The same formula if I need to replicate it in Tables/Listobjects, looks like unable to use the Absolute References, but however, I would like to replicate the same Formula in VBA Code to populate the results as shown below:
I would like to populate the Sequence numbers (in the 'Sequence' Columns) based on the Property Number repetitions in the 'Property Number' Columns.įollowing is the formula that I would like to replicate in the Excel tables: I have 6 different Excel tables in a single worksheet with similar column names and I would like to implement 1 formula in one of the columns in all these tables.
