lastrow.copy

Good morning all! I've been trying to used multiple posts for reference, but i'm stuck on the last piece of code to make this sheet work. When i create a new sheet, based on the submission of data through a userform, it should also copy the data to the new sheet created (to automatically start...

Hello, I would like to find the code to set a start cell to check if there is a number in it, if not check next cell in the row? Example sometimes the source data is in BL3 and others its BK3. so if I can set a short loop it might solve an issue. ws2.Range("A1").Value = ws1.Range("BL3").Value...

Hi all, Workflow below ALL Code resides in sheet "Super Automation" Information is gathered on "Ads" tab and brought into "adstemp" Advert Data is opened and relevant tours gathered Advert Data closed, tourlist is loaded into Automation Hub Several spreadsheets are now opened (Regional Press...

Have the below code to simply create a new tab, then open a new workbook, switch between the two tabs and then close the workbook. ' Add Price Panel information to Temp sheet. Sheets.Add.Name = "Temp" Set Temp = Worksheets("Temp") Temp.Activate Range("A1").Activate Set PP =...

Can anyone tell me why this isn't running please? Thanks in advance! Sub Upload() Dim src As Worksheet Dim trg As Worksheet Dim LastRow As Long Set src = ThisWorkbook.Worksheets("MASTER") Set trg = ThisWorkbook.Worksheets("UPLOAD TEMPLATE") src.Range("A5:A" &...

I want to copy the contents of a range as long as the number of cells in the column have data. Starting from Column D1. Here is my code: Worksheets("DATASHEET").Range("D1:BD" & LastRow).Copy However, the code is copying from A1 vs D1, any suggesting please? Thanks.

Hi All, I am fairly new to VBA coding however a lot of people at my work rely on me to create useful macros for our office. One of the reports that we pull from our employee portal is absolutely atrocious and I have been tasked with formatting it correctly. So to give you an idea of the data...

Hi, I'm trying to get a macro to copy the last 30 rows of data to a different sheet. I have the code below but I am getting "Run-time error 1004: Application-defined or Object-defined error" I've tried a few different things but can't work out what's causing the error. Sub Last30() Dim...

I have this code in the "This Workbook" section. It functions well, but not perfectly. I'd like for it to continue the copy and paste routine until the value in column BZ, in the LastRow, = "Current". For some reason, it only pastes 2 or 3 rows at a time. What change do I need to make to the...