I recorded this and I was wondering if there was a more simple way to add a thin style border to my cells?
'Insert BorderUnion(Range("K6", Cells(LastRow, "K")),
Range("B6", Cells(LastRow, "B"))).Select
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
[Code] ......
How can I replace the border style with a macro across my entire data?
I would have assumed something like this would work:
[Code] .......
Is there any way to modify the 1st style under the Light category? I like it because it's the most simple but it won't allow me to Modify or Duplicate. Is there a work around to duplicating/copying it? I've tried manually creating a new style but I can't get it to get the lines fills correctly.
View 2 Replies View RelatedIs there anyway to select all cells with a particular style in a worksheet? Like a "Go To" (F5) or Find Styles equivalent?
View 2 Replies View RelatedI have a spreadsheet wherein the defined data input cells are formatted using styles, i.e. data input style. I would like to know how to select all cells formatted with that style within a spreadsheet (whether worksheets are visible, hidden or very hidden) and delete the contents of those cells while still keeping the cell style.
View 9 Replies View RelatedI want to know if there is any formula to match two numbers which have same digits but are in different style. I have attached a spreadsheet with numbers in column A and Column B. Both columns have the same number just the style is different, is it possible that i get a match based on the digits match and then return the output as correct or wrong?
If all digits match from column A with column B it should show as correct else wrong.
How can I concatenate 2 cells address style? I'm trying to merge 2 cells into one, so that one is under the other in the same cell.
View 5 Replies View RelatedIs there a macro that can select all cells with a certain style and then clear the values. The idea is that a big document has cells that are formatted as "entry-fields" and others that are not. I want to be able to select all of them with a macro (they are everywhere) and clear them of their contents (hence a reset button for this style).
I've tried something with If Target.Style = "entry-field" Then but i don't know how to search for them and have them in Target or a variable in the first place.
i have just recorded a macro to put thin borders in columns L and M, but it needs cleaning, ...
View 9 Replies View RelatedI am in the process of developing a tool to generate Bar charts for a set of metrics data. PFA the screenshots for the bar charts. enough spacing is needed in the bars.
ActiveChart.ChartType = xlColumnClustered
i had also axes.group=2 secondary axis.
Below a small example with the borders as they should be. How do i get a macro to put the borders automatically, depending on the similarity of the cells in column B ? Note the blanc column with the borders should be made automatically as well. Second problem: the minimum height of a "border" should be 34pixels as in the example so you can write something in there after printing the sheet.
View 9 Replies View RelatedI need to underline certain cells based on the value of a cell in this case from column "E". Right now I run a macro to look at the value in each cell in column "E". THe macro then adds a certain amount of blank rows below the that row. So, if cell E1 has a 4, my macro runs a calculation that says 4 divided by 3, +2. So it would add 3 blank rows under row 1. It does this all the way down my column of data.
Now it gets tricky. To the right of column E, I have 6 blank columns, F,G,H,I,J,K. F,H, and J are spacer rows with no data. I need them blank with out any borders. Columns G, I, and K are the columns that I am wanting to add borders on the bottom of the cells based on the value in column E.
I need code to look at the value in E1, in this case 4, and add borders to 4 cells, in this case G1, I1, and K1 and then G2. If the value would have been 5, I need I2, 6 would add a border to K2 and 7 would add a border to G3. Catch my drift?
So, every cell in column E will not have a value because of me adding blank rows. So when there is a value, I need to add borders starting on the same row the value is in. At most, there will only be 3 underlined cells per row because of the format. Once the top row is filled, I need to drop down to the very next row.
I am trying to have a border drawn around a group of cells. This group of cells changes per list I make, but only the height changes. The width is always the same (from column A to column J) and the top is always at row 5. Only the last row changes. How can a border be drawn around this group of cells no matter the size of the group of cells? Below is the macro I have written so far.
Cells.Select
Cells.EntireColumn.AutoFit
ActiveWindow.SmallScroll ToRight:=7
Columns("K:N").Select
Selection.ClearContents
ActiveWindow.SmallScroll ToRight:=-7
Range("A2").Select
Rows("2:2").RowHeight = 49.5
lastrow1 = Range("A65536").End(xlUp).Select
Range("A5:J" & lastrow1).BorderAround.Weight = xlThin
lastrow2 = Cells(Cells.Rows.Count, "C").End(xlUp).Row
For I = lastrow2 To 2 Step -1..........................
I have an extensive spreadsheet with several columns and all showing borders where each cell/column begins and ends. However there are a few cells where the break with the next cell does not show the line.
I have highlighed the cell in question, gone to format/cell/borders and everything looks fine. Black color + format border shows square with all sides of square showing.
I've got some VBA that adds and removes a border around a merged cell. I created it by recording a macro and it's pretty clunky. It needs to do this for 6 different merged cells, based on different events and takes around 5 seconds to complete. Not a major problem, but I was hoping that I could make it more efficient. Anyway, code below:
Adding the border:
Code:
Sub AddRAGBorderChart1()
'
' AddRAGBorderChart1 Macro
'
'
Range("D4:M15").Select
[code]....
Removing the border:
Code:
Sub RemoveRAGBorderChart1()
'
' RemoveRAGBorderChart1 Macro
'
'
Range("D4:M15").Select
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
[code]....
Using VBA how could I put a border around any cell that isn't empty within the range B1:C500. (Worksheet name - Floc BOM)
View 9 Replies View RelatedI am trying to Put a border around cells that arent empty. Is this possible?
View 11 Replies View RelatedI'm writing/recording a macro and would like some VBA code. I'm trying to make a border around all used cells in my sheet. When I use the macro there will be a variable number of used cells.
I'd like code that says:
If cell A2 has text then format cells A2:CL2 with an outline border Repeat for each row in the sheet until there there is no more text in column A.
Also, not sure if it matters, but I'm working on a mac.
I'm trying to double-click a cell to edit the contents, and I am off a few pixels, it treats the double-click as a double-click on the cell border, not the cell contents, and the focus jumps to another cell in the direction of the border instead of going into edit mode. The effect is as if I had pressed Ctrl and the arrow in the direction of the border I clicked on.
The only way I've found to disable this is to turn off the option "Enable fill handle and cell drag-and-drop", but unchecking that also disables actually useful things, like dragging the corner of a formula call to copy it down, etc.
Is there a good way to disable this cell jumping when I accidentally double-click a cell border?
I would like to draw the border for the cells with in the usedrange from column A to BM.
I have the below code, that I was using to border the column D alone.
When i change the range from "A:BM", i dont get the intended output.
Can somebody tell, what modification, I should do to get the desired output?
I have unprotected cells in excel where I need to change the content (number) and cell color, but I don't want the cell borders to change. I'm a beginner with vba. I've tried protect sheet and workbook options, but looks like I need a vba code and don't know where to start.
Win 7
Office 2007
Trying to use Excel Data List to create a database style report. IE. Originally blank sheet, which is only populated by data containing data matching "filters" input into cells ( say A1 & A2 )
I.e. A1 = Delivery week to be filtered by, and B1 Manufacturer Name
So if I type week "1" into A1 & Manufacturer "Microsoft" into A2, it will show a table only containing data Microsoft, Week 1, and associated data for those lines across the screen.
Week 1
Microsoft
PO number : Date Ordered: Address 1, 2 3 etc....
0011 01/01/13 Somewhere
0015 02/01/13 Anywhere
0213 05/01/13 Nowhere
I know this is much easier with a database, however my manager insists a database cannot be used, and it must be in a spreadsheet format !
I have tried to reset the cell reference style back to A1 from R1C1 (Tools-->Options-->General tab-->uncheck R1C1 reference style), but when I close Excel and reopen it, the reference style changes back to R1C1 style. When I make the change I described above using the Options feature, it changes it for the current file and saves it with the file. When creating a new file in the same session, it keeps the A1 reference style, but when I close Excel and reopen it, it returns to the R1C1 style. Any ideas about how to return to the default A1 reference style for the next Excel session?
How to set macro shortcut for toolbar items which do not have a shortcut already like the "," style button which converts 12000 to 12,000
View 6 Replies View RelatedI have a table that has, amongst many columns, a year, month and a name column.
I want to do a formula that takes in 3 values (name, year, month) and returns a sum of values found in a variety of other columnswhere these 3 values are matched.
I would know how to do this in SQL but wonder if Excel can do this type of thing on one large data table?
I have this code to copy excel data to a word document:
Code:
Set wrdRange = wrdDoc.Range
With wrdRange
.Collapse Direction:=wdCollapseEnd
.InsertParagraphAfter
xText = Rng.Cells(i + 1, 1).Value
.InsertAfter xText
.Collapse Direction:=wdCollapseEnd
End With
I need to apply a heading style to xText after inserting. xText can contain many words.
i have quite a lot of excel 2003 spreadsheets which once edited and saved by excel2007. now, i'm using back excel 2003. (because my efficiency dropped by half by searching the command i wanted in excel2007.) when i open them with excel2003 again, there are a lot of styles. i want to remove them. but it is a tedious job to remove them one by one for these spreadsheets.
View 3 Replies View RelatedI have an excel that gets updated monthly with new sales data. The sales data comes straight from our custom CRM system in a .xlsx file. All columns on this spreadsheet have a column type of general.
In the excel that is updated monhtly however their are certain columns that are set to a date type so that we can group pivot tables by date. Currently I have to paste the data that is exported from our CRM system into the monthly spreadsheet (beneath all the prior months data), create a new column next to any date field and then use the formula
Formula:
[Code] .....
I then have to take the resulting data and paste them as values over the original data so that it is in the correct format.
Is there a quicker way of doing this so I don't have to keep adding a new column and doing the forumula, can I somehow set the column so it automatically converts data in a general format to a date format.
I have been trying to get a back button to work on an 2003 excel document that works like a website.
In the web toolbar there is a facility to go back and forward (very much like using internet explorer). I want a button on the actual sheet that does this command. If i record a macro and click the web 'back' button it records the end result of the process, not the process itself -
eg if sheet 1 and sheet 2 link to sheet 3 and I click a hyperlink from sheet 1 to sheet 3 then create a back button on sheet 3 and record a macro by clicking on the web toolbar back button the macro records the end result - eg Application.Goto Reference:="Sheet1!R14C8". However if i then go to sheet 3 through sheet 2, the back button I created takes me to sheet 1 not back to sheet 2.
Anyone know the code I could use to make it actually go 'back' to the previous page?
we in india to any number put comma as stated below
ie 15,13,10,565.00
fifteen crores thirteen lacs ten thousand five hundred sixty five only.
00,00,00,000.00
but excel we have only thousand separator.it separates the number after every thousand.
can it possible in excel to formate number as per our style.
00,00,00,000.00
