Automatically Format Header Row
Oct 18, 2006
I sometimes import data from an ERP Program to Excel. I want to write a Macro which will make the imported data more presentable (For example: draw borders for all the cells, give the heading a fill color etc. etc.). To do this I need to select the heading row. The problem is that each time there are a different number of columns.
How do I program the macro so that it will color all of the header? I saw a macro that does this on a pivot table and I want to do thae same on a regular table.
View 8 Replies
ADVERTISEMENT
Apr 17, 2014
I need to format my data without changing my header or adding a header without Column1, Column2...
I need to do this through VBA for two tables in columns A through C and E through K.
formatting every rows DARK and LIGHT manually because the data order will be changed?
View 3 Replies
View Related
Jun 30, 2006
I am trying to figure out a way to condense my code (improve my code) Right now I am using a Macro in Excel to go through a workbook by selecting each column individually and if there is something in the header then formatting that column as text. The problem with the way I am currently doing it, is that due to size limitations on the VBA code, I can only select columns A to Z, and if there is more data in the worksheet it is not formatted. Also I would like the code to check the header and if the word date is in there, format it as a date instead. Also if there is a way to delete any invalid ranges in the workbook
Sub Format()
Dim VarFileName As String
Dim VarPath As String
Dim VarSavein As String
Dim wsheet As Worksheet
VarSavein = Sheets("sheet1").Range("C2").Value
VarFileName = Sheets("sheet1").Range("A2").Value
VarPath = Sheets("sheet1").Range("B2").Value
Workbooks.Open VarPath & VarFileName
For Each wsheet In ActiveWorkbook.Worksheets
Sheets(wsheet.Name).Select
Columns("A:A").Select
Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
:= Array(1, 2), TrailingMinusNumbers:=True..........................................
View 3 Replies
View Related
Jun 23, 2008
Is there a way to link a header or a portion of a header to a specific cell?
View 14 Replies
View Related
Dec 22, 2008
I have been battling with this report I have been working with for sometime. Is there a way in Excel where I can automatically add zero into the time format?
The problem is I have to import data from another source and the time displays as a time format showing :59:00 insted of 0:59:00. Excel will not sum the calculation without the zero infront of the colon. This makes my report very time consuming. Can someone show me a way that I can automatcially add zero's infront when having data under 1:00:00?
View 6 Replies
View Related
Dec 27, 2008
I am trying to Formal my Cell Border automatically.
Lets say i have cells
A
B
B
A
A
A
These are single cells running downwards only. I want to format this 6 cells into 1 box using (outside borders) formating. I need to repeat this for every 6 cells into 1box...and continue on and on. Im doing this process manually...But i got like 100,000 cells...
View 5 Replies
View Related
Jul 13, 2006
AutoLinked keywords will cause extra spaces before keywords. Extra spacing is NOT transferred when copy/pasting, but IS if the keyword uses "quotes".
USD 100
EURO 100
Is it possible to automatically make it:
USD $100
EURO €100
View 9 Replies
View Related
Nov 22, 2006
I'm trying to write a macro that automatically italicize the a range of cells when you select a cell, and de-italicize it if you click it again. In this example, when select B12, the macro will automatically select B12:H12 and italize them. And if you select B12 again, it will automatically select B12:H12 and de-italize it.
This is what I have so far:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MyAddress = ActiveCell.Row
If MyAddress > 11 And MyAddress < 159 Then
If Not Intersect(Columns(2), Target) Is Nothing Then
Intersect(Columns(2), Target).Resize(, 7).Select
End If
Select Case Target.Font.Italic
Case "True"
Target.Font.Italic = False
Case "False"
Target.Font.Italic = True
End Select
End If
End Sub
The code above does not work correctly.
View 4 Replies
View Related
Jan 23, 2008
I have a sheet that comes from a pivot table that I have to format each month. It's a pain I was hoping a macro might be able to do. I was told this is the place to come for this. I have attached the the sheet unformatted and formatted. Note, there are 2 more columns on the finished sheet I add in to show totals. Also note col A has to be re-ordered each time (Safety, Environmental, Security, Vehicles, Operations).
Not sure about the complexity of this. Let me know. And let me know if I need to supply more info.
View 3 Replies
View Related
Jul 3, 2007
Is there a way to find cells that have a date in them that has a text digit with a 2 digit year to 'xx07' rather than having to click on the error and selecting it manually.
it's playing havoc when I'm pulling some data from another workbook so converting en masse would sort the problem out!
Anyone know how to do this?
View 9 Replies
View Related
Jan 8, 2007
I have a cell that is constantly being changed from a date to a number. Excel automatically formats the cell as a date when a date is entered but if I re-enter a number it leaves the format as a date.
Is there anyway to automatically change the format back to general if a date is not entered.
I had this bit of code obviously it dosent work.
If Target.Cells.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("E8:E46")) Is Nothing Then
If IsDate(Target.Value) Then
Target.NumberFormat = "d/mm/yy;@"
Else
Target.NumberFormat = "General"
End If
End If
Cancel = True
View 4 Replies
View Related
Aug 19, 2007
I need to bring in 2600 student names from a cvs file and have it formatted to an Excel workbook.
When it imports into the Excel file I need it to populate the proper boxes, such as:
StudentLastName
StudentFirstName
StudentID
GradeLevel
TeacherName
TeacherID
RoomNumber
I have the CVS attached. Hope I can get this done. As you can see it shows the teacher's name with their first initial, their teacher number that they are identified by and their room number. I need the student ID as well but not the phone number and the days of the week. This would save a lot of work.
View 9 Replies
View Related
Nov 18, 2011
I've been trying find an appropriate formula to extract the column header from a table in a different sheet if the row header and value in that table is known.
in the lookup table the row titles (column A) are product codes, column titles (row 2, D through AX) are business names and the table values are quantity.
In a different table I have product codes in column A and in column B i have the max number/quantity of products for that code. In column C i want to put the company name associated with the product and the number/quantity.
View 4 Replies
View Related
Aug 19, 2008
I am looking for VB code that will format a range of cells from a number format to a percentage format based on a reference cell. The reference cell is a drop down created from a list validation.
For example: If the reference cell (cell A1) =1 then cell range B2:C4 would be a number format. If A1 = 2 then cell range B2:C4 would be a percentage format.
I have searched for hours trying to find a relevant thread; I know they are out there, maybe I just wasn't typing in the correct search words.
View 5 Replies
View Related
Aug 30, 2006
Is there any way that I can have a column of cells change the entered 4 digit to a time format? E.g. when somebody enters 1212 in a cell it will automatically convert the entered numbers to 12:12
View 9 Replies
View Related
Dec 2, 2013
We have 3 PCs, all running MS Office 2013. On 1 of these machines, it is doing strange things with formatting. If you open a document or try to paste anything into certain documents, it decides everything is currency format and assigns all sorts of wrong formatting to the entire sheet, or the entire document. There may be some cells in the doc that are indeed currency, but only a small proprtion. If I open a new, fresh document and paste into that document, it does not do this, it seems to work normally, only applying currency formatting where it might be applicable. On some larger docs that have this issue, no matter what I do, it just continues to apply these strange settings.
View 2 Replies
View Related
Mar 9, 2012
I have a graph which displays information from a vlookup.. The vlookup can bring either numbers which are in percentages format or ordinary number format.
The question I have is is it possible for the graph to automatically change format depending upon the information who is looked up..
If so how can this be done..
View 1 Replies
View Related
May 7, 2014
I am needing a custom format for the following. I need a cell entry to be 1 letter, three numbers, a dash, 5 numbers, a dash, two numbers, a dash, and then two number. Example: A109-54785-13-00. The first letter will almost always be an "A."
To further complicate the matter, the entry is copied from an email and pasted without the dashes. In the above example, the number in the email would read, "A109547851300." I copy it from the email and paste it in the proper cell in the worksheet. I would like the custom format to automatically enter the dashes at the appropriate spot.
If it was all numbers, this would be easy. I created a custom format for the numbers, but when the A is included, Excel no longer treats it as a number and the custom format did not work.
Is this possible in Excel (without VBA).
I could use the custom number format I created and then later go back and add the "A" at the beginning, but that is as much work as manually adding the dashes.
View 2 Replies
View Related
May 16, 2009
The following code works perfect but the "change" event is only triggered when working directly on intersect range. Tried using the "calculation" event but could not figure it out. This is what I want:
1) To replace the code provided below using the calculation event
2) To only trigger the event for the row(s) where the new value was generated, not for the whole "For Each" statement
3) To use one single code for all worksheets, instead of copying the code in every working worksheet on the workbook, if feasible
4) And I would like a "second alternative", where the user of the workbook can click on a button and trigger the event on every row on the workbook that has a non empty cell within the intersect range, assuming that the intersect range column is the same for all worksheets
Private Sub Worksheet_Change(ByVal Target As Range)
Dim c As Range, d As Range, fc As Long, bc As Long, bf As Boolean
Set d = Intersect(Range("I:I"), Target)
If d Is Nothing Then Exit Sub
For Each c In d
Select Case UCase(c)
Case "C"
fc = 1: fb = True: bc = 4
Case "O"
fc = 2: fb = True: bc = 3
Case "D"
fc = 2: fb = True: bc = 46
Case "G"
fc = 2: fb = True: bc = 5..................
View 4 Replies
View Related
May 2, 2008
ABCDEFGHI need to create a macro to perform some conditional formatting1DateDayTypeTimeConfirmed Order No.Site Location2SHEET OVERVIEW301/01/08TuesdayAB4CVertically there will be 366 tables to represent 366 days and Horizontally 10 tables to represent 10 employees,5Dwhich enables the work activities of 10 employees to assigned over the period of a year.6E7AAFIn the type box marked 'A' and 'AA' the user selects from a drop down box a parameter as list below left.8GOn entry of an 'n' in the type box the user can enter data into the 'time','confirmed order','site location' boxes.9HThe idea of having 2 x type boxes is to allow the day to be split into morning and afternoon.10I1102/01/08WednesdayMACRO / VBA FUNCTIONALLITY REQUIRED 1213In the 'type' boxes if the user selects anything other than 'n' then the 4 'site location' boxes and coloured and 14the appropriate text from the list below left is inserted into the 4 associated 'site location' boxes.1516Example:1718Box marked 'A' the user selects 'h'. Boxes marked 'BCDE' and filled with colour and the text holidayBox marked 'AA' the user selects 't'. Boxes marked 'FGHI' and filled with colour and the text trainingType List Entry ParametersWhen the user selects type 'n' after the associated boxes are returned to there blank state (no colour or text)nnormal dayhholidayThe macro/vba would have to respond on everytime a 'type' box changesssickttrainingThere would be 2 x type boxes per day, 366 days a year and for 10 employees. Therefore it would have to monitoruunauthorised absence2 x 366 x 10 (7320) type boxesbbank holidayccompany shutdown
View 9 Replies
View Related
Feb 22, 2012
Cell C3 has "Joe"
Cell X44 is a VLOOKUP that retrieves "Joe"
Let's say Joe goes on vacation. The workbook user goes in and puts a blue fill in C3. Cell X44 would also need to change automatically.
What's needed to make this happen?
View 1 Replies
View Related
Mar 5, 2009
I have a booklet I want to print from Excel 2000. I'm not seeing how to have the HEADER on page one only. The header is coming up on all pages. Is there a way to tell Excel to print the Header on page one only?
View 2 Replies
View Related
Dec 6, 2013
Attaching the excel (QOS- ARP- Applications.xlsx) - Formula I am trying in D27, "X" value is there in the row and the corresponding application (Header ) should be the return in D27.
View 1 Replies
View Related
Jan 28, 2009
I have a worksheet that contains a number of rows. [Thank you, Captain Obvious!] These rows are logically grouped to represent a series of "items", with each item having one or more rows (with a "header" row at the top). The rows for a particular item represent different types of information about that item, and therefore make use of different formulas based on the row type. Due to the relative complexity of the formulas in these rows, I am creating a series of row "templates" from which I can copy and paste every time I want to create a new item or add rows to an item. As such, I am trying to avoid direct cell references to different rows, as these would easily get messed up during cut and paste. Instead, I am trying to limit myself to various lookup functions (e.g. OFFSET, MATCH, etc...) that will work regardless of where a row is added.
In order to accomplish this I am using a "key" column to group all rows for a particular item together. Until now I have had to type in the key value for every row for a particular item. What I would like to do is to only have to type the key value in the header row, and have a formula populate the key value in all subsequent rows ... until a new header row is reached, at which point the new key value will be used. Take a look at the following example: ....
View 14 Replies
View Related
Apr 8, 2009
it was possible to have my header which is in row1 to printed at the top of every page without having to manually put it at the the top myself. this is for printing only as i have frozen panes to make sure its always visible when in spreadsheet
View 4 Replies
View Related
Sep 18, 2009
Is there any way in excel 2007 to define a standard header and footer on the first sheet and use the same header and footer for all the remaining sheets within the workbook (same font and style as in first page).
Since I have around 25 sheets within the workbook i cannot do formatting and copy paste all the time. This will save my time alot.
View 2 Replies
View Related
Jan 31, 2013
I would like to add the column header to each of the row item and price, we maintain masters in the matrix format, butthe application supports only the row item mapping with the customer and pricing. Attached excel file
View 2 Replies
View Related
Jul 6, 2014
I have a document I want to be able to choose to insert a logo in the header across an whole document if it is not going to be printed on letterhead. I want the document to be transportable to different users so I don't want to insert an image with a file address but rather copy it from a hidden sheet. Is it possible to do this? If not, is there a way to hide or unhide images in a header?
View 1 Replies
View Related
Feb 26, 2009
I'm looking to automate an excel file, I have some vba code that formats the file. I think I have one last item I'd like to add. I'm trying to setup the header via VBA code, which I've done via the record option. I was wondering if there was a way I could have the header show the date the file was run. So, if I run it today, then it would read 2/26/2009...then when opened next week, for example, it will still read the 2/26/2009 and not the date it was re-opened.
View 2 Replies
View Related
Dec 25, 2009
I have a code that copies Sheet1 and send it via email. Everything works fine, besides that I can't get the header copied in the file that is going to be sent. I am attaching a sample workbook.
View 3 Replies
View Related
