Auto Sum With Irregular Rows With Existing Formula - Bold It And Draw Lines
Feb 28, 2014
I have a file with many different row sizes and after calculating the figure, we will need to add up the total for a particular job. Due to the irregular data on each job (some with only 1 line item where sometimes the job have few line items).
The cell to sum already has a formula for the data.
For example, I already have a formula on Column L to get the figures. After few line items, I will need to add a total to the lines item, also on Column L. I think we can uses 2 sets of data from 2 different column as "pointers", Column D and the formula column itself (but I don't know how to). The columns that I need a sum function will be from Column L to X. After doing the sum, can we at the same time draw a sum line? (single top line and double bottom line).
Am I being "too greedy" ? Imagine if we have more than thousands lines of such data to be added manually and to draw these lines manually.
View 3 Replies
ADVERTISEMENT
Aug 26, 2012
I am trying to automate drawing a flowchart based on a moel which the user can add or remove nodes and links from at will.
I can add shapes and position them but what I want to do is to insert connectors between existing shapes (I can draw two shapes and a connector at the same time but what I want to do is add a new node and then work out which existing nodes it links to and draw the lines)
Code:
Function AddConnectorBetweenShapes(ConnectorType As MsoConnectorType, _
oBeginShape As Shape, oEndShape As Shape) As Shape
'The ConnectorType can be one of three constants - msoConnectorCurve, msoConnectorElbow, or msoConnectorStraight.
[Code].....
View 2 Replies
View Related
Nov 30, 2008
On opening a worksheet. Can cell boarders X4 thru AF4 be changed to a bold lines and back to fine lines back and forth. Almost like a flashing cell?? Or even better like wave one after another?
View 9 Replies
View Related
Jan 22, 2013
I need to write a macro which inserts rows such that each ID has exactly 10 rows (1 for each brand). The difficulty is that each ID has a varying number of blank rows required.
ID
brand
10
1
10
3
[Code] ..........
View 9 Replies
View Related
Nov 2, 2012
I have a bit of code that I saved as an add-in. The code does a couple things: (1) Creates a right-click button that on action (2) draws a rectangular auto-shape that is the size of any selected range.
The add-in seems to loaded correctly.
However, when I launch a new excel sheet, my intent was to have the code (the right click option) be available whenever I opened Excel.
Is there another step to accomplish this?
View 7 Replies
View Related
Jan 26, 2009
I'm currently applying these formulae manually, and also instructing other people to do the same, due to my lack of understanding of macros. Hopefully someone can give me some instruction as to how to do this automatically. I'd like people to be able to open sheets sent as normal CSV's and apply a macro to get them into the right format, changing only rows with data in them.
These are the instructions I'm currently sending:
In cell n1 enter:
full phone number
in cell m2 enter:
=RIGHT("00000000" & J2,8)
Drag m2 to last record
In cell n2 enter:
=CONCATENATE(61,I2,M2)
Drag n2 to last record
In cell o1 enter:
Date of call
in cell o2 enter:
=DATE(MID(C2,7,4),LEFT(C2,2),MID(C2,4,2))
View 6 Replies
View Related
Sep 26, 2012
I have added three lines above the existing data, and now the print preview doesn't work. Where the range is names as X18 I have added to bump everything down. I get an error in the SetActiveSheet.VPageBreak..... line. I'm sure the issue is with the range, but I'm just not sure what the issue is.
Here's the code:
ActiveWindow.View = xlPageBreakPreview
Dim i As Integer
With ActiveSheet.PageSetup
.PrintTitleRows = ""
.PrintTitleColumns = "$A:$Z"
[Code]....
View 3 Replies
View Related
Jun 8, 2008
I am merging columns. Col B has all text in bold. Col C has all text in regular font. When I use ASAP to merge, the merged column comes out all bold. When I use a formula to merge the merged column comes out all regular. What I want is for the merged column to contain the bold text from Col B in bold, and the regular text from Col C in regular.
What I want is...
This is for service plan B: Take all data and transer to new server.
What I am getting is...
This is for service plan B:Take all data and transer to new server.
OR
This is for service plan B:Take all data and transer to new server.
View 9 Replies
View Related
Jul 31, 2008
I have designed a Macro to use an Advanced Filter to search for specific criteria in different columns. I would like the results to bold or highlight the cell if it meets the criteria for the advanced filter. There are multiple numbers in each row that are associated with each record, and I would like to be able to see which of these triggered the filter to work for that row by bolding or highlighting the individual cell.
View 8 Replies
View Related
Mar 16, 2012
I have made a custom list in Excel 2010 so it auto-increments the alphabet using the auto increment pull down/copy square on the bottom right of a cell in Excel. My question is I have some data in a sheet such as this
600
600
600
600
601
601
601
601
602
602
602
What I want to do is add a letter of the alphabet to the end of these numbers and have the alphabet auto increment based on the data above like this:
600
600A
600B
600C
601
601A
601B
601C
602
602A
602B
I thought it would be simple since I now have a custom list but every formula I try fails.
View 5 Replies
View Related
Oct 7, 2013
I have an Excel sheet with 2 columns : Date and TextColumn
The TextColumn column contains in each cell text such as this :
Title1
TextLine1
TextLine2
Title2
TextLine3
TextLine4
....
I need to split each line as follows : Each title (in bold and on a new line) and the text who follows should be placed in a new row, copying the date in each new row created.
View 1 Replies
View Related
Oct 17, 2007
I am trying to Find a cell containing a string ("derf" in this case). Then bold the entire row and continue to loop till it hits the end of the row and column.
Here is what I have.
Sub Macro3()
Range("B65536").End(xlUp).Select 'Finds the bottom in column B and sets it to endhere
ActiveCell.Value = "endhere"
Range("A1").Select 'goto the top
Do Until ActiveCell.Value = "endhere" 'The Do Loop Starts
Rows("1:30").Select
Set rfoundcell = Selection.Find(What:="derf", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False)
With rfoundcell
rfoundcell.EntireRow.Font.Bold = True
End With
Loop 'Keep looping till it hits the bottom of the columns row!
End Sub
View 2 Replies
View Related
Mar 2, 2014
Code that will turn the entire rows text bold and red if a cell in that row has the word.
New PO
View 9 Replies
View Related
Jun 26, 2013
Everyone always want to get rid of duplicate rows.
Is it possible to create duplicate rows of all the existing rows?
View 5 Replies
View Related
Jul 2, 2006
I am trying to make a word within a formula bold.
The word doesn't have to be bolded depending on the result. It will either appear or not based on the result of the formula. But obviously, if it appears, it [should] be bolded...
Obviously you can't format text on the formula bar. This is something I've wanted to do in Excel for YEARS!
View 10 Replies
View Related
Dec 31, 2008
i have a worksheet which has a price list for parts, about 2500 rows. in the Column C i have a retail price and in Column D have -5% of the C. i need to add Column E -10% of CERTAIN items, the ones in BOLD Only, of Column D. and change the color of that cell, is there a easy way to do this. i have attached screen shot what i mean.
View 9 Replies
View Related
Oct 4, 2006
whether it is possible to have a formula determine whether a cell (say a5) is bolded or not? I know it is possible using a macro but in this case would prefer to use a formula.
View 5 Replies
View Related
Aug 5, 2012
How do we run a macro if the selection is not bold and If bold then do nothing.
View 3 Replies
View Related
Oct 2, 2007
I am trying to create a macro that if a value in a cell in column A is bold, then the value in the same row in column H is bold, then loop it to run on the rest of the worksheet.
View 9 Replies
View Related
May 29, 2009
I have a formula that combines the the text of various cells.
Is there a way to automatically make part of the cell Bold - so in this case I want the Cell B13 to appear in bold.
See formula below:
View 3 Replies
View Related
Sep 13, 2012
I have a data example
Cell A1 which contain text I.E = "Words"
I have link B1 To cell A1 I.E = A1
Now what I want is I want the last two words or any alphabet between alphabet
to be bold
W O R D
Example
WORD or WORD
Any alphabet between word to be bold upon my requirement.
Instead of linking that cell to another cell , i want any value when entered into that cell.
That alphabet automatically becomes bold as this will not be requiring linking to that cell
View 4 Replies
View Related
Jun 8, 2014
I want text that's in bold in column B in sheet 1 of my spreadsheet to copy over into column A in sheet 2 of my spreadsheet - is there a quick way of doing this using code or a formula?
View 3 Replies
View Related
Mar 27, 2014
I have an existing formula in a cell linking back to a start date only. determining how to add an additional formula to exclude weekends, and possibly holidays.
View 2 Replies
View Related
Nov 30, 2009
need to create a macro that inserts 3 rows below each existing row of data and simply copies and pastes that data into each of the empty rows before moving on to the next unique row and doing the same thing again.
This is what I have so far, but I can't seem to get the loop right.
Rows("2:2").Select
Do
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
activecell.Offset(-1, 0).Select
Range(activecell, activecell.Offset(0, 5)).Copy
activecell.Offset(1, 0).PasteSpecial
activecell.Offset(1, 0).PasteSpecial
activecell.Offset(1, 0).PasteSpecial
Selection.Offset(1, 0).EntireRow.Select
Loop
View 5 Replies
View Related
Aug 7, 2009
Is there any way to automatically add two new rows after every existing row containing data?
For example
1 A B C
2 D E F
3 G H I
turn into
1 A B C
(empty row)
(empty row)
2 D E F
(empty row)
(empty row)
3 G H I
View 9 Replies
View Related
Feb 26, 2014
I have a table with 2 columns and I want to create another table with the same values in these 2 columns but add a new column with values that are different. So for example, I have col A, Col B with values 256 and 14. I want to create a table that has Col A, Col B and Col C with 256 in Col A appearing 60 times, 14 in column B appearing 60 times and new Col C has values ranging from -4 to 55 for each new row. So new table now has 60 rows with same values for Columns A,B but different C value
I can drag or copy paste but when I have 200 unique records in first table, I want to create a second one with 200x60 rows and drag/copy paste is tedious.
Input
ID
SqnID
256
14
[Code]....
View 2 Replies
View Related
Oct 18, 2013
I have been working on a macro that compares a existing list of data to an updated list of data and then either moves any data not on the new list over to a completed tab (followed by deleting the record on the existing sheet), and then adds any items not on the existing sheet, but which appear on the new list, to the existing list.
I have come across a stumbling block, i have managed to identify on the existing list the rows of data that have been removed from the new list and therefore need to be moved over to the completed tab, but when i select the data it selects the header row aswell (which will always remain the same row). Obviously this then pastes the header row aswell, and also i can't seem to get it to paste in the new sheet to the next available row (i.e this will be used daily and i don't won't to overwrite the infor already in the completed tab). the next issue i have is then when i go back to existing sheet to delete the data i just copied across, as the header was initially select this also gets deleted.
The code below, is the complete code, including filtering, copying some forumals etc. The area i am getting stuck on is highlighted in red:
Sub Update()
Dim bottomrow As Long
Dim My_Range As Range
bottomrow = Cells(Rows.Count, "C").End(xlUp).Row
Set My_Range = Range("A1:Y" & bottomrow)
[Code] .....
View 6 Replies
View Related
Aug 12, 2007
This task joins a string together based on a number of characters per cell in the range.
I want to isolate one range, Col N, and add an IF condition to it.
There may be other issues preventing this from happening, e.g. the number of IF that exist in the complete formula. I will isolate the current cell and its requirements and then post the entire formula at the end for reference....
View 9 Replies
View Related
Sep 2, 2013
The new worksheet is created to the left of the existing source worksheet.
View 2 Replies
View Related
Jun 27, 2014
I have one worksheet that contains a large table. I'm using VLOOKUP to spread each row of the table to separate worksheets.
When VLOOKUP refers to an empty cell, is there a way to set that row to be hidden?
Also, if VLOOKUP returns data to a cell, is there a way for Excel to automatically set the row height to display all of the linked data in that cell?
View 13 Replies
View Related
