I would like to write a macro to examine a range of cells, and over-write some of those cells with a zero.
I want to over write those cells with either a numerical constant, or a formula with only constants, e.g.
"12345" or "= 123+567-(2*5)"
I do NOT want to over write cells that contain links or any functions:
"=page3!a5" or "=sum(a1:b6"
how to combine the content of 2 cells into one cell and have the information separated by a comma.
For example:
CELL 1:
Software 1
CELL 2:
Spreadsheet Software
The desired results is:
CELL 3:
Software 1, Spreadsheet Software
So I have a list of integers in col A that is a truncated list from col B. I want to select the units in col B that do not appear in col A. I tried this statement
=IF(A2=B2,A2,0)
Since both lists (A and B) are ordered from smallest to largest this only worked until a value that is not in ColA appears in ColB and then all the cells following = O.
I have a column of cells, of which certain values have the prefix "EmployeeID:". I'm trying to identify the cells containing the prefix by evaluating each cell using activecell.offset and value to no avail. I've also tried to use the selection. find, however the first instance of the prefix is continually selected, and does not move on. I'm assuming that I must use the findnext feature, however I'm not having much success.
View 2 Replies View RelatedI have a long list (>1000) of increasing temperatures in column A. I use an array formula, {=MAX(A3:A1029-A2:A1028)} to find the largest change between two successive values. What I need to do then is obtain the two values that give rise to that difference (for instance, they might be in A678 and A679). I can't figure out a formula for this.
I can manage it if I insert a "difference" column in B, and use:
=INDEX($A$2:$B$1029,MATCH(MAX($B$2:$B$1029),$B$2:$B$1029,0)-1,1)
=INDEX($A$2:$B$1029,MATCH(MAX($B$2:$B$1029),$B$2:$B$1029,0),1)
but I'd rather keep the number of columns to a minimum.
I have a list of 10k cells with Peoples names in various formats (Title,First name,initials,Surname etc and variations).
I am trying to identify the cells that have within the string the following : 'space','UpperCase Char','LowerCase Char','space' (eg Prof " Dc " Jones).
I need to then change the lowercase char to uppercase.
how to copy the content of cells of different xcell files from a given directory into a single formatted xcell sheet.
View 9 Replies View RelatedI am trying to lock the unused cells in 32, 2 column by 7 row named ranges, based on whether or not two cells, above each range are equal or less than each other. In other words while one of the cells is less than or equal to the second cell all cells in the range below should be unlocked, as soon as that condition is no longer true the blank cells need to be locked.
I am trying to use this in the Workbook_Sheetcalculate so that the macro will run automatically.
I've got two columns with data in only some of the cells in them. I need the cells with data in them to be put after each other at the top of a new column. Is there a formula for this?
Korsningshjälpen Excelforum.xlsx
I am using VBA to create a word document (.docx). This word document contains plain text content controls as well as picture content controls. I then use VBA to automatically select a picture based on the code below
Code:
Set oCC = Word.ActiveDocument.SelectContentControlsByTitle("TabPic").Item(1)
On Error GoTo TabErrorHandler
oCC.Range.InlineShapes.AddPicture Filename:="X:XFERANDREW-TDCD " & LblVL &
[Code].....
After the document has been closed down I try to open it again and I am told "The file cannot be opened because there are problems with the contents."
When I click details it says "Unspecified error" and "Location: Part: /word/document.xml, Line: 2, Column: 0"
If I click ok it says "Word found unreadable content in "". Do you want to recover the contents of this document? If you turst the source of this document, click Yes.
Clicking Yes opens the document with all the contents and it is now renamed to Document 1. If I click no it does not open.
I use this to read cell content, add some text/characters (ie. [ and ]) and change the properties of the complete cell
Sub COMMENT()
Worksheets("DVD Lijssie").Activate
If ActiveCell.Value 0 Then ' Change all in to ... ... ...
ActiveCell.FormulaR1C1 = ActiveCell.Value & " " & "]" & " " & "["
With ActiveCell.Font
.Name = "Arial Narrow"
.Size = 8
.ColorIndex = 16
End With
End If
End Sub
HOW can I change this vba-code so it leave's the content of the cell like it is and add some content with the use of let's say TexBox1 and ONLY use different font properties for the newely added content?
select only cells with content. Is it possible to use the next
View 5 Replies View RelatedBasically i need a formula that will look at the message content on a seperate sheet (Data sheet on the attached example) and multiple by the volume of the message type to return a value on a seperate sheet.
The problem i have is our messages appear in the data as seperate lines based on the entire message content, with a quantity of how many times that exact message was sent on a day DESPITE there being many variations of a message, they may all only equate to 1 or 2 actual message types.
In the example you will see the Data tab showing Example message 1, Example message 1.1 etc. All of the Example message 1-1.5 are actually the same message type (same applies to Example message 2) and i need to be able to have formula that groups and counts these to return a value by message type * by the quantity per day. So in the example, Example message 1 would return a result of 10 on the main sheet.
I have a spreadsheet that has mostly locked cells but randomly placed unlocked cells.
The sheet is completed, often saved and printed. We then go back into it and use it for another customer calculation and need to ensure all previous entries are removed. With the locked cells you can't simply highlight an area to clear so I am wondering if there is a way to clear the unlocked cells in one step other than entering on each on to clear.
Would there be any way that if we cleared the first cell the others would clear?
I have two columns, the left of which consists of merged cells. I got the document in this format, but to work with it, I need to unmerge the cells in the left column - simple enough.
However, when I do so, only the top cell in the group contains any actual data. What I get is this:
Age
18-20
21-25
26-30
And I would like it to look this way:
Age
18-20
Age
21-25
Age
26-30
Is there a simple way to get this result automatically when unmerging the cells? And if not, what is the fastest solution to avoid tons of manual copying?
I have some workbooks that have some serials in A row and i need to seperate them depending on how many digits they have,
For example some have 13 digits,and some 8.I just want to seperate them into different rows.
Here is a sample
seperate sample.xls
I need to split content from a textbox into many cells.
The textbox isn't multiline and will contain content such as:
Rooney 18, Villa 27, Parker 54
Now I need each scorer placed into a separate cell each.
I have used a few pieces of code I have found and tried to adapt them but to no avail.
I have a long list that has all the services from our stores. I´m using the formula below to count how many services does each store have that are over 20 days old.
=SUMPRODUCT((G!$A$2:$A$6000=$B4)*(NOT(G!$I$2:$I$6000="Valmis/Odottaa nouto"))*(NOT(G!$I$2:$I$6000="Valmis, toimitettu"))*(NOT(G!$I$2:$I$6000="Finished/WaitingDeli"))*(Päivämääärät!$C$1-G!$C$2:$C$6000>Päivämääärät!$I$3))
Now i´m wondering is it possible to make a macro that would delete all the cells in the range that do not match the criteria of my formula?
With one exception in sheet G cell A2--> has the number of the store. There are over 40 stores so each store has a number 10, 20, 30, etc...
This is the part of the formula that determines witch store it is counting
(G!$A$2:$A$6000=$B4) B4=10 in this case and B5 would be 20 and so on... By modifying that one part i can count old services for all of our stores.
Now I want the macro to delete all services from the list that are not over 20 days old and belong to the store 10 (B4). If it would delete everything that dont match that formulas criteria i could not get a list of old services for our other stores.
What i´m trying to accomplish is get a list of the services that are over 20 days old. I´m now picking them from the list by hand and that takes a really long time. Because of the number of the stores and the size of the range.
I am trying to write a macro that goes down column A, and whereever there is cell content, it will copy the row of the table to another spreadsheet.
The problem I am encounting is that there are gaps in the table, for example:
WKJ9900KBKBusiness Banking: Cheque CollectedWBJ90978JKCommercial Banking Corporate Heritage: Cheque CollectedUHN98920HJCorporate: Cheque CollectedUCC1201DBKCredit Cards: Cheque Collected
WHH8989JKBusiness Banking: Cheque Collected Unidentified / ReconciliationWKU8987GHCommercial Banking Corporate Heritage: Cheque Collected Unidentified / Reconciliation
WKJ9900KBKBusiness Banking: Cheque CollectedWBJ90978JKCommercial Banking Corporate Heritage: Cheque CollectedUHN98920HJCorporate: Cheque CollectedUCC1201DBKCredit Cards: Cheque Collected.
The gaps are of varying length. So far I have been playing with the
Range("a1").Select
ActiveCell.Offset(1, 0).Select
Do While Not IsEmpty(ActiveCell)
'do copy action
ActiveCell.Offset(1, 0).Select
Loop
of course, this stops when it reaches a blank cell.
I think the best way to do it is if I set a range, and then get excel to go down the column and copy whereever there is cell content.
I have this:
Sub CompileData()
'Dim rng1 As Range
'Dim rng2 As Range
'Set rng1 = Worksheets("Sheet2").Range("A4").End(xlDown)
'Set rng2 = Worksheets("Sheet2").Range("C4").End(xlDown)
'Set AllRng = Union(Range("rng1"), Range("rng2"))
'Worksheets("Sheet1").Range("A5").End(xlDown).Delete
Now when its pasted it has cells with "Nil" in it. I need to delete them, or just not copy them over.
I need to test a condition that at least one cell in the range (A1:A10) is not numeric. Is the syntax smth like: IsNumeric=False or smth like that? I cannot recall.
View 9 Replies View RelatedWhat I'm trying to do is determine what the content is in a particular cell. In the spreadsheet, some of the cells are merged, some not. I'm using ActiveCell to read the content of the normal cells, but its not working for merged cells.
View 9 Replies View RelatedI have a list of Marketing Product descriptions that I have to match to a list of system codes and was wondering if I can do this in excel.
Marketing Bumph (first Tab):
A B
1 Marketing Code Friendly description
2 XYZ1111 Offer 1
3 ABC111 Offer 2
System Info (real codes not marketing)
A B
1 Marketing Code Real Value
2 XYZ1111 GL321
3 ABC111 FF453
So what I want to end up with is:
A B C
1 Marketing Code Friendly description Real Value
2 XYZ1111 Offer 1 GL321
3 ABC111 Offer 2 FF453
i would like the code that allows me to copy enything I typing in column a sheet1 to column a in sheet2
View 3 Replies View RelatedFormula/macro/etc that would enable me to have content of a cell changed based on the content of another cell in the same row.
Example: cell in column D says "PSA" - so I would need the cell in column H for that same row to read "Radio"
I would need an entire sheet scanned to review for these occurrences and make the appropriate changes. I also would need the formula to be inclusive enough to scan for variations in column D cell content (PSA 1, PSA 2, etc).
I have a document I was directed to fill in. I was instructed to only use a certain number of characters and then drop into another cell below it for paragraphs of text. I have now been told they made a mistake, need me to copy all the related cells for a specific paragraph and drop them into a single cell.
Can I copy the text in multiple cells, and then drop the cell formating of those copied cells and drop the content into one single cell. Either word wrapping the content or soft returns for what looks like paragraphs again?
I want to format a range of cells based on the name listed in a cell in column A (starting @A6). I currently do this manually. It is to help me visually see the line I am working with and for what person.
I am almost certain that is going to take a VBA, but I know little to nothing about setting one up.
I have attached a sample. I am using Excel 2003.
i have data from D2:D10000
I Used data of first five rows e.g ("d2:d6") if in range ("d2:d6") any cell is blank then delete the all contents of the rows
e.g
d2 have data
d3 have data
d4, d5, d6 have no data then the contents of range ("d4:d6") should delete
I'm trying to use the Worksheet_Change event to replace all cleared cells with a default formula. This allows users to override the default, or restore the default when they need to:
If Not Intersect(Target, Range("Data")) Is Nothing And Target.Value = "" Then
Range("DefaultFormula").Copy
ActiveSheet.Paste
ActiveSheet.Application.CutCopyMode = False
End If
Here are the results with various different regions selected:
Single cell selected and cleared -- works. Multiple cells selected and cleared -- doesn't work if the first area selected contains more than one cell. Otherwise, it works, no matter how many other areas are selected.
Example1: Selected range is (D2:E2, G2) in that order, it does not copy the formula into the cleared cells. Example2: Selected range is (G2, D2:E2) in that order, the code does copy the formula into all the cleared cells as desired.
The "IF" condition is not TRUE when the initial area has more than one cell.
I am quite a novice with excel and I am trying to get a cell to show blank when I select a drop down list value in another cell.
Cell D2 contains a validated list containing two items (Air, Vacuum).
If I select Vacuum I wish to change another cells (D4) contents to blank, D4 is also a validated list containing three items (Yes, No, BLANK) the blank is actually a blank space and not the text blank.
I can get the cell to operate correctly but if I select Air in Cell D2 and then Yes in cell D4, but then change my mind and reset to Vacuum in cell D2 i need the cell D4 to clear its contents automatically.