I'm new to VBA coding so please educate me. I'm looking to do the following:
Read a range of cells
If the active cell is > 1
Copy the cell
Move to another cell: offset(-3,-2)
Paste the value
Else
Read the next record
I started playing around and got the following code but...
I tried the new code, but still the same result. And yes I want to copy the entire row. Here's the new code in place:
For Row = 1 To Boxsize
If Rows(Row).Hidden = False Then
Rownum = Rownum + 1
'Rows(Row).Select
'Selection.Copy
Rows(Row).EntireRow.Copy...
I have the following code to copy a row that is not hidden , then pasted to another sheet in the same workbook. The problem I have is that the formatting is all gone in the destination sheet. Here's my code:
Sub CopyLine2()
Dim Boxsize As Integer
Dim Row As Integer
Dim Rownum As Integer...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.