I am doing a lookup, populating a column (which works although slowly) then (in this part) doing a search on the header row.. If the heading contains the word "Category", I wish to insert a blank column next to (the column containing the heading), colour it yellow then look for the next heading and repeat if found.
It appears to clear my first row so I must have my columns referred incorrectly as rows
Dim FWord As String
Dim i As Integer
Dim lCol As Long
Dim MyString As String
.
.
FWord = "Category"
lCol = Range("A1").End(xlToRight).Column
For i = 1 To lCol
Cells(1, i).Value = MyString '
I have a row of Headers A1 thru AO18. What I'm trying to do is have a small macro to go out and find "template" whichever column it may be in and insert a column to the left. I can make Excel insert the column to the left but obviously I can't have a fixed column designation because it will keep moving to the right of it and it won't work anylonger or I should say it doesn't put the column where I want it.
I have a 2 groups of column headings with a different month and year in each heading so
1st Group of columns range Columns AJ through AX Column Heading example "Expense Ratio February 2013......next Column over is "Expense Ratio March 2013"
2nd Group of columns range AY though CE Column Heading example "Capital Balance February 2013......next Column over is "Capital Balance March 2013"
Each new month I need to add a new Expense Ratio column after the most recent expense ratio Column. (i.e. Find "Expense Ratio March 2013" and I need to add a column after that with heading "Expense Ratio April 2013"
Same thing for Capital Balance - add a new Capital Balance column after the most recent Capital Balance Column. (i.e. Find "Capital Balance March 2013" and I need to add a column after that for "Expense Ratio April 2013"
Because the ranges keep changing month over month, how do i do this.
Pls help me do a macro that upon clicking a button it will copy and paste a column heading (located in Row1 of Sheet1) to all non-empty worksheets (Sheet 2 to Sheet N) in the workbook simultaneously. Note that each worksheet has no column heading and has the same number of columns as that of the column header in Sheet1. Worksheet 2 to Worksheet N contains data extracted daily.
I have one worksheet which comes out of an online application (for the purposes of this example I will call it "Online Sheet"). The column headings in this sheets are always named the same but could theoretically appear in any column address. For example, the column header "Completed" could appear in column "X", or "AT", or "ZZ".
On a second sheet (called "Code Sheet") I have to unscramble all of this data into a standardize layout. Each row value has a unique ID which appears on both the "Code Sheet" and the "Online Sheet". However, in the "online sheet" the unique ID could also appear in any column. Like the "Completed" column this column also has a unique column heading ("Unique ID").
Using Match I can calculate the column number in which the "Completed" column appears in this instance of the online data. For example, "Completed" = Column "25". However, I now need to use some lookup function on this column based on the row in which my "Unique ID" appears of the "Online Sheet" (which could of course be in any column in the "Online Sheet").
For example, if "Completed" is in column "25" and the "Unique ID" which I am referencing on the "Code Sheet" appears on row 14 in the "Online Sheet", then the lookup formula must return the value of column 25 row 14 on my "Code Sheet".
I have a master data sheet with four columns, A, B, C and D
Column A has the primary data and B,C,D has dependent data values;
So when I insert a new cell in Column A with cells Shift Down, I want mandatorily new cells to be inserted in the same row in col B, C and D as well so that data integrity is maintained;
I need to put an extra "spacer" cell in each row that contains either 8 or 9 blank spacer cells in columns A through H or A through I, respectively, so that everything in those rows shifts to the right by one column. The problem is that all the other rows don't need any extra spacer cells. There is no pattern to the rows that need the extra spacer cell (such as every 5th row, or something).
I have a workbook that usually looks something like this
Category Product No description Price
Balloons 12345 Red Disney balloon .50 Balloons 12567 Blue Princess balloon .86 Balloons 76521 Angry Birds Balloon .80
Kites 23456 A Big red Kite .27 Kites 22222 A small blue kite .06
Banners 10000 Party banner .33
etc..
I need to find a way to copy the category below an empty row from column A and paste it in the blank row in column B . If possible to bolden the text but I could probably work that bit out myself. I'm new to this but have used VBA before to run macros.
After importing a data set into the worksheet entitled "SPACE", I am trying to find the column entitled "Variability Cpu" and then for every cell in that column that has a value in it, I would like to insert a new row beneath that cell. I thought my code made sense, but I get the "Run-time error '424': Object required" error on the line in red below so apparently I'm missing something. why I'm getting this error (doesn't the object variable shtS refer to the worksheet object "SPACE"? Why is it saying object required?). Here's what I've got so far:
I am trying to come up with a code that will copy column A entirely, and insert the copied cells into the first blank column. In the columns with information in them, there will always be text in the first cell, so that can be used as the test to find the first blank column, but I'm not sure how to get this done for my macro.
I'd like to have done is to have a blank column inserted between columns W and X(these values change so the VBA statement should reference the end of the columns) and the values that are now in column Y(April 17th values) pasted as values into the now empty column X. I would like to do this for tabs Ann-Sheet 2. I'm having a bit of trouble with setting up the loop that would go through the desired sheets.
May seem straightforward, but not to me. I need some code to scroll down column A and insert the sum total of A2:A16 in B17, and repeat this everytime a blank cell appears in colum B, continuing down to the end of the worksheet.
I am looking for a VBA code (or alternatively a way of doing this in normal Excel) that can let me insert a column every X columns (for example every six columns).
Ideally I would want a code that can let me insert a specific column (the same) every X columns, but a formula that inserts a blank column every X columns will hopefully do.
I am trying to find a formula that will sum the values of two columns with the same heading (in my case the heading is "GST"). Every month this info changes, so the GST may not be in the same column all the time. I have around 1000 rows I need to sum. Example data below:
Amount GST Amount Total Card Fee GST Card Fee Total
[Code]...
Is there a formula when I can sum two columns based on the column NAME?
In a gradebook spreadsheet, there is code to add new columns to right of existing columns. Each new column should be included or appended to a particular Named Ranges--named with the same name as the column's heading. Here is existing
Sub mcrNotes()
' This adds a column for student notes, such as daily progress notes. ' The heading for the notes column is "Notes" ' The pre-formatted columns are being copied from a sheet named "Fields". ' The columns are inserted into a sheet named "Grades".after the last data column. Sheets("Fields").Select Dim Ndate As Range Set Ndate = ActiveSheet.Range("E11") Ndate.Value = Date Columns("E:E").Select Selection.Copy Sheets("Grades").Select lastcolumn = ActiveSheet.Cells. Find(what:="*", SearchOrder:=xlByColumns, SearchDirection:=xlPrevious).Column.......
Is there any formula out there that will loop through columns and automatically define name ranges. I need some code that will automatically assign Names to the first row of the individual columns and then automatically define the range ie with an offset command.
I have a worksheet with data in columns F,G,H and I. There is a total in column J. (=SUM(F1:I1)
I've written some code that allows a user to insert additional columns. However, I'm finding it difficult to find a way of changing the calculation in the total column automatically when a new column is inserted.
The yellow highlighted column F (each Reason) in the sheet2 to be placed as main header in the next column and so on as seen in the sheet 3
If they have two similar item number with 2 different reasons - delete the duplicate item number and place the number in each column according to its reason as seen on row 16 on the sheet3
If they have two number with similar reason - just sum up the number
I have an excel spread sheet with several rows of 265 (9A-IV) columns each with a heading. I would like to transpose the worksheet columns so that the heading is placed in Column A against the corresponding that is placed in column B. For example
How to get the Column Alphabet based on the Data it contains or the Column Heading using VBA?
Is it possible to get the Column Alphabet using any Macro or any function that within a Module it can always take the New Column Name during Execution..
Example: I have certain Columns where I have Yes and No Tick using the Wingdings P and Y.. Now these Columns are alternately Placed and there are six columns in all and they are spread over 12 Columns as the Alternate COlumns is reserved for Manual Entries.
Now I intend to increase the Manual Entry Columns but the problem is that every time I do that I need to make changes in my VBA Code.
Is it possible that even when the Columns are Inserted or Deleted in between before or after these columns I dont need to change the Explicit references by changing some approach.
I am not fuly conversant in VBA but use it whenever things are not completely feasible with Formulas AFTER GOOGLING.
Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Range("X3:X13")) Is Nothing Then ' You can Change the range here Cancel = True
[Code]....
As you can see the Ranges are Alternately Placed and there are about 6 such Columns with the above TICKS..
Now, how do I keep it FLoating so that even after changing the COlumn Location it does not need to get Updated i.e. X and Z Column Alphabets..
I want to bring some scattered rows in data range directly underneath the appropriate columns
Here is the description of manual way of doing the same task.
1. first, I check for last empty rows in column "M" i.e for country(By pressing CTRL + Down arrow key in column "M") and then i look into the immediate next empty rows where is the date values, usually i found it into next rows but in a different columns. so i copy the range one cell before from date values till last columns in that same row and i bring it back to the original row where it should be indeed.
For example after pressing CTRL+down arrow key in columns "M", If i see date values In next immediate rows "E7". I copied from "C7" or "B7" (one cell before date value cell) ,depending on In which cell the date value is sitting till last columns i.e "N7" and paste it manually to "D6". and I do repeat the same work manually till i aligned all rows to their proper place.
I have a 70x70 table where I teased out the largest 20 values. I'd like to utilize a formula to deliver the column headings (as well as the row) headings for each of these 20 values. VLookup and HLookup don't seem to work for me, and Index/Match seems to only work for single columns.
It might be worth mentioning that is highly unlikely that any of the values in the table are repeated.
I'm really tired of searching manually for the column containing a heading, as I have many columns. Isn't there a "simple" way to make a dropdown containing all the column headings in row 1, and upon selecting the heading of interest, have excel "go to" that column (maybe using a Find macro)?
