Set coordCopy = Union(pm, release, proj, coord)įor i = 1 To Range(ActiveSheet.Range("A3"), ActiveSheet.Range("A3").End(xlDown)) Set leadCopy = Union(pm, release, proj, lead) Set coord = Range("I3", Range("I3").End(xlDown))
Set lead = Range("H3", Range("H3").End(xlDown)) Set release = Range("D3", Range("D3").End(xlDown)) Set proj = Range("A3", Range("A3").End(xlDown)) I greatly appreciate it! Sub copyTest3()ĭim proj As Range, release As Range, pm As Range, lead As Range, coord As Rangeĭim leadCopy As Range, coordCopy As Range I also haven’t even started on my third activity. I’ve just started to get frustrated since I can’t even do a simple copy and paste, yet alone loops within loops. I don’t even think it will help one bit and it would probably be better not to even look at it. Also again, this loop will stop once the cell in Column A is blank.īelow is my incomplete code. And again it will be pasting no formats and in the next blank row on sheet 2. So if the number in K3 it will look like it created 3 rows in sheet2-totaling 5 rows on sheet2 since activity1 and 2 each create their own row.Īfter these three activities are completed for row 3 on sheet 1, it will then move to row 4 and do the previous three activities and paste to sheet2. The third activity is to copy and paste sheet1’s F3,D3, and A3 a certain number of times referencing K3’s number-and each copy and paste will be in the next available blank cell. Also to note, some of these may be blank (except A column) but I still need that row there with at least column A data-this goes to say with all these activities. The next activity is to copy cells F3,D3,A3 and I3 from sheet 1 to sheet2 pasted below the previous copy and paste-again no formats just values. A destination functions can’t be used because I need just the values and no other formats-one of the many issues I’ve ran in to. The first activity is to copy cells F3,D3,A3, and H3 (in that order so F3 will be A2, D3 will be B2 etc) from sheet 1 to sheet 2 to A2,B2,C2, etc. Sheet1 data starts at A3 and sheets2 paste area starts at A2. This will continue downwards until column A is blank in sheet1.
#Growly notes copy paste no formatting how to
I believe this will involve loops and I’m so new with VBA I don’t know how to do it.įor each row on worksheet 1, I would like to perform 3 different copy and paste activities to worksheet 2 and then it will loop down to the next row on sheet1 and do the 3 activities and so on. I’ve been researching a ton, but can’t seem to combine answers to help with my scenario.Įssentially what I’m trying to do is grab data, line by line, from one worksheet and extrapolate it to another worksheet.
#Growly notes copy paste no formatting code
I’ve been working on this VBA code for a while and since I’m a complete noob I feel like I haven’t gotten anywhere.
0 kommentar(er)
