Macro To Look Up Cell In Table And Paste Relevant Information
May 19, 2014
What I have is a list of selected employees, with the site they work at next to them.
What I need is a macro which looks at the site they work at, references it with an address table in a separate worksheet and then pastes the site address along with the employee's name onto a thrid worksheet which will be used to print post labels.
>Look at which site the employee works at (Sheet 1, D:D)
>Find the address of said site (Sheet 3)
>Paste the relevant address along with the employees name (Sheet 1, B:B) into a separate worksheet.
This will be done weekly, and I need the macro to either only work on the latest's weeks table, or to just work with the current active selection. Any better way to layout my table.
View 12 Replies
ADVERTISEMENT
Aug 13, 2014
What I would like a macro to do is take information from cells A1 to P1 on sheet1 and add them to the table in sheet2 and then I can save the workbook. The information in A1 to P1 is taken from other cells around the workbook. Once the information is in sheet 2 I can delete or change the informtion in sheet 1 without it affecting the copied information in sheet 2.
The next time I open the workbook I can enter the information in cells A1 to P1 on sheet1 then run the macro again and will then take the information and add it to the bottom of the table in sheet2 underneath the previous information that had been added - obviously the source of this information will now be deleted.
I will need to do this again and again building up the table in sheet2. The table will also use columns A to P like in sheet1.
View 7 Replies
View Related
Jul 15, 2014
I've recorded a Marco copying and pasting information from one cell to other cells and some of the copying functions paste to two cells. I just need this to loop through all information I'm copying from the the new cells.
Range("I1").Select
Selection.Copy
Range("D1").Select
ActiveSheet.Paste
Range("J1").Select
[Code]...
View 7 Replies
View Related
Jan 16, 2014
I am a complete amature at Marco's and formulas. I have been trying to create what i need but i am unable to get it to work. I have a worksheet named "Course dates incl. pursuit" which has a table which runs from B7 to J144 in the table it has date, number, name, location, job, area, notifified, on system and passed?. in that order. I want if the passed column which is in J if that has a Y in it to copy and paste into another worksheet on the next avaliable line, worksheet name "Master."I would like it in a slightly different order if that is possible they have the same titles on the table but would like it to go number, name, location, job, area and date. Running from B5 to G(end of spreadsheet). That is the main part i would also like to to copy and paste into another worksheet if the answer is "N" but the above part is the most important part. Due to the computer settings i am unable to attach it
View 6 Replies
View Related
May 14, 2009
IF/ AND/OR
I have 6 tables on one sheet that I want to match data and print out the name of the relevant table ie brown, white ,pink etc
There needs to be a data match in both columns of a table before it prints the name of that table.
I have tried the following but haven’t quite got it right:
IF(AND(B3>9,B349,E39,B327,E3
View 9 Replies
View Related
Apr 2, 2003
I am having problems finding a way to copy the contents of a cell and paste the content to a different worksheet on the first blank cell at the end of a column/row.
View 3 Replies
View Related
Sep 11, 2009
I need to have a cell (Total) but I need to be able to enter the information which all the subtotals are inputted into that area and will be the subtotals of the total. I have two areas that I will need to keep a running total of for each job #.
I'm not sure how to find out how to do this as I'm not that advanced with excel.
View 5 Replies
View Related
Apr 22, 2014
I tried all failed.We have about 160 different workbooks (one for each business unit) stored online. Staff enters information about their weekly revenue and expenses and here at head office I collect that information and consolidate them.What I am trying to do is that;1.) Create a master Workbook with ~160 worksheets (One worksheet for each unit) named exactly the same with other workbooks2.) And macro can pull the information from related files stored in a certain folderIt is very much like another members problem but I am not sure why I cant get that code working for me? [URL]
View 5 Replies
View Related
Mar 25, 2013
I am trying to find a macro that look for last non empty cell in column A and them paste a formula/comment in all cells of column B.
View 3 Replies
View Related
Oct 9, 2013
I am trying to create a table to display name of employees and their relevant rota. Attached is a spreadsheet as an example of one rota I have.
The rota at the top gives the 3 week rotation, the table underneath is the names and which week they start on and what week.
Trying to create a table at the bottom that when I put someones name in and change the date it will populate his rota for that day/week.
I have loads of different rotation plans and need to have them all together when I enter a date.
View 1 Replies
View Related
Jan 7, 2010
I'm having a bit of a block with an index/match formula that I am trying to create for the attached spreadsheet. i.e. I need to populate cell J3 with the info the corresponding letter contained in the table to the far left. The numbers of reference to match are the 'zones' in H3 and J2.
View 2 Replies
View Related
Feb 24, 2014
I want to find a way to create multiple worksheets and matching data to be placed on appropriate sheets.
Here are more details (Please check the attached sheet screenshot as well):
Excel_Macro_Requirement.jpg
In a workbook, there is a "Master-Sheet". This master sheet contains 8 columns.
I want to create as many new worksheets after master sheet as the values are there in column B (Column 2 i.e. Ad Group). In above attached screenshot, there are 8 values (B2:B9 or A-H). So, I would like to create 8 new worksheets after the master sheet. Also, I want to rename them based on their value from Ad Group column.
Each newly created worksheet should have same columns as the master sheet . Same 8 columns with their name intact.
Finally, I want all matching data of the Ad Group values to be placed on their respective newly created worksheet. For example, worksheet A should have A2:H2 data. Worksheet B should have A3:H3 data, and so on.
Please note that same ad group may have more than one row data. But I don't want to create multiple worksheet of same name ad group. The worksheet should be just one, but all matching data should be placed in that one sheet.
I know it is a bit complex task, but I am sure there would be a way to perform this automatically - probably a macro.
View 1 Replies
View Related
May 16, 2014
What I have is a table of employees names, which site they work at and a comment.
I have a table on another sheet with the addresses of all our sites.
What I need is a macro which will:
>look at the active selection
>copy their name(sheet 1, row B) & comment (sheet 1, row G)
>look up the site they work at (sheet 1, row D)
>copy the relevant address (sheet 3)
>paste the name and addresses into different sheet
>paste the comments into another sheet
This will be used to make printable labels for letters that we post out to employees. They will need to be split up so each name and address is printed on a different label.
The comments will be printed onto letters which will have a headers which is the same for everyone, but would be nice if they could be personalised with the comments of their managers and perhaps their names (something like "Hi John, you have been selected by your manager for your great work, please find enclosed your badge. Jeff's comments: "Comment 1""). But this part is a nice extra, the important part is the address labels.
View 3 Replies
View Related
Aug 26, 2009
I am trying to have Excel 2007 open a Word Table, Select All, then Copy and paste to the open workbook. Here is what I have so far:
Sub Comments()
Dim objWord As Object
Set objWord = CreateObject("Word.Application")
objWord.Visible = True
objWord.Documents.Open "R:JohnstonOfficeProductionSO COMMENTS.doc"
Selection.WholeStory
Selection.Copy
Right now I and getting an "Type not defined" error and the Dim oData As New DataObject step. Also if delete the code to clear the clipboard, I get an error at the WholeStory step.
View 9 Replies
View Related
Feb 22, 2008
I have a if function that i am creating in excel 2000, and it has 8 variables. I am trying to put it in a macro as it is not working as a nested if function. Here is the current if function...
=IF(B2=C2,"OK",IF(B2=D2,"OK",IF(B2=E2,"OK",IF(B2=F2,"OK",IF(C2=0,"OK",IF(D2=0,"OK",IF(E2=0, "OK", IF(F2=0, "OK", "INCORRECT"))))))
the excel file is attached for further clarity
View 3 Replies
View Related
Dec 31, 2013
I have a spreadsheet using an Input Form (user cannot get to the spreadsheet to enter data - they must use the form). This is working well.
What I need to do now is allow the user to retrieve data that is already entered. Example: Spreadsheet has 100 unique records (rows). In each is ID, Name, State, Dues, and about 20 other columns of information.
I need to allow the user to key the ID # and then up pops all the other information for just the ID provided. I will also need the ability for them to then change that information if needed.
So if they key 13WIL they will get Wilson, TX, $50, etc. And then they can make changes to any field needing a change. Add a phone, change and address, etc.
View 3 Replies
View Related
Jan 7, 2009
I have some excel files that use VBA to paste information into word which worked fine with older versions of Office. Now I am on a new computer with Office 2007 and everything got hosed. The file is still being created on the desktop, but now there is nothing in it. If I try to paste into notepad a blank line shows up with nothing else, however if I try to paste back into excel the data is there.
Dim appWD As Word.Application
Set appWD = CreateObject("Word.Application.8")
appWD.Visible = False
Sheets("Calculator").Select
Sheets("Template").Range("A2").Value = Range("J1").Value
Sheets("Template").Range("A39").Value = Range("J20").Value
Sheets("Template").Select
Range("A1:A49").Copy
appWD.Documents.Add
appWD.Selection.PasteSpecial DataType:=wdPasteEnhancedMetafile
appWD.ActiveDocument.SaveAs FileName:="C:Documents and SettingsAll UsersDesktopcans.nc", FileFormat:=wdFormatText
appWD.ActiveDocument.Close
appWD.Quit
Sheets("Calculator").Select
View 9 Replies
View Related
May 19, 2009
I want to insert some data in a number of cells (e.g. A1, B4, C4 and H8) on a worksheet ('Sheet 1').
I then want to press a button and have some code that:
Looks at column B on 'Sheet 2'
Finds the next empty row Copies and pastes the information from Sheet 1 into specific cells in that empty row.
View 2 Replies
View Related
May 26, 2014
check the table in the attachment.
I only want the top row / filters (A1 - H1) to be displayed on Table 1 but keep the functionality of it.
Is it somehow possible to hide all the information below A1-H1 or put it on another table and let Table 1 refer to it?
The table is mostly in German but it shouldn't matter.
View 2 Replies
View Related
Apr 23, 2014
Look at the Picture Below I Want that the Cell that marked with Red Arrow Returns a "Rank" Value in the Table, Which is a "Blaster" Rank. And I want That Cell Also Automatically Changed When "Blaster" is Changed to "A.A.Z Gonz" or etc. What Functions that i have to choose, INDEX? XL.jpg
View 6 Replies
View Related
Apr 1, 2009
I am not sure how would I go about finding the last data entry in a table and using formula to extract information. Attached excel 2007 file to better understand. Need formulas for cell B20 and E20. You can use column A as a reference if it is easier as this column is counting the number of entries and the next value will simply be a +1 to the last value entered in column A(or 75 in our case).
For Cell B20: Need to calculate the days difference between todays date (Cell A20) and the last entry date(in this case B5, this will change as new data will be entered). A subtraction of two dates would suffice - my problem is that I do not know how to find the last entry on the table and use it. You have to remember that table gets updated and new entry will be added so then cell B20 should give the difference between A20 and the last date entered.
View 2 Replies
View Related
Nov 28, 2009
I have a table on sheet 2 consisting of 120 rows and 8 columns, on sheet 1 I have a combo box and have used INDEX to display the values for each row that I select. what I want to be able to do is edit the INDEX data on sheet 1 and then have a button that will replace the old value in the table on sheet 2 with the new value.
View 5 Replies
View Related
Dec 20, 2011
1. Below I have a sheet stock, which show the maximum qty stock should be by code and size
Sheet Stock:
*ABC1CodeSizeQty Max Should Be
21250011273125003113412500499512500580612500614471250073308756049997560913210826021491182603180128
26041761382601143014978026220159780273701697802838017978029310189780302901997803117020756081992175601250
2. Here is a Sheet sold Article
Sheet Sold Article:
*ABC1CodeSizeQty Sold2125001123125003841250062257560436756092378260278826011999780261610978028271197803013129780312913756014
3. Here is pivot table from sheet sold article, which show the qty sold by code and size
PT-Qty Sold: 1
*ABC1
2
3Sum Of Qty
4Code
[Code]....
4. But I want to get additional information in column F form sheet stock that we always keep max stock of each sold article as shown below.
PT-Qty Sold: 2
*ABCEF1
Qty Max Should Be2
3Sum Of Qty
4Code
Size
Total
[Code]....
Is it possible to get information above in column F by using Formula VLOOKUP in column F or any other formula, without modifying any data layout?
View 6 Replies
View Related
Nov 20, 2013
Name
Rock
POP
HIP POP
Alex
1
Jimmy
1
1
TOM
1
So this what I want the Macro to do, example the above table shows peoples name and the type of music they like.
So I want the Macro to extract the information into "sheet 2" of the excel as follows.
This is how sheet 2 would look like.
Alex
1 Rock
Jimmy
1 POP 1 HIP POP
TOM
1 POP
Note how for Jimmy who had 1 for pop and 1 for hip pop, is in the same cell.
View 4 Replies
View Related
Dec 18, 2008
1. In whatever cell is selected when the macro is run, enter a new row.
2. Copy the information from the row directly above the new row and paste (values, formulas, formats, etc) into the new row.
3. Return to column P in the new row, i.e if the new row is row 11, then return to P11, for row 12 return to P12, etc.
I have tried recording the macro but because it is hard coded to specific rows, its not working. I have attached a sample copy of the sheet (had to zip due to the size of the file).
View 3 Replies
View Related
Apr 16, 2009
I have a macro that transfers (copy/paste) information from one master file to several other individual files. The macro works, but I would like
to enhance it by have it spit out errors in the process as follows: if cell A42 on file VP1.xls is not equal to Cell C35 on file Masterfile.xls then make cell E2 ERROR and fomat E2 bold-red, otherwise do nothing. The macro should continue regardless, I just want it to spot errors.
I think this is pretty simple is just a matter of inserting an IF formula in the macro which is something i don't know how to do yet.
View 6 Replies
View Related
Mar 30, 2008
I need to find a forumula that will enable me to transfer values from a table within the worksheet. Something along the lines of if I13 = A16 then need to enter the number that appears in A17 into cell 019, if I13=B16 enter number in B17 into 019. I also need the forumula to include if the figure in 113 is less than 3 then need to enter 0 into 019.
View 14 Replies
View Related
Aug 21, 2009
Basically I have two groups of data
Group 1 is machine info and has
Serial Number Build Month Commission Month
Group 2 is warranty info and has
Serial Number Service Claim Value of Service Claim
What I need to do is for all machines built in a given month count the number of claims within a given number of months after commissioning and the total value of the claims.
Eg
If I have a machine serial number abc123 built in jan 07 and commissioned mar 07 I need to search the table of data in group 2 for the number of claims between mar 07 and may 07 and also the total value of those claims
View 6 Replies
View Related
Jan 14, 2014
I have some data that I have created a report from. However it doesn't show a "true" picture for the stat we want. I have a pivot table set up with data showing the hours worked for an individual. What I am wanting to do would be to cross reference the data but not sure how to compare data. I have provided some make shift data to see if it is even feasible. The end goal is to get a true picture of P.P.H The data we are able to get is in a horrible format. I would eventually like to automate this in VBA but will work on the later. I thought about doing a vlookup but the is no real matching data for all employees. Some of the names are wrong in one system and there is no matching emp ID.
View 3 Replies
View Related
May 25, 2007
I use the GetObjects function to gain access to the properties of a mailbox and want to fill out a table with some detail information. The code works fine until I have a mailbox which name has an apostrophe included.
Set o = getobjects("winMgmts:!\VS1
ootMicrosoftExchangeV2:Exchange_Mailbox.LegacyDN='/O=TEST/OU=TEST/cn=Recipients/cn=co'brien',MailboxGUID='{59A40254-9F12-4502-9A03-3FB5CB0BBD38}',ServerName='VS1',StorageGroupName='sg1',StoreName='mb1'")
I highlighted the section that causes the problem. The string within the string is encapsulated in apostrophes, hence the apostrophe in the mailbox name co'brien confuses the code and raises an error. Microsoft provides a solution by using escape characters, but that seems to work only in vbscript, not in vba. Here is a link to Microsoft's solution:
http://www.microsoft.com/technet/scr...4/hey1217.mspx
I tried some workarounds that are being used for a similiar problem with SQL statements as well, but again without success - these are the versions I tried:
co/'brien
co'brien
co''brien
View 4 Replies
View Related
