Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
  Advanced Search
  HOME    TRACKER    Excel


Selecting A Range Based On Cell Value

how (in VBA) to select a range within a column where all values are the same?

For example, given the following:

1 ID Value
2 1 A
3 2 A
4 3 A
5 4 B
6 5 B
7 6 C

How would I select range(B2:B4) where all values = A?

View Complete Thread with Replies

Sponsored Links:

Related Forum Messages:
Selecting A Range Based On The Value Of One Cell
I have rows of data, and the first number corresponds to the number of subsequent numbers that are relevant.

I want to paste that number of values into a second spreadsheet. How do I do this?


A1 B1....
6 21 15 14 32 85 14 16 21 25 26 24

In this case I want to copy the 2nd-7th number, as the 6 tels me I want the next 6.

View Replies!   View Related
Selecting Range Based On Date
On sheet 1 in cell A2 I have a date (2/22/07). On sheet 2 I have 4 columns of data...column A has consecutive dates. I am looking for a code that will select the range that begins with the week beginning date of the date that was inputted on sheet 1 and the week ending date. For example, the code will select the range 2/19/07 to 2/25/07 (A20:D26).

View Replies!   View Related
Selecting A Range Based On Date Within That Range
What i'm trying to do is select a range based on the date which happens to be in the first column of the range.

For example, I have a column (A) that contains dates and column (B) that contains names.

Its easy enough to select the entire range using


I need someting that will analyse column A and conditionally selct the range based on the date in column A (ie. it will only select the rows where column A has todays date).

View Replies!   View Related
Selecting A Worksheet Based On Cell Value
I am trying to automatically select data from a different sheet to fill data in a cell based on two other cells. I've attached a simplified version of what I'm trying to do (with detailed explanations). I hope it has enough info to get my point across.

I posted this in the "programming" forum because I'm pretty sure I will need to use vba in some form or fashion to get this to work. I am more familiar with access than excel, so I may be missing some easier way to make excel do this.

View Replies!   View Related
Selecting Macro Based On Cell Value
I have a comparison macro that compares one sheet with the next, it is called sub comp1 (). There is a condition whereby columns must be removed before sub comp1 can run. To remove these columns I run the macro called sub colcut (). What I need is the following action:

If cell BJ4 of current worksheet = "RE COMMENT" then run sub colcut () followed by sub comp1 () otherwise only run sub comp1 (). FYI The macro is to be run manually via a button rather than triggered by the value of the cell.

View Replies!   View Related
Selecting Rows Based On Cell Criteria
I'm sure there is simple code for this but I have excel spreadsheets like the sample attached that are consistant in the types of fields but the only data I want to strip out are the rows where column A has a "G" in the cell, I tried using this

Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlToRight)).Select

but this doesn't work when there is only one row of data. The number of rows with valid data will vary each day. I then tried an if, then statement and a loop but I could never get the loop to stop. I basically want a macro which parses through the worksheet and selects the rows that have that "G" in column A so I can copy them and paste them in another worksheet.

View Replies!   View Related
Selecting One Cell Copies Range
Question 1) Is there a way that whenever I select Cell B39 that it will copy cells B39:V39 ? From there I can manually paste that selection to where I need to.

If this is possible, it would save the effort of having to select B39:V39 manually and clicking CTRL-C. I am gathering data and the copying and pasting is killing me.

Question 2) Is it possible that when I click on Cell A9 that it can paste any data that I just copied from another worksheet to cells A9:D29? The size of the selection that I would copy is the same size as A9:D29 (4 columns & 29 rows).

I have searched for a solution, but I am not having much luck since I am anaware of the proper terminology for these types of actions.

View Replies!   View Related
Selecting Cell Range Of Colours
Is it possible to select only cells of a certain colour, then change these cells to a different colour? example

I want to make the dark grey columns a light green and the red columns a lets say yellow and the text black. Is this possible??

View Replies!   View Related
Randomly Selecting A Cell From A Range
I need a cell to display the (text) content of 1 of 25 cells. example: I have text content in all cells ranging A1:A25. I want cell B1 to display the content of 1 of these at random. is there a function for this or do I need to use a macro?

View Replies!   View Related
Selecting A Range Of Cells Relative To The Current Cell
I would like to select a range of cells relative to the current cell and move them to the right two cells. Basically, if I were in cell A1 I want to be able to have a macro select A1 - A8 and move them over by two cells leaving A1 and A2 blank.

Excel 2003

