I have a col of dates that change, 9/15, 10/15, 11/05 and reside in col. I
I then have a corresonding cell in row I136, M136, Q136, U136, Y136 and AC136.
I want to find the starting at the earliest date starting in I36 , M136, Q136...
So I136 would be updated to 9/15, M136 = 10/15, Q136 = 11/05, ...
I am thinking a CSE type formula would be a possibility, but need assistance in this or in a piece of code..
I made a calender using Excel ,
Now I need 2 things that I can't do :
1- if the day is friday the entire row should be marked with a uniqe colour
( I tried to use conditional format but because the names of days are long formula generated it didn't work)
2- Unfortunately I know nothing about VBA , and I need to have a "GO TO DATE" box , in which I can enter a date , and as a result the entire row of that chosen date is being displayed as the first row in the calender (also marked with a sheded colour to help user find it.
I have adapted some code and it works almost perfectly in that it transposes data for each item in column A and details in subsequent columns on the same row and puts that in column format with the item number repeated, however, it does not work when the item starts with a 0 for example:
Column A Column B Column C Column D
12345 a-100 Blue a-233
will result in:
Column A Column B
12345 a-100
12345 Blue
12345 a-233
But if the item is 02345 or 03445 the code below won't pick it up....it ignores it and moves to the next item in the list. Also if in the example above, column B is blank but columns C, D, E, F etc are not, the code will also ignore the item and move to transpose the next items.
How would the code below need to be modified in order to address those two issues?
VB:
Sub test()
Dim a, b(), i As Long, ii As Long, iii As Long, n As Long
With Sheets("Sheet5")
With .Range("a1").CurrentRegion.Resize(.Cells.SpecialCells(11).Row)
[Code] .....
following is code for search in the sheet and give result in other sheet
Private Sub Searchbton_Click() 'Serach button click
'for search
Dim a(), r As Range, res, i As Long, ff As String, rng As Range
Dim title
title = Array("Sr.No", "File#", "Client File#", "Client", "State", "Borrower's Name", " Date Received", "Date & Time File Started", "Title Ordered on", "Type of Search Ordered", "Title Follow up Date", "Title Received on", "File Completed on", "Date & Time E-Mail Sent to Client", "Status", "File Canceled Date", "Remarks", "Done by")
res = Application.WorksheetFunction.Substitute(Me.TextBox1, "-", "")
If Len(res) = 0 Then..........
Problem is when we search for any data and if the recorded data exceeds 307 or more rows, the result will not show the data beyond 307 & more. it take to the Error : Run-time error '13' :Type mismatch error and cursor goto:
.Offset(1).Resize(UBound(a, 2), UBound(a, 1)).Value = Application.Transpose(a)"
Below, I interpret "vArray" as a vertical array, but the output is horizontal when I run a VBA procedure with this line
Sheet5.Cells(1,1).Resize(1, 100).Value = vArray ( The horizontal values copied are correct! )
If I change this "Resize(1, 100)" to "Resize(100,1)" the output is now vertical but the cell values copied are all exactly the same to vArray(1)
How can this line to be modified to be horizontal and its values the right ones?
I have a dimensional array / matrix that is current a 9 by X, where x depends on the amount of entries a user makes.
Anyways my question is that I have a sheet called "Database" and I wanted to know if there was a simple code to transpose my array on that sheet starting at cell "A2".
I have a string which follows this format: "App Alg FMA", "App Pgm FMA", "App Slf FMA" This string can shrink or grow dynamically depending on the number of App*'s selected. How can I split this string and load the App*'s into an Array so the array would contain the following
Array(0) = "App Alg FMA",
Array(1) = "App Pgm FMA",
Array(2) = "App Slf FMA",
I've tried using a Pivot Table, a Match Array V-Look Up formula I found on here (and can't seem to find anymore) that I altered to fit my cell needs, and even implemented RP-Excel.
This is an example of what I have:
Box
101
101
102
102
102
[Code]...
This is an example of what I'm trying to do:
Box
101
102
103
104
[Code]....
Additional challenges:
The actual workbook is over 4,000 rows long with a lot of various other information in neighboring columns.
The dates represent each time a specific box was filled. Some boxes only filled once, some up to 14 times. I only want up to the first five fills.
Able to try any of the following, or combinations of: Formulas, Pivot Tables, VBA, RP Excel
In the following example, I need to create a formula to identify the cell address containing the string value "X"
BCDEFXABCDEFXABCDEF
Assuming this was row A, the formula needs to return $A$6 (or A6).
I have a simple list of about 4 hundred addresses. Like most US Address, they all start with a street number, for example 1234 Main St. What I would like to do is have a cell where I can type some of the address, maybe just the number itself, and another cell with search the array for all possible matches. So if I type is my criteria cell 1234, I will ahve a result cell that displays 1234 Main St. And if there are multiple address witht he nubmers 1234, such as 1234 Main St. and 1234 Poplar Grove Rd. and 1234 Bennington Ln then I would like for my result cell(s) to display all possible matches. Does anyone know an easy(ish) way I can do this with formulas?
View 2 Replies View RelatedI need to add items to an array and used code out of the web to create some kind of an array list.
View 12 Replies View RelatedI am setting an array with
Code:
Set my_array = Sheets(1).ListObjects(1).DataBodyRange
Column number 2 contains numbers, but I want to 'reset' all the numbers in the second column. How can I do that? I know I can do a loop through all the elements, but I thought it would be smarter if I could set the entire column as zero in the array?
I have two large spreadsheets that are arrays. Column A contains 40 items in both files. Columns B through X contain unique names. The arrays are filled with dollar amounts. Is there some formula or function in Excel whereby I can easily combine both spreadsheets, essentially adding the dollar amounts for each corresponding cell?
View 9 Replies View RelatedI would like to sort the items in an array.
View 2 Replies View Related= IF(AND(MATCH($B8, [AXS.xls]Sheet1!$E$1:$E$400,0) - 2 = $C8,
INDEX([AXS.xls]Sheet1!$B$1:$B$400, MATCH(CX$2, INDEX([AXS.xls]Sheet1!$B:$B, $C8 + 16):INDEX([AXS.xls]Sheet1!$B:$B, $C9), 0) ) ),
INDEX([AXS.xls]Sheet1!$A$1:$E$400, MATCH(CX$2, INDEX([AXS.xls]Sheet1!$B:$B, $C8 + 16):INDEX([AXS.xls]Sheet1!$B:$B, $C9), 0), 3), " ")
i have this formula, and i think it will work if i find a way to correct the blue areas. they are trying to define the match array. i tried using the address and cell functions with no luck. i just want the array to return something like B2:B15 (from the AXS sheet) so the match function works. in the current sheet, C8 and C9 have values that refer to rows in the AXS sheet
I have an array MyArr() in excel.
Its length is from 1 to i where i takes dynamic value from varibable.
Now the problem is MyArr(1 to i) has some empty values.
Like say: if i = 5 then
MyArr(1) = "a"
MyArr(2) = ""
MyArr(3) = "b"
MyArr(4) = ""
MyArr(5) = "c"
How can I get rid of those empty elements so that MyArr() becomes only three elements long and then display them in a range of three cells.
I have a table with multiple columns in which I want to find a value, then return the value that shows up to the right of it.
For instance:
I want to look for a unique value that exists in a cell somewhere in columns B-F, then I want to return the value of the cell in the next column.
So if I have value XYZ, and it's found in row 12 of Column B, I want to return the value in row 12 of column C.
Any way to do this with an index and match or some other formula?
I've scoured the internet for this answer and have not found a formula that works.
I have a list of domain names/URLs in column A of workbook 1:
jhjh.com
hajfh.co.nz
123.123.12.12
I have a list of domain name extensions in workbook #2:
.com
.co.nz
.net
I want to determine if the cells in column A workbook one contain any of the strings in workbook 2 - note that I need to look at the string, not the entire cell in workbook one. If there is a match, true, if not, false for that cell within workbook one.
It's sort of a reverse array lookup with text. It seems that cross workbook and text is what causes the challenge.
I am trying to loop through column A and I want to store in an array where I find "App" within the cell value. I am trying to find "App" but will store the whole cell value in the array. I could not figure out the Find method, so I tried the MID function but am having no luck.
Here is my code:
Code:
Sub Arraytest()
Dim arr As Variant, lastrow As Long, i As Long, f As Long, l As Long
f = 0
lastrow = Sheets("Sheet1").Range("A" & Rows.Count).End(xlUp).Row
ReDim arr(1 To 1, 1 To lastrow)
[Code] .....
I've created a range B3:B12 in which each cell returns TRUE of FALSE. There corresponding values are listed in C3:C12. I have the same thing again in D3:D12 and E3:E12. Checkboxes link to the TRUE/FALSE cells. Attached is a stripped down file to show this.
I want to create a formula that lists each item in the one cell (no spaces required inbetween) for use with a search. I know a long winded way to do this involving many IFs but any array will be much more tidier, thing is I hardly use arrays and have struggled with this one.
I'm thinking it will be along the lines of =IF(B3:B12="TRUE",C3:C12,"")&IF(D3:D12="TRUE",E3:E12,"") but exactly what it should be is beyond me.
EDIT: The original file attached was corrupt for some reason, the new attachedment is the same except instead of TRUE/FALSE cells I've set them to 'x' for quickness (lost my work...!).
I am trying to take selected items from a listbox and put the selected items into an array. Basically I am trying to put the selected items into a variable that I can pass to other modules. I am close but something is off. I can't tell if it's the variable declaration or the code.
I get Run Time error 91. Object variable or with block variable not set
Here's what I have so far...
[Code] ......
I'm stuck with an array problem in excel. I have an array MyArr() in excel.
Its length is from 1 to i where i takes dynamic value from varibable.
Now the problem is MyArr(1 to i) has some empty values.
Like say: if i = 5 then
MyArr(1) = "a"
MyArr(2) = ""
MyArr(3) = "b"
MyArr(4) = ""
MyArr(5) = "c"
How can I get rid of those empty elements so that MyArr() becomes only three elements long and then display them in a range of three cells.
I need to query table contents where some general items are met, and item id's are not contained in an array.
Example:
Code:
SELECT LOOKUP.*, LOOKUP.Var FROM LOOKUP WHERE ((LOOKUP.Name)="test" Or (LOOKUP.Name)="test2" AND ((LOOKUP.Type)=3) AND ((LOOKUP.Var) ("array", "of", "items")))
I need to know how to add an array to a query since I can't hard-code the list each time, and the array can be a different size each time, so using array variables doesn't make sense here.
I have one workbook with two sheets. The first sheet contains the data in columns A & B. In Column A there are a number of values that are the same eg: A1,2,3,4,5 all equal "Home" A6,7,8 equal "Work". In column B there are "Comments" none which are the same.
I need a VBA that will search down column A in sheet one and find all the "Comments" for "Home" and transpose paste the comments into sheet 2 so A1 will be "Home" B1 will be the first comment, C1 the second comment, D1 the third comment and so on.
My sheet one will contain about 1000 different values in Column 1, so I need it to search for duplicates rather than the text "Home".
I have data that is formatted in an Excel 2010 table. The two columns in question are [Invoice #] and [Description]. In the description column I have descriptions of products as well as freight. The same invoice number would be tied to the product description as well as its associated freight. I need to filter out certain product types and their associated freight items.
The macro I wrote creates an array of invoice numbers that I want to filter out and leave the remaining invoices, but I can't get the filtering part to work. Here is my code:
Dim Invoices() As Variant 'array of invoice numbers
Dim Descriptions() As Variant 'array of Descriptions
Dim InvoiceFilter() As Variant 'array of invoice numbers to filter
Dim i As Integer 'counter
Dim j As Integer
j = 1
[Code]...
What happens now is that it filters out all values in the Invoice column instead of only the values in the InvoiceFilter array.
Passing an array from a sub to another sometimes works, sometimes not. But when I call the same sub twice, it definately gets stuck at least at the second time. Seems as if I tend to lose some of my items of the array. And I cannot figure out why it happens, at what pace it happens or how I could stop this from happening.
1.Could it be that a control perishes as soon as it is set to 'ctrl.enabled=false'? 2.Or could it be that a declared array 'ary=array(tb1,cb1,frm1)' can not be handled without having had its items initialized with some lines of code, although the items visibly exist within the user form? 3. Can it be that a Sub 'remembers' the former values passed to it, if set to 'optional'?
However, I have added a cleared/minimized version of my userform as a file to this post, hoping that some of you out there might find the time to have a look at it.... I would really appreciate it. I have added the decisive parts of the macro below here, as well,
Private Sub UserForm_Initialize()
Dim elem As Variant
Dim wSht As Worksheet
Dim ctrl As Control
'set control arrays
'[...]
ctrlAllStep2 = Array(cbTimeOnly, cbIntensityOnly, cbAreaOnly) '[...]
ctrlAllStep3 = Array(tbIntensityTotal, tbIntensityBleached) '[...]
MsgBox "Two Controls exist now: 1." & ctrlAllStep2(0). name & ", 2. " & ctrlAllStep2(1).name, vbInformation, "Note: controls exist..."
'disable Controls in Step2 and in Step3....................
On this is a column of Categories and a Column of sizes. I want to use these in a user form. The user will select their Category from a drop down list and the second drop down list will include only the sizes that appear next to the chosen category So for example in the attachment if the user chose 'AUD' as a category they would get the size choices of, '2x4 insert', '2x4 replica' and 'A4L' in the other drop down menu.
The master list of sizes will have to remain on a worksheet as this is what other operators will amend from time to time.
I would like to implement specific cell ranges from two specific worksheets each within 33 workbooks (which all have several tabs) into a summary page in a separate workbook.
The cell ranges are going across my spreadsheet in rows and I would like for them to transpose into a columns depending on the data which I have separated by catergory on the summary page. They are all on the same location in each workbook which is separated by country. The cell ranges are E26:P37 and I would like to transpose them and have them put below eachother without overwriting for my format on the summary page, how I can put this together in a macro?
Assume that I have in Sheet2 a list of CUSTOMIZED name.
[Code].....
Now in Sheet1, I have data in column A that has strings consist of the customized name.
For example
[Code] .....
What function should I use that could give me the result of the CUSTOMIZED name?
I was thinking of a formula i.e.
[Code] ......
Obviously, the above formula give me error. Even if it works, it'll not give me the customized name ...
I'm trying to find a way to search a second sheet in a workbook for specific criteria outlined in a first sheet (in my attached example, from A3 downwards within the 'list of search criteria' sheet), and then to copy any secondary data found against a successful search match to the original sheet, transposed against its corresponding matched search term.
As you can see in the example, the search term 'bindi' (A4 in the 'list of search criteria' sheet) appears in the 'data' sheet 3 times - the secondary data for these occurences ('feathery', 'Fibonacci', 'glassy') is copied to the 'bindi' row on the first sheet and is offset with each copy to produce a transposed-esque effect of copy and paste.
If it's any help, there are a maximum of 9 matches for a single search term in the real document.
Thanks in advance for your help... I tried to adapt a previous solution given to me for a similar question but failed miserably. I bow humbly to your expertise!