This macro is extreemly basic but i have no skills in excel with macros. Basically i have 'Column A' with stats that i need input into 'Column B', however i need then to be input inside a field that is already there.....
View 4 RepliesI am looking for a Macro that will search a column for blank cells, and when one is found will add text to the same row in another column. For example: The below is a spreadsheet. I am trying to find something that will search through column "C" in this case and add text (of my choice) to Column "A" if the cell is Blank. So Since cell C1 is Blank then Type "ERROR" is cell A1.
A B C D E
1 X X X X
2 X X X X
3 X X X X X
4 X X X X
5 X X X X
I am running Win XP and Excel 2003.
I have a macro I found here on the boards written by Lenze to delete an entire row based on what is found in column A. I would like to delete any row where Col. B contains 10 or less characters and I have modified it to do so (or at least I think it does). My problem is that it takes about 12 minutes to run the macro (I have about 50k lines to run through). I was wondering if this is the fastest method or if it examines things other than just column B.
Sub Test()
Dim i As Long
LR = Cells(Rows.Count, "B").End(xlUp).Row
For i = LR To 2 Step -1
If Len(Cells(i, "B")) < 11 Then Cells(i, "B").EntireRow.Delete
Next i
End Sub
After this runs, I am left with Columns A to somewhere around AH. The columns are generally in the format of text followed by a numeric column. An individual text column has the same name through all of the rows. The numeric columns have varied values whether negative or positive.
Ideally what I would like: If a given cell (ie. C2) in Row 2 is numeric, then copy the cell to the left (ie. B2) into (ie. C1) and then delete Column B. I need this to work for multiple columns from B to C, skip D and E, and then from F to AG (and maybe beyond).
I have been working with a few people on here to setup a macro to copy text from a column of cells to another column and then print this in to a text document but it seams to have got stuck in a loop ....
View 9 Replies View RelatedI have a macro that copies data from one sheet to another. I would like getting the macro to figure last row used in column B from B3 on and put the word Sum below it. For example, if last row used is B64, on B65 would like the word sum on it.
I cannot just input in as the number of rows could change when macro is run. Data is dynamic.
Here is simple code I have:
Sub Weight()
Sheets("Final Month").Select
Range("A2:B1055").Select
Selection.Copy
Sheets("Final Weight").Select
[Code] ...........
In my "cover" sheet I click the allocate cover button and it then generates a list of data below the first table. This generated data now needs to update the "timetable" sheet by using the "allocated cover teacher" and "period" cells as a reference to then input the class code into the timetable at this time.
cover.jpg
So in this picture we see that Dorothy*Schultz (in cell E27) has been given a class 3 MABA RM 15(cell D27) on TuesdayP1 (C27). I want search for Dorothy*Schultz and TuesdayP1 in the "timetable" tab to input the name of the class which in this instance would be input to cell I20 in the "timetable tab".
VBA COVER Forum Version 1.xls
I would like to delete a column using data validation list. for example :
i have a data validation INPUT list in cell A1 (Part No., Supplier 1, Supplier 2, Supplier 3) the heading start from B2,C2,D2,E2,F2. If user select Supplier 1 from data validation list in cell A1, the column Supplier 1 [c2] should be deleted.
And/or also if in cell B1 have a data validation INPUT row list (Part no.) & if user select part no.,
the selected part no. row should be deleted.
I have 02 separate excel workbooks
01 = source file
02 = data list
The workbook "source file" contains all the data
The workbook "data list" contains data for work with Drop-down list. And i can easily select my required description by just dropping down the list.
In case, i have new description i add it in the source file and it is updated in the working "data list" sheet.
This applies to Field device column also. But i want to improve the selection criteria by creating such script or formula which could check the input of the description and automatically selects the field device and its relevant signal (output type).
Screen shot is attached : Automatic Selection.jpg
i want a macro to search all of column A in multiple sheets for a date that has been put into an input box.
the matching dates have data corresponding to them in that row. i want the date and data from the row to then be copied into a new sheet.
CountryHourDataTotalData
Austria - A10Sum of SeiA51CountryHourSum of SeiASum of SeiT
Sum of SeiT4.88Austria - A10514.88
1Sum of SeiA561562.83
[Code]....
left side pivot created in vb 6.0 & right side pivot table created manually in excel.
i want to generated pivot table using vb 6.0 same as right side pivot.
Set PRange = ws1.Range("R1:Y" & finalrow)
Set PTCache = wb.PivotCaches.Add(SourceType:=xlDatabase, SourceData:=PRange)
Set PT = PTCache.CreatePivotTable(TableDestination:=ws2.Cells(1, 1),
[Code]....
This has to be easier than I am making it out to be!
I have column C as my selection column...so basically if they would like to see any items in rows 7-60, they can put an X in Column C and see an aggregate of those items.
What formula would I use to do the aggregate that is determined by input into column c?
Need one column to combine three columns I have a in a spreadsheet.
Column A - Comments
I have a comment called Duplicate or blanks
Column B - Comments 2
I have a comment called Loss Fund or blanks
Column C - Comments 3
I have a comment of Y or N
I just a want formulae which put the following in one column
Where it is Duplicate in Column A
Where it is Loss Fund in Column B
Where it is Y in Column C
So I have one field for all comments.
We are looking for VBA to show a pop-up or comment when a person clicks on the feild colum in the excel sheet3 tab that summarizes information about that feild from which ever tab the feild is on( Sheet1 tab or sheet2 tab) or shows "not defined" if the feild doesn't appear on either tab...
View 9 Replies View RelatedThe order of column A can not change as I need to find the matching row of information and transfer that information
Not all values have a matching row.
Rows are match on PCN number but need all the values in the rows
I have attached a workbook with starting and desired end results
I want to import an excel file that has multple columns, however, the first column contains both the Group name and the dates. Is there a way to import this into a table to have each record populate the group to the corresponding date?
BASE Researching Duplicate
11/23/2011 21
E-Team General Pool
11/23/20112120
11/25/20112318
General Pool for SB Activations
11/23/2011429418
11/24/2011251125
11/25/2011485452
11/26/2011452410
11/27/2011415408
I have an Excel spreadsheet that where the headings start in row 5. Data starts in row 6.
The spreadsheet is updated frequently. The headings are always the same but the number of lines of data changes.
D5 = Units1 (field contains numbers or is blank)
E5 = Units2 (Field contains numbers or is blank)
I would like to insert a column to the right of Column E and add D + E in the inserted cell. I would like F5 to be called NewUnits.
Some cells in Columns D and E are blank. No cell in Column A is blank. (If cell A6 is the activecell and you press CTRL + Down Arrow Key -- you will get to the last cell with data in Col A. That is not the case if the activecell was E6 as there are blanks.)
I am using Excel 2010.
I want to create an input box that will allow you to input the column number it should start in... so instead of it being fixed at A, you can choose column B, C, D all the way to the end if you like.
Sub SplitSheetsNoDelete1()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Dim Lmainsheet As String
Dim Lrow As Integer
Dim lcontinue As Boolean
Dim LColamaster As String
Dim lcolatest As String
'Retrieve name of sheet that contains the data
Lmainsheet = ActiveSheet.Name
'Initialize variables
lcontinue = True
Lrow = 2.....................................
I need a formula. Probably Vlookup. I'm having a LOT of trouble trying to figure out how to "phrase" the formula so let me explain what it is I'm trying to do. If a cell in Sheet 1 Column AS and a cell in Sheet 2 Column B match exactly, I want the cell in Sheet 2 Column C that is in the same row as the matched cell in Sheet 2 Column B to be copied into Sheet 1 Column BB in the same row as the matched cell in Sheet 1 Column AS.
For example, if cells in S1 Column AS and S2 Column B both have the name "LOS ANGELES" then "KLAX" will be copied from cell in S2 Column C (in same row as "LOS ANGELES") to S1 Column BB (in same row as "LOS ANGELES").
I have a pivot table which draws data automatically from a database
What I would like it for the customer field of the pivot table to only equal the customers which are present in another worksheet (Column A:A)
I don't understand why my macro doesn't work for "text to column". I did the usual: record new macro -> I select the column -> goto Data -> Text to Column ->next -> next -> finish.
View 14 Replies View RelatedCan I use a macro to change text in a cell? As an example, I have this list of names in a column. I'd like every other name to have a semicolon instead of a comma after the name. My list has commas now
Tommy,
Joe,
Warren.
Billy,
Bob,
George,
And I want it to look like this.
Tommy,
Joe;
Warren.
Billy;
Bob,
George;
Since I'm using macros on this page, I'd like to use a macro to do this
I have recorded the following code, but while it works during the recording stage it doesn't within the macro.
Range("D18").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.TextToColumns Destination:=Range("D18"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
:=Array(1, 1), TrailingMinusNumbers:=True
The data within column D is imported dates and I am doing the text to columns to get a later macro to recognise the cells as dates and not text.
(The code seems to work for a few of the cells but not all of them.)
I am facing difficulty in creating a macro which will convert column A text into 2 separate columns (A & B) with tab & colon as the delimiters.
View 8 Replies View RelatedI have a string of numbers and characters and I have a Macro that I copy-pasted from somewhere online that REMOVES any character that is not a number.
Is a great Macro that transforms:
"-a209 03 . 1 - 22 46" to 2090312246
I can send the code on request.
However the problem comes when running the macro into that string excel transforms it DIRECTLY into a Numeric. That is we are missing the first two, or first characters when they are zeros.
For example: "007 01 1.32.08" becomes 70113208 in stead of: 0070113208
And this is a problem.
I have tried to define the cell as text before running the macro. Fails. I have tried to re-define the cell afterwards as text but the zeros do not appear. Fails.
Including in the Macro a last minute section that forces the cell to remain as text...(seems easy! but I have do not know how to program in VBA)
convert a column of text to number with macro.
I am trying to count the distinct times a value shows up in a column, if another column has a 2 in it.
For example:
Columns
A, B
2,P25
2,P25
3,P5
3,P6
2,P5
The results shoud be: (2) Because I only want to count the P25 one time.
I'm using Excel 2010
Formula(s) to do as explained in the attached example.
Example_formula.xlsx
I am in the process of writing a VBA code(I should I am fairly new to this code writing!!!).What I need to be able to do is below.(enclosed please find a output in an xls file) What I should be able to do is below:
1.Find the text "Cash(No Listing)(Monthly)"
2. Offset to the 13th Column after that
3.Select the value in this column ,copy the value
4.Go to a row above and move one column to the left i.e.offset (-1,-1) and move 12 column backwards i.e.offset(0,-12)
5.Copy the value in 3 above to this entire range
6.Repeat this process for the entire file
My code is as below.Let me know where am I making a mistake. Just to let you know that this code performs the job well for the first entry i.e in the yellow makde area and doesn't do the job for any further entries .Llooks like I have some problem with the loop but not sure as to whats happening!
I want to take what is in column A and replace the number after the "=" with new number.
I need a formula that identifies the 6 numbers or letters after the = and replaces with column A
111111 showstocknumnber//details.php?vid=111111
222222 showstocknumnber//details.php?vid=111111
345673 showstocknumnber//details.php?vid=111111
The 111111 after the = could be any string of 6 letters and numbers. The contents of column b are a URL.
I need a formula to run down a column DCapture.JPG (starting at 142), when it finds the last entered value it needs to display the corresponding value from column J into cell AA21.
If you see the attached photo, the last entered data in column D would be 1, AA21 would be saying -30 (J205)
Capture.JPG