I have a code for copy from source to target the values, formats, and column width. Unfortunately this process can't keep the height of the rows from the source to the target worksheet.
I found some short code but i can't implement in my existing code:
My original macros:
Please Login or Register to view this content.
Please Login or Register to view this content.
Last edited by ccsmith; 11-03-2012 at 03:32 PM.
Hello ccsmith,
Try it like this;
Please Login or Register to view this content.
Please consider:
Be polite. Thank those who have helped you. Then Click on the star icon in the lower left part of the contributor's post and add Reputation. Cleaning up when you're done. If you are satisfied with the help you have received, then Please do Mark your thread [SOLVED] .
unfortunately the your suggestion don't work.
Isn't there any special xlpaste commend for row height?
In the following part should be insert a command which can keep the height of the rows from the source sheets.
Please Login or Register to view this content.
See the attached sample WorkBook complete with code, and try to implement it in your project.
If you still have a problem, then upload a sample of your WorkBook, so that I can see how to help.
Sorry, just noticed that you are using Excel 2003.
See attached WorkBook for same.
Thanks for your sample file. I tied to implement without success.
Therefore I upload my sample file. Please help me to modify the code to I can keep the height of rows as well in the new sheet.
There are a few lines of code that I do not know what you are trying.
I have placed comments next to some lines for your information.
Try the attached Workbook now.
Hope you are happy with it.
Thanks for your answer but it isn't working in the way I need.
The original file do the followings:
- from sheet4 row 6 the data go to arrays in sheet2 filling the cells
- from sheet2 the filled chart must copy to sheet3 (with values, column width, formats, row heights)
- from sheet4 row 7 the data go to arrays in sheet2 filling the cells
- from sheet2 the filled chart must copy to sheet3 (with values, column width, formats, row heights) under the last filled row (r = r + 16)
and so on.
Please run the macro in the attached file and see the result in sheet3
The macro is working fine but I don't find the solution to copy the row height from sheet2 to sheet3 not just only range A1:G16.
O.k. Now for the Bad news. I found Merged Cells, and that causes a myrid of problems, especially when you are trying to copy and paste, and the Cells in play are not identically Merged or sized.
I have removed the Merged Cells, and changed the Code to Copy the UsedRange from Sheet2 to Sheet3.
If that works for you, then I am happy. All you have to do is Uncomment the Code you still require with regards to the other steps of your Project.
@ccsmith
Please dont create 2 threads for the problem the same day.
I created a solution at your other post http://www.excelforum.com/excel-prog...html?p=2993685
Thanks,
Mike
If you are satisfied with the solution(s) provided, please mark your thread as Solved.
Select Thread Tools-> Mark thread as Solved.
Winon. Thanks for your effort but unfortunately it is not working like I need.
Original file (attached sample5.xlsx) is working fine. It can copy the range by range to sheet3 with merged cell as well.
The only problem is that don't keep the row height.
I should copy range from sheet2 with format, row height, column width format and values to sheet3 then fill sheet2 again with new data and copy on sheet3 below the first copied range.
Please check the result on sheet3 in my sample file where you can check the result and the problem with the row height.
Then try this one.
Sorry to say but it is not good. No problem.
Do you have solution for the following?
I want to set the row height of row: 10; 11; 12; 13 to value 30.
and each row below these ones with steps 16 ie:
rows 10+16= 26; 27; 28; 29
rows 26+16= 42; 43; 44; 45
and so on as far as the last row contains value End(xlUp).
Give this a try
Please Login or Register to view this content.
Many thanks for your all effort.
With your last solution I set the height of each row to the preferred one.
Thanks for your toleration toward to me.
Just one more request:
When the macro find an empty cell it gives a error code: Subscript out of range.
Can you add a line to skip the empty cell and go to the next cell.
Please Login or Register to view this content.
What column has the empty cell? Is the whole row empty? How do you know its an empty cell giving the error?
Have you changed the layout of sheet 2. Did you unmerge cells?
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks