How can i make selection in Column A from 5th line from first value in this column to last value in this column? i thing first value is in A2...so selection will from A2+5...A7 to last value in this column?
View 7 Replieshow to Keep Selection in Column But Change to 2 rows less. I have the following code that works.
View 2 Replies View RelatedI have a sheet with entries dated. With values next to them.
From 1/11/08 to Whenever it ends.
I would like to work out a function to select the activerow(depending on cell)
and the 30 rows under it and then print them.
Like a report almost
This could be a button or anything, no pref on it ^^
First - What I need is an idea of how to just get the number of rows on a selection. For instance -
select worksheet
select paticular area (easy like a1)
get the number of rows that comes from that selection (there could be upto 5 rows that are merged by the front end, what i need is the number of rows that have been merged)
and Second -
once i have that number of rows - the next portion that I need selected could be a different colum - how do you add to columuns without knowing where you are at -
for instance - knowing that you are at a1 (a) but then having togoto columum number 4 row 1 (d1) - so i guess the question is is how I convert a number to the correct character then add the number at the end then use that compilation to select. something like
delare temp
get updated colum letter from corresponding column number
combine column letter and the row number you already know
select that in the worksheet
I have a shared worksheet that has many rows of data... but only certain rows are relevant to each specific users. I would like each user to be able to select their name from a drop-down list in order to have all rows that are not important to them be hidden. I can put the name of the user in column 'A' in each row they need to see, but how could I make all rows that do not contain their name in column 'A' hide? In other words, if 'Bill' is selected from a drop-down list, only rows that contain 'Bill' in column 'A' would be seen.
View 9 Replies View RelatedI have a listbox on a userform and dependent on which of the 9 values they select, I want to delete the rows in a range that do not contain the string.
I can get the solution using a match on the listbox items but not the reverse, i.e. delete non matches, dependent upon the variety of values that can be selected.
I could potentially use a filter to drop them out, is this the best way? Always struggled trying to build multi filters.
The following is how my sample worksheet looks like:
A
10
Count of A's
12
A
1
Count of B's
13
A
24
[code].....
The two count cells, Count of A's & Count of B's have been calculated with the formulas
=COUNTIF(A$1:A$25,"=A") and =COUNTIF(A$1:A$25,"=B") respectively.
Now, my problem is I want to select the cells with only A's or only B's, along with their corresponding values, but I want to select it with the two count values I found above (12 and 13 respectively), because the data I have to work on is subject to change and each time there may be different numbers of A's and B's.
I have a shared worksheet that has many rows of data... but only certain rows are relevant to each specific users. I would like each user to be able to select their name from a drop-down list in order to have all rows that are not important to them be hidden. I can put the name of the user in column 'A' in each row they need to see, but how could I make all rows that do not contain their name in column 'A' hide? In other words, if 'Bill' is selected from a drop-down list, only rows that contain 'Bill' in column 'A' would be seen.
View 9 Replies View RelatedI know there are a lot of hide row threads... i've searched for ages... but (unfortunately) i can't a solution that addresses my problem and I'm stuck. Please help!
I have a data between rows 10 and 1310 and I would like to use a combo box option to select and view certain rows of data only. I don't want to use auto filter because i have a separate macro using an auto filter on the same data - they won't play together.
So in short - combo box will contain values from column A. When value is selected from combo box hide all non matching rows based on column A values.
So i have added a combo box to sheet1 and populated it with the following workbook code...
Sub Workbook_Open()
With Sheets("Sheet1").ComboBox1
.AddItem "Select Product Type"
.AddItem "Apples"
.AddItem "Mangoes"
.AddItem "Oranges"
.AddItem "Clothes pegs"........
I have two files and I need to compare them. The two files will be store in a listbox an I have to make the lines that are different with another color or select them so it will be easy to see the diferences. It is for one project that have to be ready tomorrow
View 8 Replies View RelatedI would like to copy selected rows in a range D19:I49 to another sheet, by clicking a button to bring up a User Form containing a List Box, seven Option Buttons (one for each sheet), an OK and Cancel Button. When the User Form is displayed, the required rows are selected in the List Box, then the required sheet is selected via an Option Button. Upon clicking the OK button it pastes (only the values) to the selected sheet, but to the next empty row (if there is already data entered previously) in the same range as above (D19:I49). All seven sheets are identical and are named Monday, Tuesday, etc. to Sunday. If the option button selected is the same as the active sheet a message box could be displayed to ask the user to select another option button and upon clicking the OK button on the message box return the user to the User Form once again so that the correct option button may be selected.
View 2 Replies View RelatedI have a data set with rows of data, with a header row along the top. I want to sort my rows of data by column when the cell above the appropriate column is pressed. I know this seems cumbersome - but it fits in with the sheet. The sheet is protected, and we only want the user to be able to sort in this fashion. My problem is, with my code, I get an error when you select a range of two of the header cells. The case selection on the target.column gets confused. How can I check to see if it's just one cell? Is there a property of a range that reflects how many rows or columns it contains? I tried the following (marked with the ' )just from picking out of the pop-up list of properties of the Target range in SelectionChange, but obviously it doesn't work. My original code is the un-'-ed code.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
' If Target.Rows = 1 And Target.Columns = 1 Then
If Target.Row = SortRow Then
Select Case Target.Column
Case PriorityColumn
SortData PriorityColumn
Case JobColumn
SortData JobColumn
Case NotesColumn
SortData NotesColumn
Case SupervisorColumn
SortData SupervisorColumn
Case ShutdownColumn
SortData ShutdownColumn............................
One of the fields I want them to enter is a library branch and I have used a data vaslidation list to provide a dropdown box.
To make it act more like a windows drop down box I have hidden 7 cells above this box with the 7 possible entries. This means that with autocomplete, if they start typing in the cell it will autocomplete the entry for them.
This work fine, but if someone presses enter from the cell above my hidden rows, one of the hiddenn cells is selected!
WHY!
I have no explanation for this behaviour, nothing like it has ever happened before, and I have no idea how to get rid of it.
example attached
I have 2 columns of data E and F. Column E has 11 different words that randomly repeat, Column F has 10 years of dates, about 1,000 entries (10/11/12 format). Both columns values come from formulas.
I am trying to copy cells E & F to columns K & L starting in row 2 only if there is is data in column E (one of the 11 words) and skipping all others rows. Both the E & F values of tthe row must be copied together, i.e if text is in E45, then copy E45 and F45 into column K and L starting with K2 & L2. This is a task which will be repeated multiple times as data is replaced in columns A-D.
auto fill the rows after selecting a particular option from a drop down list. For Ex., In Drop down list we have Cool drinks and Ice cream as two options. If i select Cool drinks the respective columns should be filled with brands like, Coke, 7 Up etc...
View 3 Replies View RelatedI have a worksheet that allows you to choose 1-20... depending on the selection it should unhide specific rows but I keep getting errors...
Code that will allow you to unhide other worksheets in the same book????
I have a spreadsheet which contains our fleet information covering many vehicles in one list. The teams for these vehicles are listed in Column A. What I would like to have is:
A dropdown box to pick from All, or the various teams in A1To hide every row that doesn't match the selection of A1To reveal every row that contains the selection for A1 at any point in column A. e.g: "*Dog Team*"
This is because something might be listed as "Moved from Dog Team" or "Dog Team, temporarily on loan", or "Dog Team V66.m"
I have taken a small sample of the data I will be working from and made a very simple drop down box which displays the pages of information for the vehicles by hiding/unhiding blocks of columns:
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$2" Then
If Range("A2") = "MOT/Service" Then
ActiveSheet.Columns("A:P").EntireColumn.Hidden = False
ActiveSheet.Columns("Q:CE").EntireColumn.Hidden = True
ElseIf Range("A2") = "Contact Details" Then
[Code]....
But because there is also filters on the sheet, meaning the positions of the entries based on rows can change, I need it to search for the "*xyzzy*" method, but am unsure how to do this! While just using the Filters will work, due to some human limitations I have been asked to have a specific drop down box in a very specific location with instructions next to it.
I have a two vba codes. The first one defines the currency while the second one uses that info in order to convert them accordingly. I would like to edit the script in order to create a new column after my selection and then insert in each cell the proper currency as words (i.e $ -> USD, € -> EURO). So, if I select A1:A2 then only the cells B1:B2 must be converted into words. As an example:....
View 3 Replies View RelatedI need to create a macro that clears the contents of a range of cells. However, that range of cells is variable.
I know my starting cell (C9) and I know the selection goes over to column Z every time but the number of rows I want to clear after that may change.
Also, whatever that first cleared range is, I would need to skip the row below it then clear the same number of rows below that. (not entire row of course, just the ones from column C to column Z)
I am having trouble returning the value of the second column in a listbox.
The listbox is originally populated with an array (vaData) from an SQL query through
With UserForm3
With .ListBox1
.Clear
.ColumnCount = 2
.List = Application.Transpose(vaData)
.ListIndex = -1
End With
.Show vbModeless
End With
and then if i try to return the value of listbox1.list(1,2) elsewhere, there is an error "Could Not Get the List Property". Invalid Argument.
I have two pieces of code that perform virtually identical functions on different sets of data.Basically, the code deletes rows of data based on a selection in a listbox. One code works perfect, the other has an issue.
The Issue:
When I select a single row for deletion, or multiple contiguous rows, everything works fine. It is when multiple Non-Contiguous rows are selected that the problem occurs. I get a "Delete Method of Range Class" error.
The data for the code that doesn't work is in a defined TABLE, the date for the code that does work isn't. So I assume this is where the problem lies.
I converted the data for the code that did not work from a table to a range, and everything works fine. However, I would really prefer that this data remain a table. There is consistently going to be rows added and deleted, and a table will take those adjustments into account, whereas a named range shrinks each time I delete a row, and doesn't grow as I add rows.Here is the code that works:
VB:
'Delete Selected Offers
Else
For r = 0 To ListBox1.ListCount - 1 [code].....
I have a spreadsheet that has a long list of charges... some of those charges have multiple codes attached to them... when this happens I am wanting to group them together and let the user pick which one they want to view at one time.
Here is a very small example of what exactly I am referring to... with charge #14 I am wanting it to combine and let the user pick between 2565 and 2566. The problem is that the values can range and will not always be 2565 & 2566 and there is 10,000 + records similar to this.
test.xlsx
I have values in 4 Cols a,b,c,d and row count varies... For ex i make selection from A1 to D5
I want values of colA1 to A5 stored Range K1
values of colb1 to b5 stored in range K2
values of colC1 to C5 stored in range K3 and
values of colD1 to D5 stored in range K4..
I need the values of each columns seperately based on the selection..
As with most of the issues I post on this forum, this may be a problem with the concatenation. What I would like the following line of code to ultimately do is take a set of columns and delete them, shifting the other columns to the left. The problem is that I'm using variable index values as column references, which is not working.
Code below:
Why is this giving me a Type mismatch Run Time Error 13? The debugger highlights the Columns Select line.
Sheets("LB").Activate
Columns("AA:AZZ").Select
Selection.Delete Shift:=xlToLeft
Rows("20:300").Activate
Selection.Delete Shift:=xlUp
I am wanting to allow the user to select a cell in a worksheet and return the cell address and information/value from the cell. For example, if "Dog" is in cell A1 and "Cat" is cell A2 and the user initiates the Macro I would like the macro to to pop up a message box and say something like "Select a cell in Column A". When the user clicks on cell A1, I would like the message box to pop up and say, you selected "Dog" in cell A1.
View 4 Replies View RelatedI have information from column A to column F. I have this macro to sort column A, with the selection expanded.
View 3 Replies View RelatedI want to do is randomly pull from a field of data, MINUS any cells that do not meet the criteria in other columns. So if column A is my target column for the random selection (containing 10 unique entries), and column B has 10 repeating colors, and column C has 10 repeating animals, what can I use to perhaps create this effect: A random pull from column A, but only from rows in which column B says red and column C says cat? (The pull being 1, 4, 7, or 9 in the below example, of course.)
Data (this example is also attached in an excel doc):
One Red Cat
Two White Dog
Three Blue Horse
Four Red Cat
Five White Cat
Six Blue Cat
Seven Red Cat
Eight Red Dog
Nine Red Cat
Ten Red Horse
I have tried variations on IF and INDEX to no avail. Perhaps something with SUMPRODUCT?
I dont know if this can be done, but is it possible to automatically fill a column with check boxes which correspond to data in adjacent cells? I am aware of the marlett method, but Im really looking for some sort of rigid check box appearance, where the user just needs to click, and not type a, or y, etc. I have a macro which outputs a column of numbers in column A, and I would like to figure out if it is possible for a macro to automatically add check boxes in column B for all the values which show up in column A.
This is so that when the user selects some check boxes, the corresponding values in column A are then each copied to copies of a specific sheet, thus creating a multiple copies of the same worksheet for each value. This sounds like it could make a huge memory problem (from what I've read), but Im really dealing with a very small amount of data.
The following code inserts the text "ep" into col. F when an entry (formatted text colour green) is made in the corresponding row of col. B:
VB:
Private Sub Worksheet_Change(ByVal target As Range)
' Insert "ep" in Type column and set font colour
If target.Column = 2 And target.Font.ColorIndex = 10 Then
With Cells(target.Row, "E")
.Value = "ep"
[Code]...
However, more often than not new entries are made by pasting from another sheet, and usually more than one row. How can the code be modified to count the number of rows in the pasted selection and place "ep" in each corresponding row of col. F (instead of just the top row)?
I've been trying Selection.Rows.Count but keep getting the dreaded error message, "Object doesn't support this property or method".