tblrow.range.cells1

I have some code that copies data to other sheets depending on various options that are selected. This is part of my code that is working: Select Case tblrow.Range.Cells(1, 6).Value Case "Yir" DocYearName = tblrow.Range.Cells(1...

I have a spreadsheet that copies rows from a table to separate documents depending on several factors. This is the code from my copy button. Sub cmdCopy() Dim wsDst As Worksheet, wsSrc As Worksheet, tblrow As ListRow Dim Combo As String, sht As Worksheet, tbl As ListObject...

I have some code that is meant to copy rows in a spreadsheet depending on the value of the cell in column F for that row. I need to be able to distinguish between having the value to be Ang Wes or Ang Riv. At the moment, regardless of the value, it will always default to Ang Riv but I need...

I have some code that copies rows from a table to a sheet in a workbook according to the date of the row. 2 rows in the table copy to 29 rows in the appropriate workbook and I have no idea why, can someone help me please? Here is the copy code: Sub cmdCopy() With Application...

Hi, Why am I getting the error of Object variable or with block variable not set when I try and run my code? Sub cmdNot_Accept_Click() Dim wsDst As Worksheet Dim wsSrc As Worksheet Dim tblrow As ListRow Dim Combo As String Dim sht As Worksheet Dim tbl As ListObject Dim LastRow As Long Dim...

How do I modify this code to copy formulas from column I & J of the table tblCosting, of the row being copied to the file, whose name is stored in column 36 or 37 of the particular row? I am still learning to code so I tried to write several lines in the middle but they didn’t work. This code...

I have code to copy rows of data from a table in a spreadsheet to one of multiple other spreadsheets containing a table depending on the year in a date field of the row. Is it possible to copy it to spreadsheets that are not open? If it is possible, would you just need to store the extra...

I am trying to write some code to copy to another document and it is not working. Here is the code: Private Sub CmdSend_Click() Dim tbl As ListObject Dim newRow As ListRow Dim wsDst As Worksheet Dim wsSrc As Worksheet Dim tblrow As ListRow Dim Combo As String Dim sht As Worksheet Dim lastrow...