I have a list of names in col A and a list of numbers in col B
How can I write a formula that finds the minimum value and returns the name next to it?
I was trying something like Offset(min(b2:b20),-1), but it doesn't work.
I am attempting to do is have a macro (Via Command button) go through column A to find the word "TOTAL". Once that is found I want it to offset by 3 rows (from the word "TOTAL") to grab the number and place it into column B.
View 2 Replies View Relatedi tried using the lookup but it gave a different result. i want to search a value from sheet1 A to sheet2 A and copy the remarks from sheet2 B and paste it to sheet 1 B and if not found leave it blank.
here's the attach file i just trim it down.
I'm writing some code where I need to know the column in which a specifc text string occurs. Because of the nature of the sheet, the string will only appear in one column, but that could be in almost any column on the worksheet.
For example say the text string is "Year 1", I need to find the column with this string, and then offset down to a predetermined row, or offset over to the appropriate column (something like below).
With Selection
.Offset(0, x).Select
If List.Selected(0) = True Then
y = i - 1
With Selection
.Value = Salary * Inflation1 ^ y
End With
Else
I need to combine rows that have the same value in column a and column b to the same row by offsetting column c to the next available column. For example, I would like the first 6 rows of the provided sample to appear like this.
0014B22<@44>Soil Properties and Qualities<@44>Soil Properties and Qualities<@44>Soil Properties and Qualities
0014B23<@28>Coursey<@28>Ogles<@28>Shelocta
Sometimes the values are the same in column c, sometimes they are different. I do not want to delete duplicate rows where they are the same. Sometimes there are 2 rows that have the same values in column a and column b, other times there may be 3 or even 4 rows with the same values in column a and column b. Regardless, I would like the values in column c combined on the same row in the next available column. It would be nice if the duplicate column a and column b rows (with a null column c cell) were then removed, but I could do that in the next step.
0014B22<@44>Soil Properties and Qualities
0014B22<@44>Soil Properties and Qualities
0014B22<@44>Soil Properties and Qualities
0014B23<@28>Coursey
0014B23<@28>Ogles
0014B23<@28>Shelocta
0014B24<@33><i>Available water capacity:<p> High (about 11.5 inches)
0014B24<@33><i>Available water capacity:<p> Very low (about 2.9 inches)
0014B24<@33><i>Available water capacity:<p> High (about 9.0 inches)
0014B25<@33><i>Slowest saturated hydraulic conductivity:<p> Moderately high (about 0.57 in/hr)
0014B25<@33><i>Slowest saturated hydraulic conductivity:<p> High (about 1.98 in/hr)
0014B25<@33><i>Slowest saturated hydraulic conductivity:<p> Moderately high (about 0.57 in/hr)
0014B26<@33><i>Depth class:<p> Very deep (more than 60 inches)
0014B26<@33><i>Depth class:<p> Very deep (more than 60 inches)
0014B26<@33><i>Depth class:<p> Very deep (more than 60 inches)
0014B27<@33><i>Depth to root-restrictive feature:<p> More than 60 inches
0014B27<@33><i>Depth to root-restrictive feature:<p> More than 60 inches..............
I am in the process of writing a VBA code(I should I am fairly new to this code writing!!!).What I need to be able to do is below.(enclosed please find a output in an xls file) What I should be able to do is below:
1.Find the text "Cash(No Listing)(Monthly)"
2. Offset to the 13th Column after that
3.Select the value in this column ,copy the value
4.Go to a row above and move one column to the left i.e.offset (-1,-1) and move 12 column backwards i.e.offset(0,-12)
5.Copy the value in 3 above to this entire range
6.Repeat this process for the entire file
My code is as below.Let me know where am I making a mistake. Just to let you know that this code performs the job well for the first entry i.e in the yellow makde area and doesn't do the job for any further entries .Llooks like I have some problem with the loop but not sure as to whats happening!
I have been unable to get this code quite right.
I want to be able to search all of column A for the string "UNAUTH O/D FEE £20.00" and when it is found, add £20 to column B, and 01/01/00 into column D of the same row.
Sub feedate()
Set rd = Sheets("fees")
z = 20
x = 1 / 1 / 6
For i = 1 To rd. Range("A65536").End(xlUp).Row
If UCase(Cells(i, 1)) = "UNAUTH O/D FEE £20.00" Then
Cells(i, 2).Value = z
Cells(i, 3).Value = x
End If
Next i
End Sub
- Find a value on a sheet “ORM” in Column G5:G33
-Get the corresponding value of B5:B33 of that cell
-Place that corresponding value in a canned remark: “You have the number 2 in Block, 12, 14, 25 22.
-Place this canned remark in TextBox31
I am having some difficulties using a combination of IF and the OFFSET function to display a range of cell values from another column based on a simple condition. The values I need to display at the destination cells should be offset by 8 columns to the right and "X" rows down from the reference column. The value "X" is to be determined via the IF function to check for the row index number.
For example, if Index value "X" = 8, then display the value of B2 in cell I9. IF X = "9", display B2 in cell I10 etc.
I have attached a sample worksheet that provides some examples.
I am trying to work out how to nest offset in a code using search replace. The goal is to find a value from cell A1 (example) and replace the values in the cells next to the cell containing samuel and the cell containing samuel.
A sort of search and remove data tool if you like So for example:
[QUOTE]A1: "samuel" (the search criteria)
Search range is: B1:D400
(for example)
Cell B40 = samuel
C40 = Driver
D40 = year
So, the macro is activated and finds "samuel" in B40 and I would like C40 & D40 replaced with "" The code I'm using is below: (this is just replacing the cell containing the search criteria with "test". I would like to nest offset(0,2) & offset(0,3).Value = ""
Sub Macro1()
Range("B1:D400").Select
Selection.Replace What:=Sheets("Sheet1").Range("A1").Value, Replacement:="test", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub
how to explain this except by showing it, so I explained it as best I could in the attachment. Anyone think they have a solution for this? Let me know if you need more information. Thanks!
the macro will look at the value I entered in cell A1, then find all instances of it in Column A
in every row that A1 matches, if the value in column E is "0", I need the macro to change the value in column E of that row from "0" to (that row's column B * $B$1)
When I enter a number into cell E2, I would like this number to be searched from A5:A (there will only be 1 unique record, no repeats) and when found for the current time to be put into the corresponding B column.
View 9 Replies View RelatedI want to find a string Variables via Find Method . Once this string is found, it will output the offset cell string. For example, in the attached file. i would want to find the string "ggg", once found the code will output the string "xxx"
I tried using the below code but it didn;t seem to work.
If Cells.Find(What:="ggg", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).Activate Then
File_array(1,1,1) = Cells.Offset(0, -3)
End If
Msgbox(File_array(1,1,1))
Attached is a workbook that I am having a major problem with. Basically it is a stock management system for a hotel allowing purchase orders to be easily generated and receipted.
The purchase side is working as I want it to - so no problems there.
On the receipting side, however, I am having a lot of trouble. Here's what I want it to do.
For each item shown on the Receipt sheet that has a quantity in the received column, I want the code to find the appropriate line in the StockTotals sheet (using the UID which appears in column A of both sheets), then offset the appropriate number of columns, and update the numbers as follows;
Stock on hand grows by the number receipted.
Number on order drops by the number receipted.
If the number on order is now zero, then I want to clear the ordered cell as well as the ordered date cell next to it.
I just want to replace the offset with find function. I have attached the sample file with the code. Just need a little change.
View 5 Replies View RelatedHow would I find the first cell in column A containing a number, like HY42128PP, and then offset 1 row up from there to start my autofilter?
Also, to copy the worksheet headings, what code would copy all rows from row 1, down to 2 rows above the first cell in column A containing numbers, and insert those rows in another sheet?
The initial code was from this forum. I modified it so it wont work
The code finds the first instance but none after, why?
i'm working on an excel file that consists of 31 sheets one for each day of the week, the information about how much we make each day is inputted on the end of each day, i've consolidated all the sheets into 1 big sheet and now i want to create charts over the production, so what i would like is a code that searches the huge sheet for Machine name (Found in Column A and Column I) then walk 5 cells to the right and find the number of litre's made by that machine on that shift.
The different shifts are
Formiddagsskift - Morningshift
Ettermiddagskift - Eveningshift
Nattskift - Nightshift
I will include an example of the data. The data should be pasted to the "Formler" spreadsheet. It doesn't matter if you don't wanna do this i can simply do it later i just need the code to search, and go 5 cells to the right and remember which cell it is, and make sure it is in the right "Shift" ie, all the 282 machines for morningshift are summed in c7 and c10 has eveningshift and c13 has nightshift.
Quite time consuming to search through 31 days of production to find the correct machines on the correct shifts. And the data changes for each month so this would be a great asset to me.
On Sheet 2 I am looking for a formula to find Dog1 in a cell on a different sheet and then to equal a cell 2 columns to the right of where ever it found Dog1. I cannot make it so that it simply equals a certain cell all of the time. It has to be able to move in sheet 1. For example sometimes Dog1 will be on row 5 and sometimes it will be on row 7. So the equation I am looking for needs to be able to work no matter what row it is on. I have tried a couple VLOOKUP equations but they are not working because like I said, Dog1 is not the only text in that cell.
View 3 Replies View Relatedon sheet 1
I have a list of race car numbers (20K, 15W, 2) in A1:A50 (may be more or less than 50)
Next to them in B1:B50 are the point values they earned for a night of racing. 100-97-94 etc.... these are points they have earned for a night of racing that week.
in C1 I have how many column over I need to write to (ex. 4 for Column "D" on sheet 2)
On sheet 2 I have all the total for each week.
example
A1 B1 C1
Car 4/22 4/29
20K 94 90
15W 97 100
......
What I need is some code to go down the driver list on sheet1 and write their points in colum D on sheet 2 when it finds the appropriate car number. If the car number does not exist then add the car to the bottom of the list (A50) or whatever, and write the points 4 columns over.
I am trying to locate specific values in column a of a spreadsheet and I want to be able to move (cut and paste, offset, ???) only those values to column c of the same row. The values I am looking for are text and they all begin <@29>, <@33>, etc. (pagemaker codes). I want to move the cells with the pagemaker codes to column c. and leave the other ones in column a. Does anybody know how to do this using vba? Below is a sample of my column a.
16D
16D
16D
16D
16D
16D
16D
16D
16D
16D.........
I have a code where I am trying to do a find for 2 criteria. If both criteria are found in the same row I want to then offset more data on that row. My find code is not working. Here is what I have:
Sub test()
Dim str As String
Dim str1 As String
str = Sheets("Pt2Filter").Range("Repair_Description1")
str1 = Sheets("Pt2Filter").Range("DateOfInvoice1")
Sheets("Invoiced Pt 2").Activate
Find_Range = ActiveWorksheet
‘search For items
Set found_range = Find_Range("str", Columns("D"), xlValues, xlPart)
For Each Cell In found_range
If Intersect(Cell.EntireRow, Columns("A")).Value = _
"str1" Then...
End Sub
Whenever I try to run the code the part that I have as bold returns a Type Mismatch error.
My source data generates a sheet full of individual dates and condo rates. We'll call it the "Rates Tab". The dates are not sorted or organized into a single column and to complicate it further the data has blank rows periodically. The only recognizable pattern is: (example) the date is in cell b12, then the condo rate will be 2 columns to the right in d12. On a separate sheet, the user will input a check in date(date A) and check out date(date b). I need to find the rates for all dates from Date A to Date B located on the Rates Tab. how to find a Date across various columns and then return a value 2 columns to the right from the "target"?
View 6 Replies View RelatedI need to find the last value cell in a row and display its contense. Is OFFSET the best way of doing it? Cell H3 will need to contain the formula and the row to seach is also row H. In H3 I want the value that is found in the right most cell on row H that contains anything.
View 3 Replies View RelatedI am trying to achieve something like this :
Find a specific text in my column B (example : "Proposal ID"), when "Proposal ID" is found, select this cell and offset to the column C (Offset(0, 1)). Then copy this cell value in another sheet.
This will be repeated with different texts (always in the column B), so if the text is not found, I need the macro to continue running.
On Sheet2 I have a table where I want M2 to do the following:
1.) Look at cell A2 where the name "John" is and B2 where the name "smith" is.
2.) Look at sheet1 and look in B2 and C2 for "John" and "smith"
3.) Once it matches the name, place the contents of sheet1, cell I2 into sheet2, cell M2.
So in short, match the name on sheet2 to the name on sheet1 and return the number in I2 to M2 on sheet2.
Maybe combining the persons name in to one column would make it easier?
I would like to be able to find all cells in row 2 that are "greater than 0". Then I would like to return the coresponding job number in row 4. I need to create a list of each job with the number of hous spent on that job next to it. I may have 30 different jobs but only 5 jobs that have hours for the specific week.
How I attemted to solve this is to create a table that listed all the hours from the largest number in row 2 to the smallest. Then I found the job number corresponding to that number of hours. The problem with this meathod is that if two jobs have the same amount of hours then the first job number is returned for both values that are the same. See attached example.
i've got two textboxes and a command button on a userform.
Textbox1's value is "A" Textbox2's value is "B".
On commandbutton_click, i'd like to search down column P for textbox1's value.
then offset -5 to column J and insert textbox2's value.
Then Next search for the next textbox1's value and replace the offset again until all values have been replaced.
I've done the searches and not sure exactly how to go about it, it seems so easy but i'm getting tired of looking at this project.
I'm still getting to grips with the Find Command. Basically, I have the below code that looks at a line in a sheet(ws_Site) based on the Line ID Number that is in column A and then Finds that that LineID_Value in a different sheet(ws_main) and copies a value from column I on that line across. Problem is, if the cell I is blank it copies it across and essentially clears the cell if there was data in it.
How can I adjust the below code to only set ws_main.Range(c.Address).Offset(0, 8).Value = LineID_Value if LineID_Value is not blank?
For Each LineID In ws_Site.Range("A7:A" & SiteRows) ' Loop through all the cells in range
LineID_Value = LineID.Offset(0, 8).Value
'Dim c
With ws_main
Set c = .Range("A7:A3000").Find(LineID, LookIn:=xlValues)
'If Not c Is Nothing Then
ws_main.Range(c.Address).Offset(0, 8).Value = LineID_Value
'End If
End With
Next LineID
I have three columns of Data. A is vehicle number, B is miles and C is a Date. I want to be able to pull the miles for the newest date when the user types in a bus number next to the formula. I think It can be done with an array formula but I am not 100% sure on how to do it. Also is it possible if they enter a vehicle number and a date that a different formula finds the miles for the most recent date to the date entered.
Excel Help.JPG