{"push_id":1020788964,"size":1,"distinct_size":1,"ref":"refs/heads/master","head":"4f636d961582633f836615d925b956a5d10a1ddc","before":"9d58a5de37f0ea5762d304ab17e25acae05b98a4","commits":[{"sha":"4f636d961582633f836615d925b956a5d10a1ddc","author":{"email":"73b1f99489e6b05f62124992b062d5ae97aaa849@gmail.com","name":"Allen Mattson"},"message":"Workbook correlation machine\n\nOption Explicit\r\nDim WB As Workbook\r\nDim M1 As Worksheet\r\nDim T1 As Worksheet\r\nDim C As Worksheet\r\n\r\n\r\nSub StartCorrelation()\r\nSet WB = ActiveWorkbook\r\nSet M1 = WB.Sheets(\"Measurement1\")\r\nSet T1 = WB.Sheets(\"Table1\")\r\nSet C = WB.Sheets(\"Correlate\")\r\n\r\nDeleteNamedRanges\r\n\r\n'activate the sheet with the assets you are correlating to find the last row and column\r\nSheets(\"Measurement1\").Select\r\nDim StartTable As Range: Set StartTable = ActiveSheet.Cells\r\n\r\nDim EndTable As Worksheet: Set EndTable = Sheets(\"Table1\")\r\nDim MoveRng As Range\r\nDim TblRng As Range\r\nDim rTabMove As Integer\r\nDim cTabMove As Integer\r\nrTabMove = StartTable.Find(What:=\"*\", After:=StartTable.Cells(1), Lookat:=xlPart, LookIn:=xlFormulas, SearchOrder:=xlByRows, SearchDirection:=xlPrevious, MatchCase:=False).Row\r\ncTabMove = StartTable.Find(What:=\"*\", After:=StartTable.Cells(1), Lookat:=xlPart, LookIn:=xlFormulas, SearchOrder:=xlByColumns, SearchDirection:=xlPrevious, MatchCase:=False).Column\r\n\r\n'move the range to the","distinct":true,"url":"https://api.github.com/repos/HotBreakfast/VBA_Correlation_Mac_Excel_2011/commits/4f636d961582633f836615d925b956a5d10a1ddc"}]}