I'm having problems with small macro I'm writing.. I'm very close to finishing it but I'm stuck at the end by an extremely small/basic error. What I wan't to do is take a Formula that was generated in a loop and is stored in a string and to output it to a cell on my worksheet as a working formula...
View 9 RepliesFor whatever reason, I don't succeed to write a formula with a string to a cell using vba The char(10) is not accepted
Code:
LimitGainLong_.Formula = "Limit" & CAR(10) & "Profit: " & LimitProfitLongGain
I'm trying to put a formula into a group of cells with VBA. However, the formula requires quotation marks in it...e.g.,
the formula in the cell should be... = "STR - " & intRow
where intRow will insert a designated integer. My problem is the quotes for the string part....I can't get the VBA code (tried both setting a string variable and using range.value =) to keep the needed quotes.
I know this should be straightforward, but just can't "hack the logic", whether using "Countifs" oor "SumProduct" formulae.
Attached file 140509 String Criteria.xlsx file has database of three fields (Date, Route number and Part number)
I need the formula that totals number of rows meeting three criteria:
(a) A specific date from Col A
(b) A specific number from Col B
And the part I can't sort out:
(c) Any cell containing a "string" in Col C (so needs to count the "core" even if it has a prefix or suffix).
E.g. How many rows have "Date x" in Col A, "Route Y" in Col B and a cell containing "123" in Col C?
I have a long list of process steps in a collumn e.g.
A
_Tank1_CIP
_Tank1_CIP
_Tank2_CIP
_Tank4_CIP
_Tank_9_CIP
and then i have a list of tanks: Tank1, Tank2 etc. The i want a forumla to extract and return the tank in a adjacent cell:
A B
_Tank1_CIP Tank1
_Tank1_CIP Tank1
_Tank2_CIP Tank2
_Tank4_CIP Tank4
_Tank_9_CIP Tank9
I've created the following Macro based on some of the posts on this great forum! It works great, but I'd like to tweak it for another purpose where it would fill the formula down until a cell in column AF had the value "#N/A" or stopped having the value "clean". The #N/A is from a formula result so I'm not sure if or how the Macro would treat this.
Code:
Sub Y_CleanUp3()
'
' Clean Up Bad Data Macro 3
Dim LR As Integer
Range("AH2").Formula = "=VLOOKUP(X2,'[Territory by Zip Code.xlsx]Sheet1'!$A$2:$B$135000,2,TRUE)"
LR = Range("AF" & Rows.Count).End(xlUp).Row
Range("AH2").AutoFill Destination:=Range("AH2:AH" & LR), Type:=xlFillDefault
With Range("AH2:AH" & LR)
End With
End Sub
I have a string of letters in cell column L20 through L3019.
The letters are A, B, C, and R . No other letters.
I wanted to find out if it is possible to remove any duplicates when starting in cell L20 going downward.
For example:
L20 = B
L21 = A
L22 = A
L23 = B
L24 = C
L25 = C
L26 = C
L27 = C
L28 = B
L29 = R
L30 = A
L31 = C
L32 = C
L33 = C
L34 = R
L35 = R
L36 = B
L37 = B
In the range L20 through L37 all the letters have appeared so my goal is to create a formula where the outcome is BACR. Starting with the first letter B in cell L20
Cell range L20 through L37. Looking for the next letter which would be either A,C, or R. Since we already used the letter B. In this case it's the letter A
ABCR
Cell range L20 through L37. Looking for the next letter which is the C or R. In this case it's the letter C
CBRA
Finally range L20 through L37. Looking for the letter R which is in cell L29.
RACB
In sheet1 I have a simple database consisting of 5 columns of data
Column A : Name ie James Jones
Column B : payroll number ie 123456
Column C : shift times ie 1245-2124
Column D : job title ie floor
Column E : comments ie A/L or 0600-1500
what I would like is some code that will go down Column E and if a 'time string' ie 1300-2130 is found then copy this string and paste into corresponding value in column C. If a text string is found ie A/L or Sick or anything like this then ignore and move onto next cell, loop this until all cells in column E have been checked.
I'm using a userform to create a new sheet. The form already creates the sheet and names it what was typed into the userform. Now I want it to place that variable in a cell along with a string. the following code will place the variable from the form (tbname) into cell b5.
View 2 Replies View RelatedI have a formula in a string, like "5,6889*0,11^3 ..." and I would like to insert it as a formula into a cell or just to get the result into a variable. I have tried
ActiveCell.FormulaR1C1 = "=" & String Or
ActiveCell.FormulaR1C1 = String (With the equal sign already In the String)
but it doesnt work.
When i do it manualy - select the cell in excel, put the egual sign in and paste the formula it works.
Is there a way a string can be evaluated as a formula?
I'm building a formula by concatening several strings but can't find a way to evaluate the formula.
Do I need a macro or is there a simple way to eval it?
Does Excel have any 'built-in' ability to interpret a string as a formula, or would I need to implement a VBA function? In it's simplest form I am thinking of something along the lines:
Cell A1 contains: 5
Cell A2 contains: "*100"
Cell A4 contains: =Evaluate(A1 & A2)
and hence displays 500
I know evaluate doesn't work, but is there something that does this?
The table below is a portion of a calendar to track vacation and sick time. What I am trying to do is add all the hours of vacation ("V") and sick ("E") time that an employee has used in a cell at the end of each row which represents a month. So there are 31 cells that I need to look in and if it contains V... sum in the vacation cell. There may be a space after the letters and there may not be. They can also start with a decimal.
month
1
2
3
4
5
Vacation
Sick
January
E8
V8
V.5
V6.25
E .5
Sum of V (should be 14.25)
Sum of E
I have a formula in VB code that is like this
sheet1.cells(irow,asktimecol)=asktime
when i place the cursor over each element i get :
irow="9"
asktimecol="5"
asktime="13:30:00"
so it reads
sheet1.cells("9","5")="13:30:00"
but iget the the error
application defined or object defined error
this is saying it cant place the asktime to cell
I have to bring the time thru as string as it come thru as one
if it is possible, to use a string variable in a Formula via VBA.
For example: ActiveCell.Formula = "=SUM(Sheet3!strVariable)"
Of course the code is not working that way. The Variable has the following structer: CellAdress;CellAdress;CellAdress... so it would perfectly fit into the formula-syntax.
Is there any possible way to do that? The reason behind it is, that I have to deal with a flexible range and I want to process this range with a formula. Actually the range is flexible, because of different filters and I only wanna count all numbers in the unhidden rows.
My varibale would then contain all celladresses, for the visible cells.
So in a nutshell: is it possible to somehow use a varible in a formula?
Just a quick question, is it possible to use a string variable in a Excel formula (in VBA)? Im trying to do the following in VBA
mortgageSchedName = acName & " Schedule"
Range("B6").FormulaR1C1 = "=mortgageSchedName!RC[254])"
the above results in an error because there is no such sheet as "mortgageSchedName", but I want it to access the value of that string variable.
I'm using Excel 2007. I want to write a formula that will list all characters in a string to the left of a "-". See below example. What formula would I use?.......
View 2 Replies View RelatedCell A1 contains 012345678 ** Customer of 987654321 **
Cell B2 contains 087654321
My formula =MID(A1,FIND("of",A1)+2,10) works perfect if it has a "customer of...". How to revise my formula that when it gets to cell B2 and if there is no "** Customer of ..." it would leave it blank or zero rather than #Value!?
i have attached an example to illustrate the data source and result expected.
View 3 Replies View RelatedI am using the following code to read a formula as a string. But sometimes the use r may forget to enter formula in the particular cell. In this case I want to check if the first character of the string is a Equal-to Sign (=). In case it is then macro proceeds further otherwise a message prompts user to enter a formula first. how to check if the first character of the string is a '=' sign?
View 5 Replies View Relatedhow to use a formula or macro or whatever that is applicable to solve my current issue.
For example:
I've the following text below. The prefix of "atest", "bgo", "crun" and "dfly_c" are fixed pattern, however, the text after prefix will change accordingly.
atest_myhomeisfar
bgo_runfast
crun_b:veryfast
dfly_c:bluesky
Now my request is, I would like to have the final output as per below. Notices that there are some additional numbers behind the text (with semicolumn).
Final output:
atest_myhomeisfar:1998
brun_veryfast:2009
cfly_bluesky:1790
dfly_c:bluesky:1800
My question is, is it possible to create something to handle this issue? I mean something that will seach thru a particular fixed pattern as mentioned above and add the number behind it?
I would like to do it one at the time (one prefix at a time). Not mass searching and adding.
For example:
Search all "atest*" pattern and add an additional number behind.
I have the following in VBA:
Code:
ActiveCell.FormulaR1C1 = _
"=mod_a1&"" ""&mod_b1&"" ""&mod_c1&"" ""&mod_d1&"" ""&mod_e1&"" ""&mod_f1&"" ""&mod_f1&"" ""&mod_g1&"" ""&mod_h1&"" ""&TEXT(mod_i1,""m/dd/yyyy"")&"" ""&mod_j1&"" ""&TEXT(mod_k1,""h:mm:ss"")"
I only want the user to see the string, not the concatenation formula. So how do I get VBA to turn this formula into an actual string.
I have seen some functions using ByVal and Evaluate with this sort of thing but this is just different enough that I can't figure it out.
How do you replace a string in a Formula within a cell or several cells?
For example:
=SUM(Sales[Monthly])
find and replace Monthly with Quarterly
I'm getting the generic 1004 error on the Range.FormulaR1C1 line, but I can't seem to see the problem.
Code:
Sub UpdateFormulas()
Dim stockFund As String
For i = 2 To finalRow
[Code]....
The mouse-over on the stockFund variable in that last line shows the correct cell address as the value and I checked the If statement to ensure it actually finds the number. I would guess that it would be a syntax error with that line, but it looks correct to me.
How can I transform a text string into a formula. ='F1'!$C$2
This appears as a text and I want to convert it to a formula exactly like it's written. I made this formula like this because I need to get the value from 1000 sheets. So I use the formula to change the sheet number automatically.
But now I can not convert the text into a real formula.
I know that I could do it with a macro but I prefer to do it without using a macro.
I have been trying to work out a formula without success so far. If you look at the this text string
Code:
Depart Doncaster Depot with a Mini bus at 0649
The "Mini" word in red is the one that I am trying to work out with.
Here is the problem. The "Mini" word could be replaced with 7 other words - Walk, Artic, Dart Smart, Maxi, Smart, Staff Car, or just bus with no explanation as to what type it is.
I need a formula to look at the text string and work out which one of the above categories are included in the text and based on that gives me either W, A, Dart Smart, Mx, S, Car, and the last to be just N.
What formula can I use to extract this string text.
I need to be able to extract the name after "and"
I would like to extract the name Lana from:
What formula can I use to search a range of cell values for a specific text string? My method is searching formulas instead, which is not what I want.
Background: I am developing a little test script for a project and I want to include some automatic validations to help make the job of the testers easier.
What I have set up so far:
1. Testers input numbers into specific fields M8 through M20.
2. Fields N8 through N20 automatically check fields M8 through M20 and compare those with what is contained in a range of hidden cells I set up in advance. A formula ensures that it reports "correct" or "incorrect" on a field-by-field basis, based on the comparison.
3. Cell O8 searches for the text string "incorrect" in cells N8 through N20. If that text string appears in any one of the cell values (not formulas), then O8 directs the tester to test again. If the text string "incorrect" does not appear, then cell O8 reports that the test was successful, and the tester can proceed to the next test (exact same setup repeats).
My only problem is in the formula used for the last step. I have tried a few different formulas I know in cell 08, but none are giving me the results I'm looking for. The closest I have come is a successful search and validation based on the string being in the formula instead of in the value of the given cell.
I have a series of codes, such as:
xxx-xxx-xx/xy-xxx
yy-yy-yy/yz
zzz-zz/za-zz/za-zzz
The /'s represent variations on the same code, so the first one is shorthand for:
xxx-xxx-xx-xxx
xxx-xxx-xy-xxx
I would like to be able to split the code into a new line (or lines) wherever a / occurs.
There are any number of dashes and slashes within the code, however, there are none at the beginning or end of the code.
The slashes will be always surronded by dashes eg xxx-xx/xy-xxx.
I need a formula that will count the number of pairs of digits in Col H that matches the pairs in Col's E:G....
View 9 Replies View Related