View Replies!   View Related
Selecting A Range From Starting/ending Cell Rows And Columns
I need to accomplish selecting a range using variables for the starting cell and ending cell rows and columns.

Pseudo code (how I'd like the syntax to be, but isn't):

Worksheets(mysheet).range(startCellRow, startCellCol : endCellRow,endCellCol).Select
With Selection
End With

View Replies!   View Related
Copy/Paste Range(s) Without Activating/selecting Range(s)
To initialize some cells/ranges, I am copying a given range and pasting it to another given range using the. Copy and .PaseSpecial methods. However, it would seem that both methods actually select the range(s) for the operations, i.e. the given ranges(s) are activated/selected thus changing the focus on the spreadsheet. I would like to perform both operations without actually selecting the given ranges.

View Replies!   View Related
Subscript Out Of Range When Selecting Range In Closed Worksheet
I am receiving a 'subscript out of range' error on the lines of code below.

I would note that all variables are declared and all seem meaningful as regards what you would expect at that point.

Below is a snippet from the immediate window which indicates what the values are:
completecashname C:CashDevelopmentMyFolderoutputCASH042706.xls
cashsheetname Formatted Sheet
cashcurrcolumn A
cashfirstrow 2
cashlastrow 876

Also the workbooks are both closed at this point (but it makes no difference)

Set CashCopy = Workbooks(CompleteCashName).Sheets(CashSheetName). _
Range(CashCurrColumn & Cashfirstrow & ":K" & Cashlastrow).Value
Set PelPaste = Workbooks(completepelname).Sheets(PELSheetName). _
Range((PELCurrColumn & PELlastrow)).Value

View Replies!   View Related
Selecting Values Based On Conditions
find a book with two sheets. One contains data and the other is the report that I must generate. In sheet one ull find the list of all the trucks received.

I would like to see all trucks that I have received in the month of say June in the report sheet as per its arrival date when I change the month on the top of the report.

View Replies!   View Related
Selecting A Certain Range That Changes
I have two tables in two different worksheets. In the first table, rows get deleted if the value in column 'S' (the first row to the right of the table) is not '1', and columns get deleted if the value in row '2' (third row above the table) is not '1'. In the second table, the number of columns stays always the same but rows get deleted if the value in column 'N' (first column to the right of the table) is not '1'.

After the rows and columns are deleted the tables get pasted in a ppt presentation.
Now the problem: I am a beginner in VBA and up til now I am only able to define a certain Range, e.g. ("A5:M17"), to be copied and pasted into ppt. But since the tables will sometimes be bigger than other times depending if rows/columns are deleted, I would rather define a dynamic Range. The top left cell of both tabels to be copied is always 'A5' but the bottom right cell changes.

View Replies!   View Related
Selecting Cells Based On Textbox Entry
I have a user form with some option buttons (1,5,10,etc...) that are used so the user can select a given number of cells they want selected. My last option button is labled Other(optOther) and has a textbox next to it(txtOther).

What I am trying to do is give the user the option to either select one of the given numbers or be able to enter their own number. The data will then be extracted from one worksheet to another. I have all the coding for the optiong buttons with the given numbers, just cant figure the textbox one out.

My data starts on B5, so what i am trying to do is when the user enters number n, i would need data from B5:B(n+4).

View Replies!   View Related
Selecting Rows Based On A Column Condition
I have a worksheet which is created monthly by one of our company's employees which reports results for that months operations and successful audits. These audits are separated into various service lines and on the report which is submitted it takes on the following format:

1|Service Line|Data A|Data B|Etc.
2|___CR_______| Data | Data | Etc.
3|____________| Data | Data | Etc.
4|____________| Data | Data | Etc.
5|____________| Data | Data | Etc.
6|___DD_______| Data | Data | Etc.
7|____________| Data | Data | Etc.
8|___MS_______| Data | Data | Etc.
9|____________| Data | Data | Etc.

What I want to do is use a macro from another sheet that has the effect of: While ServiceLine = "CR" copy the row of that line and move it to my monthly summary workbook, sheet 1. Then when the Service line changes to DD have the macro copy that information to the monthly summary workbook sheet 2, and so on. The problem is, if I test the Service Line column each time it will be an empty string the majority of the time and I'm not sure how to combat that with my If, Do, For, and While statements. As I've thought about it there are two solutions that I can think of: someone knows of a way to test the row only if it has information in it, or if there is a way that I can copy the service line information down until the change in service line so I can test Service Line on each Row.

