Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Complicated insert / drag formulas
Hello I have a format which is 7 columns and 59 rows long (column A is hidden
all the time so that makes 6 visible), what I need to edit is from row 19 on. So starting on Row 19 I have a couple of formulas in that row, those formulas I drag them down with the following macro: Option Explicit Sub DragIndexVertical() Dim LastRow As Long With ActiveSheet LastRow = .Range("B1").Value Range("b19:f" & LastRow).FillDown End With End Sub So what I need is to add lines to that code to add the following: In this case the value in B1 gives me 4 more rows so this code generates from Row 19 - 23. Row24: I need to have a blank row Row25: C25=Sheet1!G24, F25=Sheet1!H24 Row26: C26=Sheet1!G25, F26=Sheet1!H25 Row27: Blank row Row28: C28=Sheet1!G27, F28=Sheet1!H27 Row29: Blank row Row30: Blank row Row31: "text written in here" Row32 - 51: Blank rows Note: this ahead I didn't come up with any better way to do it, any suggestion is welcome! Row52: "Sincerely" (Merge and Center B:F) Row53: Blank row Row54: "______________________" (Merge and Center B:F) Row55: =Sheet2!B1 (Merge and Center B:F) Row56 - 59: Blank rows Ok so those are the 59 rows, the complicated thing in here is that in this case the value of B1 on the code above adds me 4 extra rows with data but if I would have had 15 for example, not everything would fit in the sheet of paper. The "Sincerely" and all that afterwards would be left outside, it would be REALLY nice if instead of adding Row 32-51 in blank by default, it would add the result of substracting the resulting from the code above from 59, anyways maybe that is too much, at least with the above I would be happy with the code, i don't mind adding / deleting rows at the end! thanks for your time |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Countif formulas change after doing a sort | Excel Worksheet Functions | |||
How can I insert a row and have the existing formulas apply? | Excel Discussion (Misc queries) | |||
How do I insert OR in imbedded formulas? | Excel Worksheet Functions | |||
Formulas (If linked data is not null, then insert "Complete" in ce | Excel Worksheet Functions | |||
calculating formulas for all workbooks in a folder | Excel Worksheet Functions |