I've got a single column worksheet with a varying numbers of characters in each row.
At the end of each row's cell value I must add a 5 char string. Preceding that string I must have enough spaces to make the total length of each row 106 characters.
I've already:Defined and populated the string. Let's call it "strMyString".Established how many rows are in the sheet and stored it in "lngUsedRange"Written the following which cycles through each row establishing how many spaces need to be added:
Dim lngSpacesNeeded As Long
For i = 1 To lngUsedRange lngSpacesNeeded = 101 - Len(Range("A" & i)) Next i
Now I just need to know what else to put before "Next i" to locate the end of the existing text in the cell and add the number of spaces in "lngSpacesNeeded" then add "strMyString".
I am using Excel 2007. I have pasted my code below. It works fine unless it has a space, in which case it inserts %20. In this case, sRange2 = ActiveSheet.Range("E11") will always have a space in it since this is where i store a job's name.
Sub Macro1() Dim sRange1 As String Dim sRange2 As String Dim sRange3 As String Dim sRange4 As String Dim sFullPath As String
I'll get straight to the point: How can I change this text format from 474556788 to 0-47455678-8 (dash added after 0 and before the last number). I need to apply this to around 5000 rows (can't do that manualy). I want it to be int his format:
474556788 to 047-455678-8
Tks Auto Merged Post;474556788 to 047-455678-8 (This is the wanted format)
Problem: Placing a With/End With for FormatConditions in a For/Next loop isn't applying the conditional formatting.
Information: - I have a stats section that has months as the column headers with totals at the end (used as a VLOOKUP table) - Each column needs the conditional formatting separately - The columns are static, but the rows are variable - Taking it out of the loop and coding each loop individually works perfectly
The problem code:
finalRowTable = Cells(Rows.Count, 12).End(xlUp).Row For i = 13 To 38 With Range(i & "11:" & i & finalRowTable) .FormatConditions.Delete .FormatConditions.AddTop10 .FormatConditions(1).TopBottom = xlTop10Top .FormatConditions(1).Rank = 1 .FormatConditions(1).Percent = False .FormatConditions(1).Interior.Color = 5296274 End With Next i
I checked after running it and it doesn't show up in the Manage Rules Conditional Formatting
Code that works without loop: Code: With Range("N11:N" & finalRowTable) .FormatConditions.Delete .FormatConditions.AddTop10 .FormatConditions(1).TopBottom = xlTop10Top .FormatConditions(1).Rank = 1 .FormatConditions(1).Percent = False .FormatConditions(1).Interior.Color = 5296274 End With
I've been playing with excel VBA for a few months now, so it's probably something simple.
I have a Macro that when run checks for the lowest value in a line & highlights that line. It works just as it should, infact it works better than I had planded. When I update a cell value and move to the next cell it changes the highlight.
Option Explicit
Sub SELECT_LOW_PRICE() Range("a4:i126").Select Selection.FormatConditions.Delete Selection.FormatConditions.Add Type:=xlExpression, _ Formula1:="=and(a4=min($a4:$i4),not(isblank(a4)))" Selection.FormatConditions(1).Interior.ColorIndex = 6 Cells(1, 1) = "Updated " & Now Cells(1, 1).Select End Sub
I am looking for help in developing steps in a spreadsheet to calculate a sum based on a few conditions. The basis of my spreadsheet works fine, however I am trying to add the contents of a cell to another by checking other cells.
For example:
Cells A1:A10 contain a numerical sequence (1-10 respectively) to indicate a "Node"
Cells B1:B10 contain a user selected number (1-10) which defines the Node it is fed from. We'll call this "Fed From Node".......ie. If Cell B2=1, that means that Node 2 is fed from Node 1.
Cells C1:C10 contain a value which is input by the user. We'll call this "Amps"
Cells D1:D10 would show the total "Amps" of the current cell added to all others that are fed from same.
What I am ultimately trying to figure out is how to add the "Amps" to each "Node" and show the results in column D.
More specifically if the spreadshet looks like the following: ...
I would like to write a macro that would count observations from a database extract based on specific conditions and generate a report.
My database extract looks like this :
Client name Info1 Info2 Info3
Bob aaa aaa aaa
[Code] ....
I would like to have an efficient and simple VBA code to count the observations. Something that would store the result of query like those:
# 'client name' = Bob : 2 # 'client name' = Bob AND info1 = aaa : 1 # Info3 = bbb : 2 # 'client name' = Bob and Info1 = aaa OR Info1 = bbb : 2
I am aware of DCOUNT function, but I am not too sure how to translate it in VBA. I also think that using autofilter and counting the visible rows may be subject to bugs.
I have need of VBA code that will check collumn D, starting at cell 7 until cell 206, for when data that is entered starts with 100. When this occurs it will remove all of the data in that same cell except for the last 12 digits.
Here's an example.
When using our barcode scanner to capture a FedEx Tracking number the barcode captures the following:
1001853514360009020200802541997796.
Embedded in that long string of numbers (which are formatted as Text) is the tracking number. Specifically the last 12 numbers are the tracking number. However, FedEx varies this code at times so the last 12 numbers are the tracking number only with the raw data captured by the scanner starts with 100. Until I find additional conditions this VBA code will have to ignore all of data that is captured in collumn D starting at cell 7 until 206.
if I want 2 conditions satisfied in order for a value to be returned, would I need to set up/name tables, set ranges, etc? e.g,
If A1 contains baby, AND B1 contains Carly, then C1=carly.jpg If A1 contains girl, AND B1 contains Carly, then C1=carlyg.jpg If A1 contains baby, AND B1 contains Billy, then C1=billy.jpg If A1 contains summer, AND B1 contains Wally, then C1=winter.jpg etc.
Roughly 40 different conditions will be needed. What formula would I use and how should I name and set up my table?
I have used Formula to ID cells containing a formula to flag cells red with conditional formatting in a list that do not have formula.
I need a single cell to change colour if any of the cells in the list do not have a formula. e.g. the subtotal in the top row could go red so the user can scroll down to find individual red cells.
Is there a way to count the red cells without formula in the list - Conditionally formatted cells are hard to count. I don't want to use a vba script to do it as the user probably won't run it and auto run slow calculations down.
Is there an array formula that can return true or false if not(CellHasFormula) is true anywhere in the list?
I have a worksheet ("ALL JOBS") with huge row data and the row data will vary every day. My problem is there will be a lot of blank cells which I need to fill manually and its tacking lot of time of mine.
Code to fill these blank cells automatically with some specific texts based on the attached conditions.
I have attached the workbook for more details. FillCellsTest.xlsm‎
I want the conditional format values to change Based on the value in Cell B2.
If the value in B2 is "old", then I want these conditional format conditions for A1:A6. Numbers between 1-2=green text, 3-4=orange text and 5-6=red text.
IF the value in B2 is "new" then I want the conditional format conditions in A1:A6 to change so 1=black text, 2-3=green text, 4-5=orange text and 6=red text.
I know how to do multiple conditional formats but i have no clue how to change multiple conditions based on another cells value.
I am trying to work with conditional formatting to turn a field a specific color based on two conditions, one of which is variable. The first condition is a list of ongoing events (which can change) and the second condition is a set of known milestones. I want to create a control (check boxes?) that will turn a given field (which has dates in it from another calculation) to either Red, Yellow, or Green.
I was thinking two Dropdown boxes - one for the events and one for the milestones. The user would choose an event, choose the milestone, then choose a checkbox or something to change the color of a field elsewhere in the spreadsheet. Right now, I'm doing this in a very clumsy way by having three checkboxes for each milestone for each event. There are five milestones per event (so 15 checkboxes per event on Sheet2). I will likely have 70+ events so I was hoping for a better way to do this. I've done this for the first three events and need a more efficient way of doing this.
See the attachment : Event Milestones based on Go Date Uploadable.xlsx‎
I have a spreadsheet which is linked to several other worksheets. I have managed to include formulas to count how many cells have numbers between 101 and 5000 by using this formula -
=sum((h2:h500>=101)*(h2:h500<=5000))
but now I want to count the number of cells in another worksheet that are equal to or less than zero. When I use the same formula as above it counts all the blank cells. I have tried using a countblank formula and then deducting this from the result, but unless the other worksheet is open the countblank formula does not work.
I have a value that the user is suppose to type in the range(A3). The format is as follow: 20091227-I1 (yyyymd-Letter and No.) The letters are I and EK and after the letter a # from 1-10. I want to create a macro, which reads the Range(A3). If the format is incorrect, then a MsgBox would display "Typing error. Please type the year, month, date, dash, letter (I or EK) and number." I don't have a problem creating the message box. My problem is validating the Range(A3) with the specified format.
I'm in the process of setting up an Excel document and I need to be able to have it display dates in a specific format. I need it to express just a month and year such that the month is represented by a letter (A thru L) and the year is expressed as its last two digits such as in the these examples:
May 2012 = E12 Mar 2009 = C09 Nov 2011 = K11 etc.
I want the date to come out in this format regardless of how the user enters it.
I work in the flooring industry and the format we use for cuts of carpet/vinyl is 40-3 (for 40.25 feet), etc. So we are trying to create an excel spreadsheet that will add up these cuts. Right now it's kind of a mess because we have decimals in a column we will be hiding and are converting that to our industry format.
The formula I am having trouble with is as follows: =MID(A18,1,FIND(".",A18)-1)&"-"&MID(A18,FIND(".",A18),3)*12
The problem is that whenever the totals end in zero, the formula won't convert 40.00 to 40-0. It gives me an error every time. If the total is 40.25 it will convert it to 40-3 just fine.
I am trying to write a macro that given a selected range of cells goes in each cell and bolds the first 2 lines within the cell. An example of this would be if the cell contained:.............
What I have done is create a macro in Excel and then opened up the VBA editor to make a lot of changes to the initial macro. I am reformatting a whole lot of separate spreadsheets over many workbooks.
Here is the code that is generating the error (Run-Time error '438', Object doesn't support this property or method):
Code: Range("E2").Select Selection.Format = "long date" With Selection .Font.Size = 11 ' .Format = LongDate .HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter End With
As you can see, I first tried the ".Format = LongDate" and did put LongDate in "" which did not work, then I tried the "Selection.Format = ..." after the "Range" statement, and that did not work either. So you will actually know, I am trying to set the format for the cell "E2" to a Long Date format.
I'm looking to generate a chart out of a table of data. I want the Y-axis to show a percentage return on an investment.
On the x-axis I want to have a range of scenarios from a market average return of -40% to +40%. Obviously, I wish for 0% to sit in the middle of the x-axis.
I'd want to have 3 lines observable in the chart. I'd be looking to build the above out of a table almost exactly like this:
I’d like to return the range (or cells address) that includes text formatted in Bold and Arial font, this is always in Column “B”, so I’m actually behind the rows number....
I'm trying to convert a date in the following format: 19970121 to 1/21/1997 and am having trouble getting rid of the leading zero in the final version. I also need it to pick up the 2 digits in months that have them from 9 (Sept) through 12 (Dec), though, for use in a VLOOKUP function. Can this be done at all?
Here is the code I've been using so far that doesn't entirely work for what I need it to do:
I am trying to return a number with a specific format. I need Excel to look in a particular column and when it finds the entry in the correct format to return it in a new column. I want it to repeatedly return the number to the new column until it finds another number of the same format in the original column.