how I might 'trigger' a macro to run when a certain cell was filled with any value at all. I have the macro working fine (it's a simple copy and paste special) but I want it to run automatically when the cell A20 has a value in it.
View 9 RepliesI am wanting to have certain cells of data from one worksheet appear on another worksheet once the cells on the first sheet have data entered in them.
I find that I can do a simple formula to copy the cell but I want the cell to remain blank until data is added in the first sheet (it will be a mix of text and numerical entries).
I want to copy some data from internet and paste it in to worksheet location Range A1:A30. the data look like following information.
LocationKuwaitP.O.Box:4819 SafatAddress:ShuwaikhTel:-22253580Fax:-24343645Category:CONSTRUCTION COMPANIES
the above information have following header ie. Location, P.O.Box, Address, Tel, Fax and Category.
every time one of the header inforamtion is missing ie. Address or P.O.Box, Or Fax, due to this problem every time cell address of information aganist header is change. supose in first copy/paste Tel inforamtion is in A15, but second time it may be on A13, and 3rd time it may be on A17 and so on.
I want to make a macro which search header ("Location", "P.O.Box", "Address", "Tel", "Fax", "Category" ) from a Range A1:A30. than down two steps to copy header information (75325412) and paste in fixed cell location C1:C5 (C1=Name, C2=Location, C3: P.O.Box, C4=Address, C5=Tel, C6=Fax, C7=Category) in same sheet. and repeat the steps to copy information aganist header from all header in Range A1:A30.
I have rather large Excel file that spans around 245 columns & has multiple users responsible for certain columns. Columns are chunked to provide data about a specific group. Every 72 hours, I need to provide to managers what’s currently on this file in a specific summary format.
I’ve recorded a macro that gets me half way there. Here’s where I’m clueless. After my macro deletes unnecessary columns, what remains are the columns for “Main Data” group + each of the 5 “Business” groups (Investors, Lawyers, Credit, Finance, and Support) which would have identical column headings.
(1) Name (2) Address (3) ID# (4) Control#
Furthermore, for each of the 5 “Business” groups, there are 9 slots (ie- a user can enter up to 9 unique entries for a particular group.)
Example- The Investor group contains 9 slots. Each slot will contain the 4 columns mentioned above. So there are 46 slots in total – 1 for Main Data, 45 (5 groups x 9 slots) for Business groups.
MAIN DATA (columns A-D)
Investor1 (columns E-H)… Investor2 (columns I-L)… Investor9 (columns AK-AN)
Lawyer1… Lawyer9
Compliance1… Compliance9
Finance1… Finance9
Support1… Support9
MY PROBLEM: I need a macro to now cut & paste all data from each of the 45 Business groups slots & then paste at the bottom of the MAIN DATA slot.
The final file would be 4 columns (as listed above) wide. Data from each of the 45 business group slots would be one below the other- all of it underneath the data in the Main Data group.
I attempted to record a macro where I’m copying a section’s data range starting from row2 to row4000 (I know there will never be 4000 entries. I did this just to ensure that all future data would be captured) then pasting that after the last entry in the Main Data.
Example- I’d copy data from Investor1 slot(starting at column E2-H2) & go about 4000 rows down. Then I’d press CTRL+Down Arrow key in column A & then click the down arrow one time to take me into 1st empty cell where I would paste my copied data. I was going to repeat this process for the remaining 44 slots.
I’ve added some extra entries to test the macro & the problem is that the recorded macro is pasting data in specific cell location in column A instead for looking for the 1st empty cell in column A & then pasting the copied data.
So far I've gone thought the net & tried to paste in a few VBA posts/tips that I thought would work. Here's what I have so far from tinkering around. I need someone to tell me what to replace the xxxxxxx line with. This would be the language to tell Excel to paste copied data range into the first blank cell in column A. I've gone thought the net & tried to paste in a few VBA posts/tips that I thought would work.
Here's what I have so far from tinkering around. I need someone to tell me what to replace the xxxxxxx line with. This would be the language to tell Excel to paste copied data range into the first blank cell in column A.
Sub transposedata()
Sheets("ConsolidatedYTDReport").Select
Range("E2:H4202").Select
Selection.Copy
XXXXXXXXXXXX
ActiveSheet.Paste
End Sub
I have a protected template and unprotected source worksheets - - - what I would like to happen is for the macro to start and if the source worksheet cell B3 equals "Report Total" then stop - otherwise copy template worksheet then copy 6 specific cells from the source to paste values to specific cells on the newly created worksheet (B_ to C7, D_ to I7, E_ to C9, F_ to K9, A_ to C11, M_ to K11 and then K13=F13-30)
After that then start all over again unless the next row’s cell (B4, B5, B6, . . .) is "Report Total" then stop - - - the row count could be from one to a couple hundred.
Here is what I have so far but I know that with each copy the name will change and as it goes down the source file each row will change and I also need help with that.
Sheets("ee template").Copy After:=Sheets(3)
ActiveSheet.Unprotect
Selection.ClearContents
Range("I7").Select
Selection.ClearContents
Range("C7").Select
Sheets("source").Select
ActiveCell.Offset(0, -11).Range("A1").Select
I want to copy only the filled cells of a column from Range N20 to N1000 and have the following code but this code copy even the blank cells. All the cells Range N20 to N1010 have formula and dependent on the value of another cell and if another cell is blank than cell in Column N is also blank.
Please suggest the changes in the following code so that only filled cells are copied.
Code:
Dim LstRw As Long, sSaveAsFilePath As String, ws As Worksheet
Application.ScreenUpdating = False
With Sheets("Sheet1")
LstRw = .Cells.Find(What:="*", SearchOrder:=xlRows, SearchDirection:=xlPrevious, LookIn:=xlValues).Row
.Range("N20:N" & LstRw).Copy
End With
Ive been trying to find out how i can paste information in the next available column but between certain columns. Here is an example of what im trying to do. There is a calculator which represents 3 machines. It runs different senerios if you change the % of product going into it (cells to change this are light blue). What im trying to do is take the information the machine outputs to the right and organize it on the next worksheet.
The data on the next worksheet is a combination of all the machines performance (in yellow) together and the machines personal performance (in red). when the button is pushed currently, I have the overall scenerios information filling down rows. What I would also like it to do is see if im using a machine (because it can be turned off by changing the usage to 0%), and if I am, copy the results form the individual machine to the next worksheet. When it copies it needs to see if the first machine slot is open and if not the second and paste in the available location. I cant have a specific spot for each machine on the real worksheet cause there are maybe 100 machines and if 15 are used I only want the first 15 machine info slots filled and im gonna hide the rest of the columns. The way the columns fill also cant be like the rows where it looks for next available free spot. It has to only be for the specific range in red because there is info to the right of where this is going.
Sub Send_Data()
Sheets("Calculator Sheet").Select
Range("AD9, AE9, AG9").Copy
Sheets("output sheet").Select
Range("B65536").End(xlUp).Select
ActiveCell.Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
I am trying to create an conditional statement using this code
View 14 Replies View RelatedI would like the users to have the option of filling in the cells with "RED" by any means.
Here are the conditions or pseudo
If (any cell in Column X is RED)
Then (copy the row to Copy Rows Filled With Red)
If ( the cell in Column X is not longer RED)
Then (remove the row from Copy Rows Filled With Red)
In plain English, if the cell is filled with RED, it is copied over to sheet Copy Rows Filled With Red. Or if the cell is no longer filled with RED, it is removed from Copy Rows Filled With Red.
Please see attachment for explanation.
I did find information from other posts but with my mininal knowledge of VBA, I am not able to apply the macros for my need. I have an order form. Row 1 to 10 contain personal information. Column A is the "quantity" and Column E is the " total" with a formula. If cell of column E is filled (contain the $ amount), I want the whole row copied to another sheet. I also want row 1 to 10 to copy to the other sheet as well.
View 3 Replies View RelatedI am using the copy range command to copy cells from one worksheet to one that is generated on commandbutton click. Is there any way to 'paste' the cells in row 3 instead of row A?
The code i am using looks like this -
Worksheets("Products").Range("A" & i + 2).Resize(1, 6).Copy Range("C" & Rows.Count).End(xlUp).Offset(1)
This code works fine, but i want the data to start in row 5, not at the top.
I have two workbook having 8 worksheet each. Every day I need to copy data from previous day worksheet and paste it on new workbook with same sheet name.
For example :-
Workbook1 is having sheet named aa, gg, tk .....
Workbook2 is having sheet named as same as Workbook 1
Now, I want macro to copy data from Workbook1, sheetname 'aa' and paste the same in workbook2 in sheet name 'aa' and likewise
What I am trying to do is to look at specific columns, then copy the data in that column from specific rows from sheet 1 (named TIA) to sheet Macro1. I think uploading a sample of the spreadsheet would be useful.
Unfortunately the spreadsheet is a living document and continues to grow in both column and rows.. The data extracted at this point is from row 7, 23-60 and copied into the new worksheet starting at A1.
Requirements:
1) Row 5 states the macro the column will be associated with. There can be more that one macro associated to a column.
2) When column is found, data from row 7 column (x) will be copied to sheet macro1 EX. If Cell G5 = macro1 then copy data from G7 to sheet macro1 at A1
3) When column is found, data from row 23 column (x) will be copied to sheet macro1
4) repeat requirement 3 till no more Scenario's
There's one sheet that has a list of customers (this is updated very frequently). These customers are either ‘New’ or ‘Existing (as listed in a corresponding column) - would it be possible to have a macro that, when run, will place a copy of existing customers into a second worksheet (“view list – new”), and a copy of new customers into a third worksheet (“view list – existing”), with the main worksheet still listing both existing and new customers.
As the main sheet that lists all customers is updated very frequently (with customers being added and removed throughout the day), would it be possible to clear all contents of the other two sheets that each list of 'existing' and 'new' customers will be copied into, before the two lists are copied into each of the two sheets (just to ensure there isn’t any data in there from the previous time each list was copied in).
I’ve given this a go via the ‘record macro’ function - some users of this WB use excel 2000, and others use excel 2007, but it only seems to work on excel 2007 (which is what it was recorded on)…
This is the code I have:
Sub Auto_Open()
Sheets("Data").Select
Range("A2:E32").Select
Selection.Copy
Sheets("May").Select
ActiveWindow.SmallScroll Down:=-9
Range("A2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("A1").Select
Sheets("Data").Select
Range("A1").Select
ActiveSheet.Paste
Range("A1").Select
Sheets("Sheet1").Select
Range("A2:E32").Select
Selection.ClearContents
Range("A1").Select
End Sub
1) How do I set this up so that if the cell Z1 reads 1, it will paste the data to the "January" Sheet, if Z1 reads 2, it will paste to "February" Sheet, if Z1 is 3 it will paste to "March"......
I am trying to work out some code that will allow me to search worksheet2 to find the last filled cell in column A.
I would then like to copy the contents of the cell.
Then past this data into the first empty cell in a column in worksheet2
What im trying to do is have a macro that will open a file called Blue 1.xls in location "I:SchedulesBlue" and then copy data from cells N13:034. Then paste it into another excel file (Press.xls)on worksheet "Press Break" cell G14.
The data that is copied not always fills up the cells N13:O34 so I need it to go to the next blank cell in column N and paste the information from file Blue 2, and so on for Yellow 1, Yellow 2, YellNR, and Green.
So to summarise I need a macro to open 6 files copy data from the same location on each of the files(N13:O34) then close and paste it into a master document(Press.xls) worksheet "Press Break".
I'm trying to copy data from one excel sheet to another excel sheet. However, the data to be copied is dependent on the 'client name'.
To explain this further, in the first list I have a detailed report on our clients and the services provided to every employee of that company/client.
However, the sheet two only needs the names of the employees that belong to a specific client.
This can be done manually by setting a fliter on the name of the client/company, but I need to be automated. To ensure only that specific company/client company's employee name is copied.
From mySQL database, i am getting a ton of data that is all being inputted into a single excel cell. Within this cell, there are certain data points that i wish to obtain (Bank #, SSN #, Routing #). There are multiple difficulties in obtaining this information.
1. these cells contain the same fields, but different number of total characters (differing in names, addresses, etc.)
2. some of the data points (like SSN) are inputted incorrectly, so even though a SSN is only 9 digits/characters, I may have to output all 11 that the SQL database placed within the cell.
Can I get some help? I'm thinking of a search function/macro within excel, because all of the fields show up correctly.
something like (i know this doesn't work)
= or("cellA1" contains/finds/function SSN,return the 9 characters after "SSN ")
um...yeah. difficult to explain, i'm sorry!
edit: not sure what is wrong the file. I have attached a new one.
I need a formula or macro to fill a cell with the last entry in a given column.
Anyone have any advice?
Ive tried to use many of the post on this topic but I suppose I just dont understand how to stitch this into my actual code. Im extremely noob at VBA and the only way I can make macros is with the record tool.
My exact problem is I have a row of data in one workbook which is generated by a calculator built into it.
I then need the data from the output result table to be copied to another workbook in a table. I would then like the user to be able to run a different calculation on the calculator and have the results copy to the next row down as not to disturb the results of their first calculation. (I would like to assign this to a button next to the original result table)
Heres the code I recorded that just overwrites to the same spot. I was hoping I could just edit the paste location to make it skip down to the next available cell starting below the first (C25:F25).
I dont know how you guys make your code look all nice and indented either, so I apologize if its confusing I copied what the recording outputed....
I'm trying to do is definetly simple to a lot of you, but I'm struggling on how to get started. I attached a workbook that clearly shows my work! I'm almost there but not quiet. Basically the user will be able to make a slection that will be used to lookup values from a different sheet. Each selection triggers a ranking number at the bottom (red pattern) in the worksheet. Now I would like to capture all scenarios and display the ranking.
View 4 Replies View RelatedIs it possible to have a macro create a hyper link once data is entered into specific cell, i have a multi sheet work book used as a stock card system.
Each stock item has its own worksheet and the product code is entered in to cell E3
(which in turn has a macro in it to change the sheet name to match the product code).
the macro also inserts a row of info into row 5 of another sheet used as a summary sheet ( CONTROL.SHEET or SHEET 4) using copy and paste link.
i need a macro to generate a hyperlink in cell D4 of the control sheet between the row info and the matching product code sheet ( the product code is displayed in cell E4 of the control sheet.
I only input one item at a time and then manually cut and insert the row info into the stock list on control sheet. so every time i input a new item, the row info is always in row 5 of the control sheet.
I am after a macro to do the following, my visual basic skills are very limited (non existant):- Look at the date in cell A1 on Sheet 'Live Report' and err 'remember it' Copy a range of cells from A3 to A10 on 'Live Report' Go to sheet 'Monthly Summary' and find the date that had been remembered previously (this date will be in column A on 'Monthly Summary' which will probably be a mixture of values and formulas). After the date has been found paste special and transpose the 'values only' copied range from 'Live Report' (A3 to A10) in column B on 'Monthly Summary' next to the date that has been found in Column A.
View 2 Replies View RelatedI currently use the following code to insert a specified row within a worksheet.
View 2 Replies View RelatedI wondering if it is possible for a macro to recognise whether or not there is text in an adjacent cell, and if there is, then to copy data from another adjacent cell.
For example, because there is data in C2, data from A2 has been inputted into B2. And any blank cells are left alone.
a
b
c
d
e
ref1
(cell A2 data here)
DATA
DATA
DATA
ref1
Basically I have three columns in a work Sheet F, G, & H. F is empty, G contains text and column H has both text and numbers.
I want to be able to automatically copy the value from Cell H to Cell F if cell G contains the word cost.
I would also like to delete all rows where Column G & H contain two dashes -
I have a range that i need to run a report on regularly. This range has sporadic amounts of data in it. one time there may be 60 rows of data, next time there may be 250 rows of data. i want the macro to select and copy only the rows that have data in them.
i currently have a macro that i just set a range A25:A400 so it goes down and copies all these rows so it covers me .... but it is causing me problems by copying all those empty rows.
The macro will need to start at A25 and go down from there A26,A27 etc select and copy only rows that have data and stop. i need the data copied to a seperate sheet named "Combined Scoreboard" inputting at A25.
we are working one a Huge database with two other partners. its players name for football clubs and we want to translate them to our langugae. b so one of my partners translated La liga player , and other Premierleague , and me Calcio . but players were sorted randomly . Later when we finished it we faced a huge problem . we couldnt paste all three translation in on file because when you past the cells in an excel file to another it pastes all cells together also empty once. when it paste empty once it removed the filled one too from previous excel file .
More declaration :
for example I filled cell number 1,3,5 and my partner filled 2,4,6 when we try to put 1,3,5 cells into my partner , we have to copy each sells alone and we cant copy all because it will delete , 2,4,6 cells
because its not 1,3,5 cells . we have 90000 cells
I need a macro… when I run the macro.. I want to create work sheet based in the shift time and copy entire row related to that shift time of all the cell to that particular sheet… there may be multiple rows related to same shift time but remaining data may be different..
View 9 Replies View Related