After I run this macro, the cell remains empty. Any thoughts.
'Vary1 is some cells name
'Vary2 is some cells name
Dim AdjustFactorAddress As String
Set adjustmentfactor = Worksheets("Sheet 2").Cells(4,5)
AdjustFactorAddress = adjustmentfactor.Address()
Selection.Offset(1,2).Formula = "= ROUND(Vary1*Vary2*R[2]C[4]*'Sheets 2!'" & AdjustmentFactorAddress & ", 2)"
I have been sent a very large file of product data from one of my suppliers, They sent all of the details in separate fields (for example, colour, height, width, depth, material etc)
I have processed all these columns to appear how I want them, but now need to join them together so they can all be added to my main description. I want each one to be on a new line when it's displayed on my website, so I'll be adding a <br /> tag (break tag) after each item. This I can do no problem.
This would all be fine, if all the columns contained data, but a lot of the time the columns do not contain data (eg. I have a column for "knife length" but not all of my products are knives, so not all of them require this information"
for example, I have something like:
SKU | Colour | height | width | depth | material
ABC | blue | 50mm | 10mm | 60mm |
BCD | | 80mm | 75mm | 30mm | wood
CDE | red | | | | plastic
I could use something like :
=CONCATENATE($A2, " <br /> ", CHAR(10),$B2, " <br /> ", CHAR(10),$C2, " <br /> ", CHAR(10),)
This however means writing a piece of code for each cell I want to join, My cells go from range "O2" to "DW2", I don't fancy writing that for every single column!! Also, it means that If I have some empty fields, it will still add a break tag, this will look very odd on my site.
I really need a way of writing into the function "include if cell contains data" for each cell. If it doesn't contain anything, skip it and move to the next. (the char(10) in this just gives me a line break in excel so I can see what it'll look like when it's exported)
Eliminating empty cell in the concatenate. I am concatenating many cell together. Example is Column A has a word " Starter" Column B is the type of tractor it fits " Case" Column C thru E have other names IE John Deere, Ford only if the part fits more than one type of tractor. In my final Concatenate i end up with many comma's and nothing follows. I have placed a ", " in between each reference of the cell. If the cell is 0 or null. I want the concatenate to ignore the cell and extra commas.
My current function reads + Concatenate(A1,", For ",B2,", ",C2,", ",D2,", ",E2)
What I have now.
Starter, For John Deere, , , , , , , .
Starter, For John Deere, Ford, , , , , , .
What I wish is.
Starter, For John Deere, Ford.
I am trying to concatenate entries into one cell so that when uploaded, the comma-separated contents will be treated as tags. copperberry sample file.xlsxSee attached sample file. Wherever there is a 1 in a row, I want to take the column header text above that 1 and concatenate it with subsequent text in the cell at the end of the row. See sample end result in cell J2. I assume I need an IF statement, but I'm not sure how to phrase it to collect all the concatenations needed. There are 200+ rows.
copperberry
Windows 8.1
Excel 2013
I've attached part of the file I'm working with, and can't figure out how to align the text to the top in the merged cells titled description. How do I format the cell so that if there isn't two lines of type in the description it remains aligned with the quantity and price
View 2 Replies View RelatedI have a workbook with over 900 worksheets.
The macro I have is looping all sheets looking for empty cells in a specific column, and when it founds an empty cell the value for one cell is copied to the empty cell.
But in one worksheet it stops with the error:
Run-time error '1004'
Application-defined or object-defined error
When I open a file in excel and I close it without closing excel-application, the file remains open in the Vba-background. This is not a big problem but when I reopen the file I get 2 versions in the Vba-explorer. This continues until I close the whole excel-application. So everytime I reopen the file the vba-explorer adds a new version. Is somebody familiar with this? Is this normal or is this a bug?
View 6 Replies View RelatedI have created a workbook as an addin. After the addin has been installed I can't make the original workbook active again either through VBA or the Window -> Select Workbook Name function. The code is below.
Private Sub Workbook_AddinInstall()
Dim Wbook As String
Wbook = ActiveWorkbook.Name
Call AddToolbars
Workbooks(Wbook).Activate
End Sub
Sub AddToolbars()
Dim customBar As CommandBar
Dim myControl As CommandBarButton
Set customBar = CommandBars.Add("Concur Reports")
Set myControl = customBar.Controls _
.Add(Type:=msoControlButton)
With myControl
.FaceId = 2
.OnAction = "Main"
End With
customBar.Visible = True
End Sub
PIVOT TABLES -- Old data remains in pivot table filters
One more Pivot Table Question:
I have workbooks i have built and re-use with fresh data after verifying that the previous data has been cleared. Unfortunately there are times in the drop down filter, old data will remain, but is not at all in the data set. How to clear this out? I have ensured that before pasting in new data the old data has been cleared below the headers. I keep my headers so I don't need to re-do the Pivot Tables or adjust the Name / SUM capabilities in the VALUE FIELD SETTINGS.
I have a simple formula in cell A2
=A1
But it will not calculate. I have gone to Tools - Options - Calculation to see if calculation is set to Manual but it is Automatic. Is there another setting or have I exceeded some limit?
All I want to do is color the numbers on both the primary and secondary axis. Primary i want the shade of blue below. Secondary I want the shade of green below. Only the primary axis part of the code does its job. The secondary axis remains black. The code does complete without errors. Excel 2010.
sub color_axis()
ActiveChart.Axes(xlValue).TickLabels.Font.Color = RGB(38, 40, 118)
ActiveChart.Axes(xlSecondary).TickLabels.Font.Color = RGB(0, 153, 0)
end sub
Here find the excel file
My requirement
1) 4 values contains in each row based on the values from those cells the max value will display.
2) if more than 2 cells have empty,NR or NA text means the entire row has to delete.
3) if 2 or more that means 3 cells having values the empty cell,NR or NA cell will place value with the condition of macro that is 75% of other values which is maximum among them.
I am looking to find all visible cells in column E that are blank, and then add ''B'' to those empty cells.
I am using code similar to the below:
[Code] .....
I have a long range of cells (U3:AX3), all of which are empty save one. Is there a way to search through the range of cells, and return the contents of the one cell that contains text?
I would do this with a series of nested IF statements if there weren't more than 30 of them!
Is a Cell with a formula (like shown below) considered true, or is it empty?
=IF(Scorecard!$B$13,Scorecard!$AD$4,"")
If Scorecard!$B$13 was False...
Would a cell with the above formula be considered?
True or Empty?
If Scorecard!$B$13 was True...
A cell with the above formula would be True.
IF cell(some cell) empty AND cell(Diferent cell) not empty then Put Formula in empty cell
Next (to go throught the cells because the range constantly changes with every new report)
I have a list of P/N's that are used in more then one location. and it's sorted by P/N's.
ColA__ColB__ColC
______Loc___PN
______1_____A
______2_____A
______3_____B
______4_____C
______5_____C
I Want to be able to put in Col A the concatenate results of all equal P/N's from any given list. Or at least select the few cells that i know are duplicates and from that copy the Location to a single Column.
ColA ColB__ColC
______Loc__PN
1,2____1___A
_______2___A
_______3___B
4,5____4___C
_______5___C
Sampling table :
one
two
three
four
one
two
three
one
two
one
Desired results obtained via IF =IF(B2>0,A2&" , ",A2)&IF(C2>0,B2&" , ",B2)&IF(D2>0,C2&" , ",C2)&IF(D2>0,D2,"")
one , two , three , four
one , two , three
one , two
one
Is there any smarter, shorter formula via Concatenate and Substitute or other formulas ?
My closest match, but not good enaugh is =SUBSTITUTE(CONCATENATE(A2&", "&B2&", "&C2&", "&D2), ", , ", " ")
[ returna 2 commad ]
one, two, three, four
one, two, three,
one, two
one ,
I have 6 columns:
A1 = LastName
B1 = FirstName
C1 = LastName2
D1 = FirstName2
I need to concatenate into 1 cell so it looks like this: FirstName LastName;FirstName2 Last Name2. Now the challenge is that there are many instances where C1 and D1 are blank (don't have values).
So here was my attempt at a formula:
=IF(A1>""&B1>"",CONCATENATE(B1," ",A1))& IF(C1>""&D1>"",CONCATENATE(";"&D1,"",C1),"")
Now this works, but it ALWAYS leaves a semi colon at the end (even when there is no C1 and D1 to concatentate. Thus I put in my IF statement the "".
When I look at the cell: wsEmpRec.Cells(10,50).Value in the VBA Watch window the value is Empty. I mean, that's the actual word that shows up. I'm trying to test if there is a value in the cell but when I use: if wsEmpRec.Cells(10,50).Value = "" then the condition is not being met. How can I test for an Empty cell as opposed to a cell that contains an empty string?
View 9 Replies View RelatedUsing Excel 2007. Can I use IF along with CONCATENATE.
=if(h26<.0099(concatenate(ak26,AK27))if(h26>.010(concatenate(ak26,aQ26,ak27))
Can't seem to get the proper syntax.
How to concatenate the infinite cell in one cell. See the attachment .
I need the data in column A ...
Attached File : abcd.xlsx‎
I am making a table in excel where I list video games and I would like to place a hyperlink in line with them to open a search page on eBay, I've made a URL-friendly cell (replacing the spaces with + signs, like they do on the URL.
Example table:
game title
game+title
Check
On the "Check" cell I would like a hyperlink that contains the value of the cell saying "game+title" (supposing that is cell B2), i.e:
[URL]....
How would I go about it?
I am trying to merge three cells using the following formulae =CONCATENATE(A3,": ",B3,", ",C$1,", ",C3,"") where C$1 is a title (header) I will use if C3 is populated. However, I would like to leave C$1 out if C3 is not populated.
I would need to concatenate all the cell'content from a column if the value is different from null ("") in just one cell separated by ";" ... By ex :
In column A I have :
A1-""
A2-X
A3-""
A4-y
In cell B1 I should get "X;Y"
Example is in the attch: Book11.xls. This formula works but if there is no number 4 then I don't want comma after 1, or 2, or 3, How avoid it:
results
1,2,3,4
1,2,
1,2,3,
3,4
1,
4
2,3,
(red , need to be removed)
I'm trying to do a CONCATENATE function in Excel 2003. The first part of the function (this is working correctly) is a) concatenating 4 cells from a different worksheet (WB_NEW) into one cell and is b) putting a space in between each entry:
=CONCATENATE(WB_NEW!AH3," ",WB_NEW!AI3," ",WB_NEW!AJ3," ",WB_NEW!E3)
What I'm now trying to do is enhance this function to perform with 2 separate concatenation rules i.e. "if one of the cells specified above is blank, concatenate a different set of cells".
Can you concatenate a range. I want to join 30+ cells together but dont want to click on every one?
View 10 Replies View RelatedI have a list of email addresses. They are in column A.
The 1st email address is in cell A5 and goes down until a blank cell is reached.
QUESTION: Is there a limit on how many email addresses can be contantinated together ? I can limit the number if necessary.
The contantinated list should be placed into cell A1.
is it possible to concatenate the contents of several cell vertically into a single cell? like using (e.g. B47&B48&B49&B50&B51&B52) in a statement but make it vertical? and make some parts blank if it does not contain data.
(CODE)=IF(AND(A45=”1”),*CONCATENATE VERTICAL B47 to B52*, IF(AND(A45=”2”),*CONCATENATE VERTICAL D47 to D52*, IF(AND(A45=”3”),*CONCATENATE VERTICAL F47 to F52*,””)))
(please see attached file for reference)