I have a single column with references on sheet 1, on sheet 2 I have a single named cell 'FormRef' which contents change (references). Active cell is in sheet one column A (column with references). If I use the FIND function dropdown and enter the '=FormRef ', Excel to quote "cannot find data".
Like a shortened version of vlookup I think. I want the active cell to go to the cell that has the contents of the single named cell in
sheet 2
I want to clear the range A10:IV65536 or all the cells containning numbers under the row A10.
Right now it takes for ever to clear it mannually because excel recalculates everything... i have over 100 000 data and id like to find a way to delete them quickly.
Is there a way to clear a range without excel recalculating everything???
If not the best way i think would be to clear the last columns first all the way to the first columns.
Let's say you have a named range, Rng1, which consists of cells A1 & A2. In vba how would you report back what, if any, named range the following cells resides:
Code] .....
here are multiple named ranges so using intersect is not feasible. Essentially, through code, I will be given a range and I need to determine if that range if part of a named range.
I need to create a named range on multiple sheets with the same named range & i cant figure out how to do this. EG :- I want to create a named range called "_SubUnitRows" on sheet1 starting from "A1:A50" & other named range again called "_SubUnitRows" on Sheet2 starting from "A1:A25" ...
View 2 Replies View RelatedI'm trying to make my named ranges remember the values of the last active cells used within another named range. The purpose of this is to make my charts dynamically change dependant on two criteria selected. My spreadsheet currently updates itself as and when I change the active cell within a single named range, dynamically changing the chart data by using Lookup based on the active cells value. However I want to get away from having several charts showing, I would like to have a single chart which dynamically changes based on a second selection. So the first selection is for a department (Facility) which changes the chart data relevant to that department, the second selection is to dynamically change the chart shown for the pre selected department.
Picture2.jpg
Using the following code when updating just one criteria with several charts
VB:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(ActiveCell, [MeasureType]) Is Nothing Then
[valMeasurePicked] = ActiveCell.Value [code].....
which works fine but I'm not sure how to add a second selection criteria because my code uses Activecell. I thought that the VBA needed to set the last used value of a range as a variable and therefore allow the second criteria to be selected but am not sure how to put it into practice.
if I can use a named criteria as well as a named range. In essence what I am looking to do is count certain cells that meet the criteria in a certain named named range,
View 9 Replies View RelatedMerge two columns into one list in excel
I would like to combine List1 and List2 into a 3rd named range called List3. I was wondering if this were possible without using any additional cells/columns (i.e. I don't want to use Column C like in the example shown in the link above).
Here's the formula from the example:
Code:
=IFERROR(INDEX(List1,ROWS(C1:$C$1)),IFERROR(INDEX(List2,ROWS(C1:$C$1)-ROWS(List1)),""))
I've played around with it, but could not come with any that worked.
I have read post re this question but have not been able to answer my problem. I get the error message 'Application defined or object defined error' when running the code below. I should indicate the range counter currently indicated about 6,200 rows that this code will work on and the individual range names in the list of 6,200 rows are spread over at least 20 worksheets.
The code appears to be running but after some time it stops on the line of code 'Range(Cells(i, 1).Value) = Cells(i, 2)'.
Sub PopulateWithImportData()
Dim counter As Integer
counter = Sheets("Imported Data").Range("Counter")
Application. ScreenUpdating = False
Application.Calculation = xlCalculationManual
Worksheets("imported data").Select
Range("a1").Select
i = 1
Do Until i = counter
Range(Cells(i, 1).Value) = Cells(i, 2)
i = i + 1
Loop
I need method, using a button, that looks at a cell--say EO2, for example--, looks back on a master worksheet at a specified row and range for a match, then looks at the information from a specified range below the matching cell (The information in this column will either be blank or have an "X" in the cell), and then those rows that do not have an "X" will be hidden in the corresponding rows in the working worksheet. Therefore, if at any time the value in "EO2" ever changes, then it will automatically find a new match and repopulate and hide information as before. About 130 columns will have its own button so that a "query" can be made that depends on the information in a particular cell in that column.
The master worksheet now has matrix of 287 rows and 58 columns. Each row is for an operating procedure and each column shows a job code. An "X" in a coordinate cell for a column/row shows whether that job code is responsible for knowing that operating procedure. So, on the working sheet, an employee's primary job code is given underneath his or her name. When the button is pushed, all the operating procedures not required for a given person will be hidden and only the required ones will remain visible--grouped, if you will. Qualification dates will be easier to see now that the information is consolidated. Whenever someone transfers to a new position, a new code will be inputed on the working sheet. When the button is pushed, a new grouping will result. Any operating instructions that overlap will still have qualification dates, so that information will not need to be transcribed.
Im sorting a dynamic range as mentioned in this Sorting a Named Range. My range is called drWarningTypes and is defined as:
=OFFSET(DataSource!$A$2,0,0, COUNTA(DataSource!$A:$A)-1,1)
When there is only one cell in the range, then running the following sort function includes A1 also in the search (and also adjoining columns).....
If I have a spreadsheet with 52 weeks or 365 days worth of data on it, is there a way (without using the hide function) to display dates of a certain range? For example, I only want to see the data from week 30 - week 40. Is there some kind of macro out there that I could maybe enter start date and end date in to a 2 cells (start date & finish date) and it will automatically filter it for me?
View 9 Replies View RelatedI am building an excel folder with 200+ work sheets in it. there is a master sheet which i collect the rest of the data for the other sheets. My problem is, is that i want to be able to change the sheets quickly on the master sheet when i copy and paste or drag down. The formula that i am using in the cell on the master sheet is =SUMIF(sheet18!$B$4:$B$30,"rd1",sheet18!$E$4:$E$30)
Is there a way to quickly change the sheet from 18 to 19 to 20 and so on, or do i have to go into each formula and change it manual??
Any quick way of deleting all named ranges within a given workbook? I can loop over them, but it takes forever. (I've got about 20,000 names in total).
Turning the normal things off doesn't do much good either (e.g. auto-calculating, events, etc)
I am trying to calculate some averages. What I have is 3 columns of data in A, B, C, also the "tasks" in A are in named ranges ex: "Award Contract" is a named range - "Task_Award" and "Confirm Updates" is a named range - "Task_Updates". I've attached a sample excel sheet.
I'd like to be able to create a macro to evaluate column A, and for every row in range "Task_Award", give me the average of the corresponding cells in column C and put it in the same range of cells in column B , then, for every row in "Task_Confirm" then give me the average of the same range of cells in column C and place the result in the same range of cells in column B. This is my very first post so I hope I am doing this correctly. I have 77 of these task ranges to evaluate and it will take a long time to do it manually. I'm thinking of a loop function.
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 named range that expands and contracts based upon the amount of data that is in some column. Call it AllData_UsedRange.
I have another named range that actually refers to a range. Call it AllData.
Column A
Row2 56
Row3 44
Row4 65
AllData is a named range that refers to the range A2:A65536
AllData_UsedRange refers to A2:A4 by way of this formula.
=OFFSET(AllData,0,0,COUNTA(AllData))
How to I obtain an address of AllData_UsedRange in VBA code?
These do not work...
ThisWorkbook.Names("AllData_UsedRange").RefersToRange.Address
Evaluate(ThisWorkbook.Names("AllData_UsedRange"))
I am trying to create a graph for a range of data that updates monthly (adding an extra month each time). I wanted the graph source data to update automatically each time the data is refreshed so used an OFFSET formula to identify a named range. I then point the graph to the named range as the source data.
When I enter the range as the source data the graph picks it up. However, when I re-enter the source data option on the graph it has converted the named range into a cell written range (ie. replaces "=QUALITY" with "='Front page'!$B$7:$J$10" - which therefore will not update when the range increases.
I know that I can return the value of a defined name range, the address, and even the value of the define name, but if you are given a range address, how do you find its corresponding defined name in code?
View 4 Replies View RelatedMy searches have not produced anything that I could apply to this situation.
I'm trying to write VBA that would:
1. Search a Workbook for Dynamic Ranges.
2. When a Dynamic Range is found the code would:
A. Determine the current coordinates for the range.
B. Change the "Refers To" value From "=OFFSET...." To "=Worksheet_Name $Column$Row:$Column$Row"
3. Save Changes.
4. Close File.
My apologies but I have very little experience in writing VBA. I understand about variables, arguments, and IF/THEN but just enough to use functions within Excel.
How do I duplicate the values to say 4 times in a column?
So I have in a column,
dog
cat
bird
fish
I want to duplicate the above to look like this below,
dog
dog
dog
dog
cat
cat
cat
cat
bird
bird
bird
bird
fish
fish
fish
fish
I'll need to do this for 500 unique values 12 times each, so is there a formula to do this easily?
Is there a way to quickly format a cell so that it acts as though it is just a number and can still be used in a formula but also have a label? For instance I would like to be able to type in "10cm" and have the cell equal 10 and have it formatted to "General cm".
I realize that this is possible with the cell formatting menu, and can be applied to lots of cells at once, my question is can this be done somehow by just typing into the cell so that I can enter lots of cells that may have different labels without having to go into the cell format menu for each one.
I've built a simple inventory tracking system, and decided a reporting feature would be nice. There are four categories that are entered when inventory is removed...Date, Employee Name, Item Description, Location, and quantity.
Four my reporting purposes I'm only concerned with Date, Employee name and Item Description.
I've been able to write code that does what I want using a multiple Cases and a For loop once the case is identified. However, the more data there is the longer this takes...so I decided to stretch myself and try my hand at arrays (first time really working with arrays), but I'm having trouble figuring out exactly what I need to do.
Here is what I think the steps need to be.
1. Store my data (the categories above) which are located in the Check Out sheet
2. Go through the arrayed data to find exact matches based on my search criteria (here is where the Cases come in)
3. Pull out only that data and write the information to a "Report" Sheet
4. Export that sheet to PDF (this part I already have)
Below is a copy of what my current "working" code looks like (I should mention that the search selections are made from a userform this is what the Cases are deciphering between which ones are blank etc...), also most of my variables are instantiated as Public variables within a Public_Variables module also below.
[Code] ....
And the Public Variables...
[Code] ....
When I type an 11 into my textbox (in my userform), I believe that the moment I type the first 1, the "event" kicks in. Is there anyway that I can have the change even "wait" until I am finished typing in all the digits of my number?
Code:
Private Sub TextBox1_Change()
Dim prime As Integer, divisor As Integer, currentcol As Integer
Dim faccount As Integer, currentresidue As Long, currentfactor As Long
Dim i As Integer, j As Integer
prime = TextBox1.Value
TextBox2.Value = prime - 1
'Write divisors across and phi of the divisors across at the bottom
Spreadsheet1.Range("c2").Value = 1
[code].....
I am using Excel 2003 to run a workbook that contains 60 separate worksheets. To make it easier for the techs to navigate the workbook I created a block of 60 autoshapes, (5 blocks high x 12 blocks long) each block hyperlinked to each worksheet and labeled with the worksheet name. I then placed one of these blocks at the top of every worksheet. A tech can click on the block and it takes him right to the page he is looking for, pretty straight forward. It works very well, but as you can guess this is a lot of autoshapes to be stuck in one workbook (3600) and whenever you make major changes to the workbook than the blocks become a factor, and if you resize the columns or add one, or change a worksheet name... I thought about just creating 60 custom buttons and sticking them on a custom tool bar - but I found trying to create a button with a number on it like "34" (for "worksheet 34") was pretty tough in the button editor.
way to create a set of hyperlink buttons that will allow you to quickly navigate through 60 worksheets?
What is the quickest/best way to find out exactly what is causing a Type 13 Mismatch error?
Debugging with F8 is taking forever as I have to go through loops that go through 6000+ rows each...
I have formula that looks for information from another sheet (sheet name "ValidationLists")in Column A (list "billto") and returns all the occurances in my current worksheet (including the 10 columns next in the array). What it looks for is based on whatever value is currenty in Cell A2.
Example of formula is as follows:
{=IF(ISERROR(INDEX(ValidationLists!$A$2:$J$300,SMALL(IF(billto=$A$2,ROW(billto)),
ROW(1:1))-1,1)),"",INDEX(ValidationLists!$A$2:$J$300,SMALL(IF(billto=$A$2,
ROW(billto)),ROW(1:1))-1,1))}
Basically I want to return everything that matches cell A2 of my current sheet from sheet list "billto" in a different sheet but I need the adjacent cells as well. So one cell below this would read the following (Just the Row Changes):
{=IF(ISERROR(INDEX(ValidationLists!$A$2:$J$300,SMALL(IF(billto=$A$2,
ROW(billto)),ROW(2:2))-1,1)),"",INDEX(ValidationLists!$A$2:$J$300,SMALL(IF(billto=$A$2,
ROW(billto)),ROW(2:2))-1,1))}
And the column B next to the original formula reads the following (just returning one more column from the array):
{=IF(ISERROR(INDEX(ValidationLists!$A$2:$J$300,SMALL(IF(billto=$A$2,ROW(billto)),
ROW(1:1))-1,2)),"",INDEX(ValidationLists!$A$2:$J$300,SMALL(IF(billto=$A$2,
ROW(billto)),ROW(1:1))-1,2))}
It is working exactly how I want it to. The problem is it is taking 2-3 minutes. I can just get a list of rows with the value in A2 from List "billto" very quickly but then how do I get the entire row to appear in my current sheet quickly?
I am interested in selecting cells in alternating rows as follows:
12 Red Happy
00 Unique descriptor
13 Grn Sad
03 Unique descriptor
14 Yel Happy
02 Unique descriptor
I am interested in selecting all the "12, 13, etc", "Red, Grn, ..." and "Happy, Sad..." for analysis, but want to skip all the rows containing the 0- numbers and the descriptors for them. How do I quickly select only the alternating cells in a column within a selection?
I have a named range, called SubjectNamesPastoral on a worksheet called Worksheets("Group to Teacher")
I can't assign the named range to the rngSubjectFamilyRangeOnSubjectUsedSheet variable in vba.
the first two lines of code work fine, the msgbox shows "E100:E105", happy days!
However when I try to assign the same range to the rngSubjectFamilyRangeOnSubjectUsedSheet variable, the debugger runs past the 'Set' line without error, but throws 'error 91' at the second msgbox.
VB:
thisString = "SubjectNames" & strSubjectFamilyOfGroup
MsgBox Range(thisString).Address
Set rngSubjectFamilyRangeOnSubjectUsedSheet = Worksheets("Group to Teacher").Range(thisString)
OK, I have a huge SS with lots of named ranges. Many of which are dynamically assigned lists.
All of the existing ones work fine, but when try to add a new named range, it returns the cells from a previously named range. (Always the same old one.)
example:
A range (one of many) is named "Shift_List" and is defined using
=OFFSET(info!$C$3, 0, 0, COUNTA(info!$C$3:$C$2000),1)
New range is created named "PN_List" and is defines using
=OFFSET(info!AA$3, 0, 0, COUNTA(info!AA$3:AA$2000),1)
When I create a Data Validation List or otherwise use "Shift_List" as the source it works fine.
However if I do the same thing and refer to "PN_List", it returns the items from "Shift_List"
Any new named range returns the Shift_List cells, although older ones still work correctly.
Line of code that will Select a Named Range in this case I have Named a CELL "DataSummary" Need to use that named range by selecting 30 columns and 54 rows.
Range("DataSummary),(??,??) doesn't work.