View Replies!   View Related
Selecting Subgroup Based On Specific Group
I have a Lookup table with a Group and Subgroup field. I have created a range for the Group and also for the Subgroup. On my main page, I have created a list option which allows the user to select the items under Group (Day, Colour and Time).

What I want next to do is based on the primary selection for Group; I want it to filter it on the specific Subgroup. For Example,

The User selects Colour from Group, the Subgroup will subsequently only show the appropriate selection which is Green, White and Yellow, and no further selection.

View Replies!   View Related
Selecting A Range And Then Summing That Range
I am trying to select a range of numbers based on an active cell. I then want to sum those numbers and have that total reported to a specific cell.

For example:

Say I have a column with a list of dates (Jan/04 thru July/06). I want the user to be able to click on any given field and have that field plus the 11 fields above it summed and reported. Any help?

I came up with something like

ActiveCell.Resize(12, 1).Select

This only selects the data from the active cell and goes down...I need the opposite. I need it to select the 11 cells above the active cell (plus the active cell) and sum that data.

View Replies!   View Related
Selecting A Range Of Numbers
I'm trying to obtain a formula that allows me to select the last 20 numbers in a range of numbers that continue to increase weekly. i.e column a3-a3000 increases by one number every week. I need the formula to sum the lowest 10 numbers of the last 20. If there is 30 numbers from a13-a33 week one. I require the formula to pick up the 10 lowest from the last 20 (a13-a33). Week two the cell increases by on to a34. The formula would then have to pick up the lowest 10 from the last 20 (a14-a44) and so on.

View Replies!   View Related
Selecting A Range Using VBA
I am having trouble selecting a range in my data to copy to another worksheet. I have declared two variables (startcell and endcell), as seen below, as strings:

