1. In this formula in column C, below, i have A2 as the look up... sometimes this will be A3 , A7 or other... how can i vary this formula? I've tried it all ways.
Range("C2:C" & LR).SpecialCells(4).Formula = "=VLOOKUP(A2,Data!$A:$B,2)"
It need to be inserted based on the first cell in column A which has a value.
2. after this has done its thing... how can i paste the values to ONLY those cells which have been affected by the formula. I don't want to copy, paste special the whole column as there are sub total and other exciting things included.
I would like to copy and paste the values from a worksheet (HS-Detail) in a file to different tabs depending on the value in column A (Regions). I have a macro that works but it pastes the formulas and it takes quiet a while to run due to the number of records. How can I alter this to paste just the values and speed up the macro?
I am wanting to paste formula from N1 till N X (X = varaiable row) where X reliant on Column A Row X. If Column A Row X has character "=====" it should paste N1 Formula all the way down till N Row X which is equal to A Row X containing "=====" .
I might be sounding complicated over here but it is a simple equation.. I have tried to approach this in the capacity i could by condition if Column A row x is blank delete the row.
Please see attached sample worksheet. Column A will be generated by the user manually.
I'm looking for a way in VBA to have A1:D20 in Sheet2 copied and pasted in the "Bank Reconciliation" Sheet based on how many "Markets" there are in Column A. Then, once that's complete to have A22:D30 (the smaller box in Sheet2) copied and pasted directly below those results.
I have what the macro would hopefully generate to the right in "Bank Reconciliation" (B6:E54) as an example. So if there's a market in A1, copy and paste the box to B6. If there's a market in A2, copy and paste the box directly below the first (B26) etc. etc. until it's done, then paste the smaller box directly below whatever the macro generates.
I have attached an example workbook with a tiny subset of data and a number of criteria from the Dashboard Engine page removed.
What I need is to sum the total value for each division on the second sheet based on the date criteria (so for the first cell Jan 1/2010 - Jan 31/2010) and on a match between division name on the Dashboard Engine sheet table and the Masterdata sheet. I have tried a number of variations but keep getting a 0 for each return.
I have three sheets in my excel workbook. In second sheet, I have a simple If condition that checks to see if new items from Sheet1 meet a condition (eg, if startdate from sheet1 = today()). I am trying to copy the cells from column A and paste the values in my other sheet. I want it to append after the last cell in column A of my sheet 3.
Sub CopyNewCRs() Sheets("Sheet2").Select Range("A2").End(xlDown).Select Application.CutCopyMode = True Selection.Formula = Selection.Value Worksheets("Sheet3").Activate Sheets("Sheet3").Select Set myRange = Sheets("Sheet3").Range("A2").End(xlDown).Offset(1, 0) Worksheets("SDP_CR_Status").Range("myRange").PasteSpecial xlPasteValues, SkipBlanks _ :=True, Transpose:=False End Sub
Each one of these rows represents an entry into a ticket in our incident management system. Col4 represents the method by which the incident was reported to us (Email, Voicemail, Walk In, Ask IT). A ticket can be open and closed with a single entry if the issue is easily solved or it can have many entries if the issue is complex and requires more troubleshooting or escalation to a higher tier of support. I need to determine the number of unique tickets submitted by each reporting avenue (Email, Voicemail, Walk In, Ask IT).
In this table the number of tickets that were:
submitted via Email is 14 submitted via Voicemail is 1 submitted via Walk In is 2 submitted via Ask IT is 1
I have a worksheet consist of some 17,000 records - from ColA:ColDZ. In Datasheet, I have all values. From this, based on some values in ColA all records should be copied into another sheet(s).
I have attached a sample workbook in which I have explained the requirement.
I have a spreadsheet that contains numerous ranges on different sheets with monthly data. The year begins with all formulas for forecasted data and as each month passes I need to copy/paste values in the current month column to reflect "actual" data vs. "forecasted". I would like to simplify this by using VBA, based on an inputbox ("current month") to find the month in each range and copy/paste values.
I have a workbook which contains lots of formula and is therefore very large (about 70 mb). The sheet pulls information from field instruments every hour of every day for the entire year.
I want to write a macro, that loops through a range (B5:B8764) and copies the entire row if the value in column B is less than =NOW() - 7 days. The copied rows should then be pasted with values only exactly where they were located e.g. row 5 should be pasted back to row 5 the only difference being only the values will be pasted.
I have four worksheets with columns for different months (including future months) with a mixture of values and formulas. What I need to do is to be able to copy....paste values all the data (excluding the cells with SUM totals) which relates to a column which is less than the current month date. In other words, if today's date is the 15th May 2006 for instance, I need all columns relating to Jan, Feb, Mar and Apr to be copied and pasted as values in the same cell they are currently in. If the date was the 26th June 2006 I would need this to occur for the columns relating to Jan, Feb, Mar, Apr and May only. Hopefully you are following my logic? FYI - a formula for the current date is stored in another sheet.
I have attached an example sheet for you to have a play with. If any questions please let me know.
I am very new to Macro programming. I want to set up a macro which will copy data from few cells in a sheet and paste them as "Values" to certain specific locations in another sheet based on criteria. This copy paste needs to be done for about 40 different cells. I want to fix this with a button on the source sheet, so that this process happens when the button is clicked. I am attaching a sample file showing what I need.
How do I transpose the values in a column of cells (so the value in the topmost cell in the old column becomes the value in the bottommost cell in a new column)?
getting a vba formula to copy values from two columns and paste it in 3rd column on the click of a button.
For example:
if I have 3 rows filled in column A and 5 rows filled in column B then i need a formula to copy 3 rows in A and 5 rows in B and paste it to column C. so column C will have 8 rows now.
The number of rows the value can be entered can vary. [ example: sometimes we may have 6 rows filled in A 2 rows in B ]
I know it's very simple; I'm obviously a beginner. What I would like to do is to have an input box prompt me and then take these values and paste them into columns. One value for each column. Ideally what I would like to have happen is for the values input into the inputbox to be pasted to specific cells. I have attached an image for reference. The beginning of the range B10 and C10 will be fixed but the ending cell range B14 and C14 will be variable based on the number of entries; essentially one less than the total number of forms on row 15.
I have a template with data only in column B, with fields going down the rows. I'd like to copy B2, B4, B6...B24 to the next blank row (so the values need to be transposed to a row vs. column) in a Consolidated Workbook. Here's what I have so far:
NextRow = Worksheets("Sheet2"). Range("A1000").End(xlUp).Row + 1 For a = 2 To 24 Step 2 Worksheets("sheet2").Cells(NextRow, a / 2) = Cells(a, 2) Next a
Except that the formula above pastes the first value in column B of sheet2, any ideas on how to get it into column A? Worksheets("sheet2").Cells(NextRow, (a / 2)-1) = Cells(a, 2) gives an error. Also, instead of sheet2 in the same workbook, I need to paste the data into sheet2 of a different workboook (i.e. Main, located in My Documents.)
Sheet linked from external file, new data coming daily. How to copy Values of cells from B4 till B-empty to C column? The attached file has a properly displayed data.
I have a cell with a fairly long formula for concatenating a large number of other cells. Let's call it cell "A". Due to the formatting and end use of the data in cell "A", I have to copy and only paste the values of that cell into another cell, which I'll call cell "B". What I need to know is whether there is a way for the values in cell "B" to automatically update in the same way they do in cell "A" when data changes in any of the cells that are being concatentated.
I'd like to have done is to have a blank column inserted between columns W and X(these values change so the VBA statement should reference the end of the columns) and the values that are now in column Y(April 17th values) pasted as values into the now empty column X. I would like to do this for tabs Ann-Sheet 2. I'm having a bit of trouble with setting up the loop that would go through the desired sheets.
1. For a file moving from one cell to the next, down the column, get the values and seach for the values in file number two.
2. If that value is found, copy a cell from file 1 to a cell of a column on the same row where the value was found on.
3. Do what was done on number two, but with a different column.
this is what i have so far...
Sub replace() ' ' Macro2 created by david '
' for the entire sheet, moving from one cell to the next down the column, changing rows ' search for the contents in another sheet, and then if that is found, ' copy the row number to a variable, and then ' copy column K from sheet 1 to column N of sheet 2, using the same variable above ' after that same, but L goes to P. ' ' Windows("file1.xls").Activate Rng = Selection.Rows.Count Dim toFind As String ActiveCell.Offset(0, 0).Select Application. ScreenUpdating = False Dim i As Integer For i = 1 To Rng Windows("file1.xls").Activate toFind = Range("A + i") Windows("file2.xls").Activate
I have the following VBA code, which works nicely -
PHP For Each C In Sheets("data").Range("A2", Range("A2").End(xlDown)) C.Offset(0, 5).FormulaR1C1 = "=IF((RIGHT(RC[-1],3)=""ago""),RC[-1],"""")" Next C
What I want to do is Paste As Values to each of the cells in the above to convert the formula to a static value,. Is there a simple bit of code I can include in the above loop, instead of doing a Selection.Copy Selection.PasteValues etc over the range?
I am trying to find a way of copying values from cells that are linked to another workbook and paste them to another sheet in same workbook to the end of last row entry. This needs to be done via VBA from a button. There are 35 rows and 9 columns linked to another workbook and they don't always have values (depending on source workbook). To cycle thru each row and copy if they have values and paste them to end of last used row on another sheet.
I'm running into an issue trying to calculate unique values in a Data column based on a few variables in other columns.
My current formula in Summary tab D4:D19 is {=SUM(IF(FREQUENCY(IF(Data!$I$3:$I$66<$E$1,IF(Data!$A$3:$A$66=$H$1, IF(Data!$C$3:$C$66=A4,ROW(Data!$I$3:$I$66)))),ROW(Data!$I$3:$I$66)),1)) + SUM(IF(FREQUENCY(IF(Data!$I$3:$I$66<$E$1,IF(Data!$A$3:$A$66=$I$1, IF(Data!$C$3:$C$66=A4,ROW(Data!$I$3:$I$66)))),ROW(Data!$I$3:$I$66)),1))}
This is currently counting the number of times a date value (data column I) appears for that name (A4:A19) in the data when meeting all of the conditions. I need it to instead count the number of times a unique date appears for that name with the additional conditions met (which all appear to work fine).
The results in the pink highlighted cells (Summary column D) should be:
Names starting with A - 3 All others - 2
I've left some other columns in the data with X's so that I can easily convert this back to my working spreadsheet.
Need VBA macro that will copy & paste (Special > AS VALUES) from one of two (Data A & B) sheets based on the contents of a validation cell ($D$4) in a third (Report) sheet? The destination starting cell would be $F$11. ALSO - I'd like to have the Named Ranges "DataAExtract" & "DataBExtract" used in the code (for the COPY region) so I can see an example of how to reflect my actual named ranges in my working file.
The reason for doing this is that the "c.Characters...." lines in my conditional formatting macros (attached) are not working on cells containing formula output (in my working file the Report page is all populated by VLOOKUP results), but the macros run fine on hard-coded values. In my attached workbook, I'd like to have the "NEW" macro for the copy & paste step fire first in the sequence of macros running after the FORM button-click (control located in cell $D$5 of the Report sheet), whether that's by writing a new macro and calling mine before the new one ends, OR by consolidating all of my macros plus the new one into one smooth progression.
With this low-tech approach I can get updated VALUES into the report area once the user selects a data source and a customer on the report sheet. The COPY ranges in my working spreadsheet will update based on the selections made in the report page. I tried recording a macro and then modifying the recorded code to add the "If > Then" functionality I'm looking for, but I'm pretty green when it comes to VBA code and syntax.
I have spent a few days searching through forums but cannot find examples that i have been able to successfully adapt ( because they are to complicated for my limited knowledge). I have a workbook with 5 sheets, sheet1 (current), and sheet 4 (archive) are the important ones. I need a macro to
A) copy rows from "current" to "archive" ( to the 1st empty row) if column S of "current" contains "Closed" ( the word is generated by formula).
B) The paste needs to paste special values and number formats ( want to lose formula but not conditional formatting).
C) data sort "archives" based on col A - this puts the newly archived data into correct sequence.Data sort lowest number 1st
D) delete the copied rows from "current".
e) give me a count of how many rows it deleted, (I have a macro to insert rows so will run that manually to recreate the correct number of emtpy rows (with formula and formatting) to bring the current sheet back to usual size.
I tried modifying a macro by RPaulson (based on cells on one sheet to cells on another), to work with entire rows but couldn't get it to work.
Found that paste special uses PasteSpecial xlPasteValues, but , and thats about it.
I have an Excel Spread Sheet that lists all of the people who have been issued Keys in your workplace, so the row has multiple information columns (Name, Department, Key Code, etc). One row is titled "Left Workplace" and you can select either a Yes or a No. Based on that selction I want it to copy and paste into a different spreadsheet (Either Inactive - if "No" is selected or Active - if "Yes" is selected) What is the best way to go about this?
