Search Cell Value In Another Workbook And Copy Range From Current To Other Workbook
Mar 11, 2014
I have 2 workbooks. 1 is where data is entered called wksPB, the other is like a database workbook. The wksPB has data to be feed from column B to F and there is a dropdown.
what im looking to do is, if the combobox value is selected as Decline then it should display a messagebox that reference value in cell B is denied. if combobox value is Agreed then the macro should search the database workbook for the text entered in column b of wksPB and then copy data of C:E of wksPB to H:J of database sheet where that text is found and also the approver name in wksPB C24 to the approver cell of where that text was found. I've reached till finding the text but what I get my head twiting on is how to copy the text from wksPB column B:F to database sheet column H:K. Im attaching the sample workbooks and the code where ive reached till.
[Code] .....
Attached Files
Replacement Records - 2014.xlsx
forum file.xlsm
View 1 Replies
ADVERTISEMENT
Mar 2, 2014
I'll soon have an ETL process that will load about 150K rows into an Excel workbook. On of the columns will be the end user's userid.
I need to autofilter that external workbook based on the end user's userid, copy that range, clear a worksheet on the current workbook, and copy that range to the current worksheet.
For example, see the attached workbooks. I need to replace the data in Source.xlsb!Cases with the data in Output.xlsb!Case_List, filtered on my userid, which we'll call foo.
View 1 Replies
View Related
Aug 21, 2014
I have an open workbook (A) and this is where the code should reside. I want to use VBA to copy the content of an entire worksheet from a closed workbook (B) to an existing worksheet in workbook A. How would you accomplish this?
View 7 Replies
View Related
Mar 26, 2012
Copy data from workbook, open existing workbook, select range and paste. But my copied data is lost.
Sub Select_Copy_Paste()
'
'
Windows("ElektroFunctiesDatabase.xlsm").Activate
Sheets("PowerSupply's").Select
Range("A2:I6").Select
Selection.Copy
[Code] .........
' Here i need to do something to paste data into r.address?
View 4 Replies
View Related
Feb 11, 2010
I m not able to use the standard Excel Paste Special function when I copied a range of cells in another Excel workbook opened in a separate instance of Excel. Instead, Paste Special thinks that I have copied some non-Excel objects and gave me the Paste As options. This is not the case if I open both workbook within the same instance of Excel. Could you share with us if there is a trick to trigger the normal Paste Special options in such situations (without having to invoke Macro procedures)?
View 2 Replies
View Related
Oct 30, 2006
I have developed a macro, run by a button click, in my workbook.
I have about 5 other workbooks to process, what I want to do is to have my workbook with my macro open, then either copy or import these other 5 workbooks, one at a time, into my current workbook so I can run my macro on their data. Not sure if I need to copy them in or not, but thats all I can think of. I'm not even sure how to do this manually, I tried having my workbook open and doing a file - import on the .xls file, but it seems to be translating my data and I'm ending up with a value of 'f1' in one of my columns, no idea what that is. All I really want to accomplish is to run my macro on each of the 5 workbooks, one at a time.
View 4 Replies
View Related
Jun 30, 2008
I have a very brief question
dlgAnswer = Application.Dialogs(xlDialogOpen).Show
Selection.Copy
Windows("Derivative YK pricing Mod G.xls").Activate
Columns("B:B").Select
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
xlNone, SkipBlanks:=False, Transpose:=False
Range("C5").Select
Application.CutCopyMode = False
Windows("EXPORT1.xls").Activate
ActiveWindow.Close
As you can see, I open a workbook with the dlgAnswer, I was wondering how I could close that opened workbook
Currently I have
Windows("EXPORT1.xls").Activate
ActiveWindow.Close
however the workbook will not always be called export1.xls, I want it to close whichever one I opened earlier.
View 9 Replies
View Related
Mar 12, 2014
I have a workbook with Macros in it, now I want to create a copy of that workbook using VBA.
Here are the steps i want:
1. Create a copy of an open workbook
2. Open the Copy.
3. Close the original workbook.
View 1 Replies
View Related
Feb 28, 2014
I want to take the current sheet and copy to a new workbook (keeping the tab name) and then save as the tab name (xlsl) and close.
I've found ones that do a Saveas box or ends up saving as "Sheet1," "Sheet2" etc but can't seem to find one that keeps tab name and saves.
Here is the one I was using, but it saves all tabs not just selected:
Code:
Sub CopySheet()
Dim fname As Variant, ws As Worksheet, wb As Workbook
Dim nCol As Integer, iCol As Integer
[Code].....
View 1 Replies
View Related
May 2, 2008
I want to create a standard macro that will copy values from a Master workbook to the current, active workbook I have open. The problem I have run into is when I record a macro it also records the name of the active workbook I'm copying data into and I would like it so when I bring up a workbook I just run the macro and it copies the values in. I'll be doing 8 different macros that each copy different values from the Master spreadsheet
View 8 Replies
View Related
May 13, 2014
I am using the below code (i have combined different bits of code which i found on these forums) to open a new workbook, copy all the data in it and paste it into Sheet2 in the active workbook . Also, i want the data to be pasted on the next empty row as there is already data in Sheet2. The data that is being copied and pasted has the same format and it is going to be repeated many times.
The problem i am having is that it is not offsetting the data to the next empty row - i think it is a simple change but i can't seem to get there :s
Also, the code is currently selecting all of the data from the workbook that i open - is there a way i can select all of the data, excluding the first row (the first row contains the headings which i already have in Sheet2 in the active workbook).
[Code].....
View 5 Replies
View Related
Dec 23, 2008
Trying to copy a range from Sender.xls (sheet) Lists backstage
onto Userform.xls (sheet) Behind the Scenes
When trying to copy the values within a multicell range, the destination cell range (same size) becomes blank.
View 2 Replies
View Related
Mar 14, 2013
On one workbook I have "column A" that lists serial #'s, one serial number per cell. What I need is to be able to take all the non blank data from that column and copy it to another workbook with all those serial #'s in 1 cell numerically sorted and separated by commas.
View 1 Replies
View Related
Jun 9, 2014
I have 400 source files containing (among others) 8 sheets with daily results: "Fri 23", "Mon 26", "Tue 27", "Wed 28", "Thu 29", "Fri 30", "Sat 31 (if applicable)", "Mon 2".
Each sheet contains also:
State - D1
Role - D2
Staff ID - D3
Date - D4
Activity group name in column A (starting from row 8)
Activity type in column B (merged with C and D) (starting from row 8)
Activity time in columns E:GV (starting from row 8). Usually, there is none or only one value in whole range (e.g. E8:GV8). But sometimes there are two values.
Customer ID in row 6 (value appears only if time was reported in E:GV range)
CC Number in row 7 (value appears only if time was reported in E:GV range)
It's all about transferring values from all daily sheets in all files (.xls) sitting in folder C:WADFinal to one simple table (WAD_Consolidation_file.xls, sheet "Consolidated") consisted of 9 columns: Staff ID, Role, State, Date, Activity Group, Activity Type, Minutes, Customer ID, CC Number.
View 1 Replies
View Related
Nov 3, 2013
I need to copy a range of cells from one workbook paste into another and email that new work book.
View 3 Replies
View Related
Dec 20, 2007
to add additional questions to this link it says that the thread is expired so here i have posted a new thread.
Copy Cells To New Workbook If Match Criteria what i need is to copy the cells in new workbook "as is" i mean copy only the values and not the formula.
View 5 Replies
View Related
May 4, 2006
Background
Excel 2000. I would like to be able to copy a range on worksheet 1 in workbook 1 to a range in worksheet 2 in workbook 2.
Walk - Task described above with all fixed identities.
Double- Can the task be performed using variables (sheets(variablee)) for the worksheets and ranges?
Home Run - Can task be done with variables in workbook, worksheet, and range? Or just recommend a book or link that can get me there.
View 4 Replies
View Related
Apr 6, 2013
I have created a spreadsheet some time ago and have been asked to improve on it but I'm rusty with VBA.
I have an automated ordering system that saves each sent order as the date e.g "05-04-2013.xls" but the management team want a graph with the data for the last 4 weeks compared. I have created a seperate workbook called "consumables report.xls" which has a column with the products listed followed by columns "Quantity" and "cost" which is repeated for the 4 weeks of the month.
I want to add a button to prompt the user to choose the saved order e.g "05-04-2013.xls" (all orders saved in same directory) to copy and paste the quantity and cost columns (c8,D69) into "consumables report.xls". I got this to work earlier but it would only paste the formulas and not the values. So I need
A prompt to open workbook
Copy range (c8,d69)
Close work sheet
Paste special .value (c8,D69)
I dont care if it has to open the workbook to copy the data as this will only be used once a month so it dosnt matter how slow the code is.
week 1 week 2 week 3 week 4
Product
quantity
cost
quantity
cost
cost
quantity
cost
1
2
3
4
5
6
7
8
View 7 Replies
View Related
Mar 22, 2007
i am using visual basic and i'm trying to return the name of current workbook in a cell, this is what i have so far.
Public Sub bookname()
Sheet8.Select
Range("a1").Select
Selection.Formula = "=MID(CELL("filename"), FIND("[",CELL("filename"))+1,(FIND("]",CELL("filename"))+1)-FIND("[",CELL("filename"))-2)"
End Sub
View 9 Replies
View Related
Feb 22, 2010
I need a code that will search column A over multiple sheets for a user specified value through an input box. I then need this code to copy and paste the entire row to a new workbook titled "Batch Report" Anyone have any ideas? I have a code that will copy and paste only a few rows but no where near all of them, and I cant figure out why.
View 10 Replies
View Related
Dec 5, 2013
I found some useful code for copying specific worksheets into a new workbook based on the sheet name, which I have not been able to alter to suit my needs.
I have a workbook that has a Master Sheet that contains a summary of each claim (Name, type of claim, dates, dollar amounts, etc.) and a sheet for each specific claim.
I know I can use the filter feature on the master sheet to view all of the physical damage claims (and one column has a hyperlink to the worksheet for that specific claim). But every month I have to create a report that shows each type of claim, dates, and so on.
I would like to create a macro that can copy the worksheets to a new workbook based on the type of claim it is. I'm thinking something like for each ws in wb if range ("F15") = 1 & .range ("B4") < 30 days from today copy that sheet into a new wb.
Below is a generic and far smaller version of my workbook. The name column contains my hyperlinks to the specific sheet. Each sheet is also named based on the text in the name column (so John Doe's sheet would be named 'John Doe') and so forth.
Date of Loss
Name
Cargo
BI
PD
Paid
Reserves
[Code] ........
View 1 Replies
View Related
May 19, 2009
I am successfully opening a .csv file using a variable value stored in a named range in my Main file (the variable includes the directory and path).
I copy data from the .csv file to the Main file then I need to close the .csv file without saving but I want to do that by using the
Windows("xxxx").Activate
command where "xxxx" is the namedrange in my Main file which stores the .csv filename (without the directory and path prefix).
I can use the
ActiveWindow.ActivatePrevious
command but if I have another workbook open, this one closes instead of the .csv file I opened from the macro.
I realise this is probably very basic and I've searched the forums but can't find any identical postings.
View 5 Replies
View Related
Sep 4, 2006
On opening of an excel document is it possible to have a date in a cell that will continuously update. =now() enters the date required but if i was to go into the sheet days or whatever later is there a way that this will update automatically??
View 3 Replies
View Related
Jul 17, 2013
I'm making a dashboard and currently using a camera tool to show a sheet in a different workbook.
However the camera shot should show the sheet for the current month. (the workbook contains 12 sheets one for each month)
I was trying to reference a cell within the dashboard workbook in the formula bar to select the correct month.
[Code] .....
This is the workbook being referenced and
[Code] ....
This is what I have to try select the sheet with the right month. W2 contains whatever month it currently is.
I get that this formula is wrong because I'm referencing a sheet/cell in the dashboard workbook right after calling the tracking workbook, I just don't know how to write it correctly.
View 3 Replies
View Related
Aug 4, 2009
I need to create an automated process to copy data from book1 and book2 and paste it in another workbook called book3. I want vba code to do this task whenever I open my book3
Book1
Location: G:FUTOMS-phases - eTD and TDReference Infoook1.xls
Data to be copied: Entire Rows 6 to 12
Paste: Book3> Sheet1
Book2
location: H:OptionsInfoook2.xls
Data to be copied:: Entire Rows 1 to 5 & rows 10 to 15
Paste: Book3>Sheet2
View 14 Replies
View Related
Jun 17, 2014
I have been trying to edit a code which previously saved a copy in a new workbook to a specific folder/path. (Additionally it copies and clears some figures, but this is working as it should.)
However I would like the copy to be saved at the same location as the original workbook, regardless of the path the original workbook is saved.
I.e if I need to move the workbook containing the code to a new folder/location, when using the macro, the new copy should be stored in the same folder/location as the original one.
For now it is only saving the copy into "My Documents"
Code:
Sub Macro1()
'
' Macro1 Macro
' Macro recorded 16-02-2009 by ceng
'
Sheets("Bunker ROB").Select
Sheets("Bunker ROB").Copy
ActiveWorkbook.SaveAs Filename:= _
ActiveWorkbook.Path & Range("D3"), _
FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
[Code] ........
View 2 Replies
View Related
Jun 10, 2007
I am trying to copy a small range from one sheet in a workbook to another sheet in a different workbook. My ranges are spelled out in the SrcBook and the DestBook in the code below:
Sub CopyData()
Dim SrcBook As Workbook
Dim DestBook As Workbook*
****Application.ScreenUpdating = False
****Set SrcBook = ThisWorkbook
***
*** '*On Error Resume Next
****Set DestBook = Workbooks.Open("E:WIPIWS WIP.xls")
*** '*If Err.Number = 1004 Then
********Set DestBook = Workbooks.Add
********SrcBook.Worksheets(1).Range("D4:D6").Copy
********DestBook.Worksheets(1).Range("C10").PasteSpecial.Values
********Application.CutCopyMode = False
********DestBook.SaveAs ("E:WIPIWS WIP.xls")...........................
View 9 Replies
View Related
Oct 5, 2009
I want to copy a range (Columne J: first row to rows.count) from one workbook to another workbook which already exists. The target range is always different. The code I have is:
So far it only copies ONE cell, but even that doesn't work. I would need the whole range to be copied!
Sub FinalImport()
Call WhatRows 'to get the intZeile variable (number) via a inputbox
Workbooks("import.txt").Sheets("Sheet1").Range("J" & Rows.count).Copy _
Workbooks("Air Distance Table.xls").Sheets("Sheet1").Range("D" & intZeile)
End Sub
View 9 Replies
View Related
Oct 4, 2007
This happened because I mentioned worksheet instead of workbook. The purpose of my code is as below:
1. Add new workbook (say wb2)
2. Activate the workbook wb2
3. Copy a predefined range from already open workbook (say wb1)
4. Select the target cell in wb2 through user prompt by using mouse or keyboard
5. Paste the copied range from wb1 at the selected location of wb2
I am facing problem in selecting the cell in wb2 as wb1 always remain in foreground and new workbook does not come to foreground even I click on that.
What I wanted to mean by user form is that before the above code runs, another code runs that brings up one user form. In that user form user can select if he/she wants to copy the selected range to a new workbook or an existing workbook. Suppose user selects new workbook. This time the inputbox comes and asks user to select the target cell of the new workbook. The input box pops up but I can not select the cell in new workbook as the user form always stay there and does not allow the second work book to come in front.
I ran the above code seperately without running the user form code and it worked perfectly. Hence I would like to know how to deactivate the user form
View 5 Replies
View Related
Jun 30, 2014
I run a model in Excel that automatically saves my file every xx iterations. After saving the file I want to make a backup of the file. Tried
[Code] .....
but get a permission denied error message.
I don't want to use .SaveAs as it is a huge file that takes a while to save and SaveAs has a tendency to break links that should not be broken..
View 13 Replies
View Related
