I'm trying to create a border for a range using R1C1 and get an error.
VB: Sheet11.Range(Cells(y, 1), Cells(y, 5)).BorderAround Weight:=xlThin
If I do not use R1C1 it works...
VB: Sheet11.Range("A18:E18").BorderAround Weight:=xlThin
I'm trying to figure out how many Widget As are in Order 0001, for example.
Order # Product
0001 Widget B
0001 Widget A
0001 Widget A
0001 Widget C
0001 Widget A
0002 etc.
I would think that I should use a sum(R1C1:R1C1) format to figure this out, but I might be making this harder than necessary.
I'm trying to select a range of cells using the R1C1 notation. But I'm making an error in the syntax. I know it's really simple, I just don't know what's wrong.
View 2 Replies View RelatedThe code below is for a macro that allows the user to create a list of contacts. The column containing the names of these contacts are then referenced by a userform (code not present) by way of a Named Range. I want to update the named range whenever the user adds another contact so this new contact shows up in the user form.
I am currently referencing the range containing the names using R1C1 style, but I cannot get the variable aspect to work correctly.
I am after a bit of code which find a value in a cell "Grand Total" it may not be a the last row
Then finds the last column in the row and puts a border around the whole range.
I am trying to have a border drawn around a group of cells. This group of cells changes per list I make, but only the height changes. The width is always the same (from column A to column J) and the top is always at row 5. Only the last row changes. How can a border be drawn around this group of cells no matter the size of the group of cells? Below is the macro I have written so far.
Cells.Select
Cells.EntireColumn.AutoFit
ActiveWindow.SmallScroll ToRight:=7
Columns("K:N").Select
Selection.ClearContents
ActiveWindow.SmallScroll ToRight:=-7
Range("A2").Select
Rows("2:2").RowHeight = 49.5
lastrow1 = Range("A65536").End(xlUp).Select
Range("A5:J" & lastrow1).BorderAround.Weight = xlThin
lastrow2 = Cells(Cells.Rows.Count, "C").End(xlUp).Row
For I = lastrow2 To 2 Step -1..........................
Using VBA how could I put a border around any cell that isn't empty within the range B1:C500. (Worksheet name - Floc BOM)
View 9 Replies View RelatedFor my university coursework I've created a comprehensive building cost model but I'm struggling with one aspect, copying the plotted ground floor footprint to enable floor finishes to be selected. A user can plot shapes in a 50x50 grid (B2:AY51). The shapes are displayed using conditional formatting. All shapes are conditionally formatted red, i.e. colour index 3. I wish to place a border around the plotted shapes, so that I can then copy the outline to a new tab. e.g. Range B2:AY51, If cell conditonally formatted red then place borders to the sides of the that cell that share a boundary with a non-conditonally formatted red cell.
View 3 Replies View RelatedI'm trying to use conditional formatting to colour the border of a range of cells when another cell has data in it.
I can get it to color all the cells borders within that range when there's data in that cell but I just want the outside of the entire range.
to copy column C and D, from row 3 to the end, from sheet2,in sheet1, column A and B, starting with row 2 and after that I need to create a border to the copied values and I need to create a border to the empty cell from column C.
open attached file
I would like to draw the border for the cells with in the usedrange from column A to BM.
I have the below code, that I was using to border the column D alone.
When i change the range from "A:BM", i dont get the intended output.
Can somebody tell, what modification, I should do to get the desired output?
I have a column of data that keeps getting new information in it. what i need is a named range that i can use for a chart, first point in the named range will be the first value in the column, second point will be avg. of point 1 and 2, then 3rd point will be avg. of 1,2,3 etc.
View 1 Replies View RelatedI have a custom email creation template I am merging with another version. The problem I am having is wrapping my head around not only selecting a range that is offset from ActiveCell (column 6-9) but seeing if there is an "x" in that range which is normally blank. My previous attempts identify the "x" but adds the text every time it is found. (Each column is a flag for an email bullet and they can have all four bullets in the email where I only want the text included ONCE if they have ANY bullets included). I use the range because I do not want the text included if none of the bullets are used.
Teh StandHTML then gets used in the body of the email like other HTML items I use
The email is generated using the ActiveCell.Offset to insert special text, emails and routing and has weathered alot of changes over time.
Dim Myrange As Range
Myrange = Range(ActiveCell.Offset(0, 6), ActiveCell.Offset(0, 9)).Select
If Myrange = "x" Then
StandHTML = StandHTML & "Important Text"
End If
I am trying to build a selection for a procedure to use.
View 2 Replies View Related=IF(CEILING(B9/0.5,1)>40,MAX(CEILING(B9/0.55,1),40),MAX(CEILING(B9/0.5,1),36))-0.01
Edit B9 to the R1C1 style of cell reference, how to do that?
I have tried to reset the cell reference style back to A1 from R1C1 (Tools-->Options-->General tab-->uncheck R1C1 reference style), but when I close Excel and reopen it, the reference style changes back to R1C1 style. When I make the change I described above using the Options feature, it changes it for the current file and saves it with the file. When creating a new file in the same session, it keeps the A1 reference style, but when I close Excel and reopen it, it returns to the R1C1 style. Any ideas about how to return to the default A1 reference style for the next Excel session?
I get an error at the line in red, I'm sure I messed up the R1C1 Part. The first formula will be put in HZ5:HZ100 Those cells need to reference another sheet in the workbook call Varsity A3:A98. The Second formula will be IA5:IA100 Will ref Varsity B3:B98
So whenever someone enters a name in the varsity sheet the name will appear in the other sheet. This is a master workbook That will be copied many times that is why I am putting the formula in after I create the copy because the links would look at the original Varsity sheet otherwise then the user get the update links messages.
I am trying to insert a formula into a VBA Code but I get an error msg.
The formula is;
It's probably O so simple but: Using a variable in R1C1, here's the attempt:
-----------------------------
Dim RS_Period As Double
-----------------------------
RS_Period = Sheets("Sheet1").Range("B17") - 1
-----------------------------
Range("E2:E" & LastRow).FormulaR1C1 = "=(RC[-2]-OFFSET(RC[-2],9,0))/OFFSET(RC[-2],9,0)"
-----------------------------
I lieu of the "9" I need to use the "RS_Period" which is an offset value.
I need to know how to use a variable in an R1C1 statement. The statement is as follows:
Set rng = Sheet1.Range("A2:QFinalRowII").CurrentRegion
Ideally the statement would read something like,
Set rng = Sheet1.Range("A2:Q10").CurrentRegion
How would I use a variable name like "FinalRowII" instead of a number?
I want to subtract one date from another to find out the total waiting time, and repeat this action for multiple rows.
I'm trying to use an R1C1 formula within all of this.
Dim TotalTimes As Long
Dim iTime As Integer
TotalTimes = Cells(Rows.Count, 4).End(xlUp).Row
For iTime = 1 To TotalTimes
Cells.Find("Waiting Time").Offset(iTime, 0).FormulaR1C1 = [R[iTime]C[-1]-R[iTime]C[-2]]
Everything else in my macro is using R1C1 format for ease of automation. However, I cannot get this to resolve. I am setting the source data for a line chart.
However, if I use A1 format it works just fine.
I am using R1C1 for automation purposes. A1 format will not easily work. I have the interpolated statement in there because the range contains some empty cells. I want excel to fill the line in the chart using interpolation. All the data in the columns(N through R or 14 through 18 in R1C1 format) is contiguous. I have not tried Union, but it seems I should just use this range like I do in the A1 format.
I am writing a macro that populates some columns from other worksheets, and populates other columns with formulas. One of these formulas is a text string that includes a three digit number, with leading zeros if needed. The following formula works perfectly when typed directly into the cells:
=IF(AND(RC[15]<>"",RC[4]<>""),CONCATENATE(RC[14],"-",IF(RC[15]<10,"00",IF(10<RC[15]<100,"0",)),RC[15]),IF(AND(RC[14]="",RC[4]<>""),R[-1]C,""))
But this formula triggers a error message "Compile error: Expected: end of statement" when inserted in my sub. The "00" is highlited when the error message appears.
Every time I copy and paste cells in a specific workbook it changes the reference style to R1C1. Setting it back in the options, saving the document, closing Excel then reopening brings it back as A1 referencing but copy and paste will again return it to R1C1.
I've checked for VB code and there's nothing there either.
My current dataset goes to row 256, when I use the Macro Recorder it produces the following "static" code.
ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
"claim_export!R1C1:R256C23", Version:=xlPivotTableVersion12). _
CreatePivotTable TableDestination:="Sheet5!R3C1", TableName:="PivotTable1" _
, DefaultVersion:=xlPivotTableVersion12
QUESTION/PROBLEM:
Each month the amount of rows could be different (columns should be the same)... I have tried (3) different ways to replace the 256 with my variable name called "numbers"
SourceData:="claim_export!R1C1:R " & numbers & "C23" OR
SourceData:="claim_export!R1C1:R[" & numbers & "]C[23]" OR
SourceData:="claim_export!R1C1:R[" & numbers & "]C23
They all produce the same resulting error:
Run-time error '5': Invalid procedure call or argument.
Note* I am sure my variable is working, because when I "step into" (F8) my code and hover over my variable I can see it showing the number I expect.
know if I can use a wildcard on R1C1 notation for my "lookup value" in my Vlookup, so that the Vlookup searches for a not exact match, but on the whole contents of the cell, not just the first several letters? I am using VBA, and the vlookup is in each cell of a for next loop, so I cannot use an actual cell reference which is where I've usually seen, and used wildcards. I've tried changing the Vlookup to have the lookup value be "Cells(n,2)" instead of "RC[-2]" to no avail. I need to make the vlookup evaluate all the words in cell "RC[-2]" prior to returning the value I specified, because otherwise it returns the wrong value even though I sorted my lookup table Column A A to Z.
Start Date
End Date
Event ID
"Trans-Pacific Melodies" : an East-meets-West concert presented by Carolina International Orchestra and the China National Orchestra
10/06/13
10/06/13
22297
[code]....
I am trying to figure out how to use a variable as a row number for use in a range name and/or a pivot table range. Right now I have a range of R571C17, but the row number will change with each use of the pivot table formation macro.
View 3 Replies View RelatedCurrently, I have switched my referencing style back to the default mode; however, every time I restart Excel, it switches me back to the R1C1 Reference Style. Is there a method to prevent this, instead of unchecking the option every time?
View 8 Replies View RelatedDoes anyone know if it's possible to use R1C1 style references in conditional formatting formulas?
Eg., =R[-1]C > 1
I tried the above and I keep getting an error.
I am using follwoing vb code to enter formula to sum a range. However it is giving sum of different range.
Cells(Row, Column).FormulaR1C1 = "=SUM(R[" & a & "]C[" & b & "]:R[" & x & "]C[" & y & "])"
Where a, b , x and y are variables containg starting row, starting column, last row and last column value like a=19; b=3; x=24 and y=3. When i check the formula in that cell, it appears as Sum(F25:F30)