Cells.Find(What:=startdate, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate

startcell = ActiveCell.Address

Cells.Find(What:=enddate, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate

endcell = ActiveCell.Address

After this I would like VBA to copy all the variables in a range that is bounded by startcell and endcell. Here is what my code is currently for selecting the range:

Range("A2:" & endcell).Select

Instead of A2, I would like to select startcell, but I cannot figure out how. Currently I can get VBA to recognise endcell. For example, using the formula above I can copy the range from A2 to endcell. However, when I try and use startcell as the beginning of the range (in place of A2) the code does not work.

View Replies!   View Related
Selecting Variable Range
I need to select starting with:.

Columns A-O
Rows 1 - ( LR of ColB - Col A is empty )

View Replies!   View Related
Selecting Specific Value Within A Range
I have a spreadsheet with Employee details and each employee has a Indicator and a Score.
I'm battling to get Excel to do a lookup on the Indicator, find the applicable Score Range, see if the individual's Score falls within the range and then inserts the relevant % into a cell in a specific row of each employee.

If we did not have more than 2000 doing it manualy might have been an option. Also, the Percentages and Score Ranges in the matrix might change a couple of times....

View Replies!   View Related
Selecting Range Of Cells
I am trying to select a range of cells. The range I need to select starts in Cell A1. I need to select every row with data in column 1 up to the first row with no data. I then need to expand the range to all columns up the last column with data, including columns with blank cells.

The problem with my code relates to the selection of columns. It is only selecting up to column F. Column G is empty, Column H has data, Columns I-J are empty, Columns K-R have data.

View Replies!   View Related
Selecting A Range Using Variables
How would I select a range using variables? For example, say I wanted to say

myRange = Sheets(1).Range("A1:A100"),

but the column was variable. How would I do this if the column number was stored in a variable?

View Replies!   View Related
Selecting Generic Range
I'm trying to write a formatting macro that will insert a gray divider (row) into a blank line. I'm going to do this with a keyboard command, but I'm having a hard time selecting to column AJ. Obviously this command...

Range(Selection, Selection.End(xlToRight)).Select

...takes you to the end of the page, but I don't need to go that far, just to column AJ.

View Replies!   View Related
Selecting A Discontinuous Range
I'm trying to select a discontinous range, lets say B2:B30 & D2:D30 and this works fine using the code below:


However if I use the code below, B2:D30 is selected including column C.

Dim LastRow As Integer
LastRow = Range("a65536").End(xlUp).row
Range("B2:B" & LastRow, "D2:D" & LastRow).Select

View Replies!   View Related
Selecting Cells Based On Last Used Column In Lower Row
I am inserting a subtotal above my data set, the first cell that this subtotal takes place is "R1", then I have an unknown number of subtotals going right, depending on the number of months FCSTed by my sales managers.

Attached you will find a subset of the data and you will see that I need to select "S1 : iLastColumn(1)".

View Replies!   View Related
Selecting A Range In Excel Macro
I have created the below macro to show the user (when he / she clicks on a button) how many days are left till the deadline day (taken from MS Project).

Sub DaysLeft()
Dim rng As Range
Dim count As Integer
Set rng = Sheets("Programme Reporting").[E2:E200]
count = Application.Evaluate("NETWORKDAYS(Today(),E3)")
ActiveCell.Value = count
End Sub

The range I want to output the days to is L3:L200 that seems to be okay. I have an issue with trying and putting a range in the NETWORKDAYS area, if I try and put in E3:E200 (the range of dates) it fails, as does $E$3:$E$200. At the moment the above code does work but it only puts in the days for one of the entries (E3).

View Replies!   View Related
Selecting Only A Part Of A Merged Range
i have a merged cell which runs across a multiple columns (but a single row). i would like to insert a column in the middle of this merged cell, but whenever i click on the column header to insert a column, the entire merged range is selected.

is there a way to change the excel setting to avoid this?

View Replies!   View Related
Selecting Range With Variable Length
I require vba code which will allow me to select a range of variable size.

Starting from cell A2 use :

Range(Selection, Selection.End(xlDown)).Select

However then using the line below may not select the entire range as some columns may be empty

Range(Selection, Selection.End(xlToRight)).Select

View Replies!   View Related
Selecting Data Over A Date Range
I have 2 worksheets where I need to transfer a certain amount of data from one to another depending on dates.

Sheet A, is the main data source. Col A holds all 365 dates from 1 Jan to 31 Dec(starting at A2), and the subsequent data for each day is held in cols B to P.
Sheet B is the destination where the user will specify a key date in cell A3, then in A4 to A32, formulae populate the next 29 dates (ie so there is a continuous run of 30 days).

What I need to do, is to identify the same 30 day range from sheet B on sheet A, then to copy the data in Cols B to P for that range back onto sheet B (pasting in at D3)

View Replies!   View Related
Selecting Non Sequenced Cells In A Range
I'm trying to use the SUM function with non sequenced cell but the Range or any other function won't allow me to activate the selecting cells if there are more then 41 cell, I wrote somthing like so:

Sub Test()
Dim str AS String
Dim R AS Range

str = "A1,A3 ...... ,A57" 'this is only an example, assum that there are _
more then 41 cells
Set R = Range(str) 'Here is the Problem, I get a Runtime error 1004 _
Application-defined or object-defined error
End Sub

But if the str input was a 41 or less Cells address string then it works

View Replies!   View Related
Selecting The Whole Column As Range In Macro
I am working on a VBA macro, using the following

With wsSheet.Range("A:A")
ReDim MyArray(1 To .Rows.Count, 1 To .Columns.Count)
MyArray = wsSheet.Range("A:A")
For i= 1 To .Rows.Count
For j= 1 To .Columns.Count
wsSheet.Cells(i, j+ .Offset(0, 3).Column) = MyArray(i, j)
Next: Next

I want to select alla values in column A, but when I specify the range as "A:A" the code results in an infinite loop! How can I come around this?

View Replies!   View Related
Selecting A Group In A Moving Range
I have a spreadsheet where I need to perform a calculation on the lowest 10 of the 20 most recent entries. Currently I am just deleting the oldest entry and putting in the new data but I now desire to keep all my data.

How do I select the new range of 20 rows and then tell it to take the 10 lowest values to perform the calculation

View Replies!   View Related
Selecting Conditional Range To Copy
I have two columns of data (of varying length). The first column "A" has steadily increasing random values from about zero to 200. I would like to be able to automatically select/highlight the region with values between 50 and 100 as well the corresponding values in the adjacent "B" column.

View Replies!   View Related
Selecting A Range When Switching Between Workbooks
I select workbook 1, cell A4, then I select workbook 2, cell A4, but when I'm in workbook 2, it does not select cell A4. Am I doing something wrong here? See my code below.

Sub CopyData()
Dim i As Variant

Workbooks("1_2007 Forecast (Ancillary).xls").Worksheets(1).Activate

Workbooks("1_2007 Forecast (LGBU).xls").Worksheets(1).Activate

End Sub

View Replies!   View Related
Selecting A Variable Range And Then Subtotaling It
I am trying to enter code into a Macro that will select a range and then put a subtotal at the bottom of the range.

I have values in col D & E that I am multiplying together in column F. I then want the macro to select a range from F2 to the last Value in col F and then put a total in the next cell down (in col F). The range needs to be variable.

View Replies!   View Related
Selecting Range Up To Blank Row
I am having a few problems selecting a range. What I am trying to do is select a range where the number of columns stay the same, but the rows are variable; ranging from one row upwards. At the end of the rows, there is a blank row. I currently have;

View Replies!   View Related
Selecting A Range Using VBA Code
I have attached a spreadsheet...I'm trying to select Range A1:N16 using VBA code...


When I use this code is only gets A1:N6...: is there anyway to get it to select the range all the way to the end of the data. I tried CurrentRegion and some other stuff but can't get it to work.: The range may go upto line 500 or 3 I just never know.

View Replies!   View Related
Write Text Without Selecting Range
ActiveCell.FormulaR1C1 = "write text"

How would the code be written so it does not actually select cell range A10? I have seen this somewhere where text is written but without actualy recording "clicking cell range".

View Replies!   View Related
Selecting A Variable Column Range
I have a workbook that generates sheets for each year based on selected criteria. It starts at Column H and goes too AH and beyond. When my loop reaches Z it errors out. I think this is happening because the code is referencing the column as ASCII. Here is the

Sub Test()
Dim d As Date
Dim yrint, i, num_years, fields, field_start As Integer
Dim yrstr, crit1, crit2, left_column_range_fixed, right_column_range_fixed, left_column_range_var, right_column_range_var, left_column_range, right_column_range, cost_column, cost_column_var, cost_column_fixed As String
left_column_range_fixed = "H"
right_column_range_fixed = ":AH"
cost_column_fixed = "2"
crit1 = "=x"
crit2 = ">0"
d = Date
yrint = Sheets("Overall"). Range("H2")
field_start = 9 'changed from 9....................

View Replies!   View Related
Find Last Cell In Range, And Changing Another Cell Based On Offset Text
If i have a range say E12:O12 and want to find the last cell before blank, lets say it finds m12 as the cell with the value before blank. then with m12 it needs to determine weather row 11 in the same column has Text either "S" or "F" if "S" then m12 = t if "F" then m12 offset(1,-1) = t. And just to make things more difficult i need the range E12:O12 to step 2 as well until it gets to E208:O208 .Noting that row 11 never changes and will always have either an "S" Or an "F"

and also t = time()

View Replies!   View Related
Selecting A Range Where Data Is Populated Using Macro In Xl
i want to write a macro which searches for data in a xl sheet.It should then format that data in a particular format.The data can be present in multiple places.For eg. formating a 5*6 matrix which starts from d4 cell and a 4*7 matrix which starts from e15 cell(please note that d4 and e15 location are not fixed).

View Replies!   View Related
Selecting The 2 Last Values In A Column Of Data With Range
I m trying to make a button to add values to another sheet in my xls. Ive done that... now i try to autofill the percentages from left and above one row....

View Replies!   View Related
Ctrl-A Selecting Limited Range Of Cells
I have a spreadsheet wherein if I press ctrl-A (normally Select All) it is only selecting a limited range of cells ($B$12:$M$22). If I press ctrl-A again from there then it selects all.

I can see something like that being useful in some cases and annoying in others, but I have no idea what is causing it. Some of the cells in that range are locked and others are not. Some of the cells outside that range are also locked while others are not. In any case, the sheet is not protected.

View Replies!   View Related
Selecting A Range Of Cells With R1C1 Notation
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 Replies!   View Related
Selecting Range Of Consecutive, Identical Values
I am trying to select a range of identical values in a column. Basically I need to ask Excel to highlight any and every part of the worksheet where the value '0' (zero) occurs 30 or more consecutive times in any given column.

View Replies!   View Related
Dynamic Range Based On Cell Between A Header And Footer Cell
I need to create a dynamic range based on cell between a header and footer cell. The header cell ( A8 ) will remain static, however, the footer cell starts at A10 and then will move down as rows are added.

View Replies!   View Related
Display Cell X Of Range Based On Another Cell Number
I am trying to create a table, based on what people predict in sports games. I have most of it in place, but I have hit a brick wall where one part of it is concerned. For example, cells M43:M56 have the scores for each week of what one person predicted., so it could be 2,5,7,2 and so on. What I then need the table to do is determine which round or week it is and display the relevant score. So based on the above let's say it's round 3, and his score would be 7 for the week, and the cell to the right of this shows the week's score plus his total score so far.

View Replies!   View Related
Copyright 2005-08, All rights reserved