I'm looking for a simple piece of code I can use to manipulate the data on the attached workbook. Firstly, I need to be able to sort the data by column O ("Balance"). I then need the code to extract all the information for the top 10 and bottom 10 rows and paste the info into a new worksheet. The code will need to account for the fact the number of rows might increase/decrease with this report.
View 2 RepliesI have a worksheet(1) that contains data like: date, name, price, size....etc. I need to "sort" by size (only use 2 values - large and small), then copy each to another worksheet that saves data by the Month. The amount of data on worksheet(1) changes monthly.
View 9 Replies View RelatedI am doing a financial statement for a person but I did not create the workbook. The book has two sheets linked together. I am overwriting the names and numbers from last year's form. I have run out of lines on the first sheet and don't know how to copy and paste the macro to the bottom of the sheet so that I can carry on with inputting my numbers. Here is a sample of the workbook.
View 4 Replies View RelatedI have a macro that I recorded which is supposed to copy the contents from row 38 of my calculate sheet and paste the values of it below the last record on my monthly summary tab but it is not pasting below the last row of data. It keeps pasting to the top record. My code is below:
Code:
Sub Copy_Record()
'
' Copy_Record Macro
[Code].....
The following code is doing what I want it to do in part, its copying the data in range k3 to q3 to the next empty row in columns a to f
It works when I change any cell in column K (11), I want to change to only on a change in K7 or K8? As an afterthought if I'm dealing with the same sheet do I need to make reference to sheet2?
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim nextRow As Long
If Target.Column = 11 And Target.Cells.Count = 1 Then
[Code].....
I have used a formula to achieve this before which seemed to work although now it seems to be replacing other data already in the worksheet so I am unsure of how to fix, thinking I should just start again.
The file in question is a tracker of activities, Column A (sheet1) is the Status and once the status is "Closed" I need to run a macro that copies all closed activities to Sheet5 at the bottom of previous closed activities. Once this is done I already have a macro to delete all "closed" activities from Sheet1 meaning that it is vital the new closed activities stack onto the bottom of previous closed activities.
The Column Headers start on Row 11 with activities running from Column 12.
I'm creating an excel sheet that is linked to several others. Basically my salesmen will enter their new prospects into their own sales sheets and that will transfer via a link to my main one. The problem I'm having is mainly with my sort.
When the information is transferred, I need the sheet to auto sort the Company names alphabetically and move any blank cells to the bottom.
I'm using links to pull our sales prospects from our salesmen's individual sheets into one master sheet for reference. Once the prospect information arrives in the sheet, I need it to sort alphabetically by customer name so that we can see which customers have been visited and don't visit the same customer twice.
So far in VB, I've been working on this
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("A5:L" & Cells(Rows.Count, "L").End(x1Down).Row).Sort Key1:=Range("B6"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
But it's not sorting the way that I need to. All I really need is for the sheet to sort automatically by Company Name and for all of the 0's to go to the bottom. They are 'blank' data that will eventually be imported from the salesmen's individual sheets as they encounter new customers.
When choosing ascending or decending, is it possible to always keep rows with the designated blank cells at the bottom? Trying to prevent the blank cells from popping on the top when i filter by a certain field.
View 4 Replies View Relatedi want to Sort by column E Type,which i can do manually easily.but then i want to run a macro that will copy all the rows with values,ie.Express Checkout Payment Received etc to another worksheet and name that worksheet with Express Checkout Payment Received.
View 1 Replies View RelatedI 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.
Is there way I can copy the BOTTOM cell amount in a specific column, to another specific cell in another workbook?
I update a worksheet with a new row of data each day. I want to copy only the last (bottom) entry from one column over to a worksheet in another workbook. I'm hoping I can just put something in the cell I want to copy to, to reference the bottom cell with data I'm copying from.
First off I have an excel sheet that I have split into two windows. excel sheet.jpg
I am looking for a formula that will change the bottom sheet number a color if it exists on the top sheet.
I have an excel WS1 set up as DB; I want to keep this sheet for data revision. WS2,3, 4, & 5 will be data that is filtered and sorted, using WS1 as source so I want to auto copy the WS1 data. Can I just auto copy WS1 (how do I do that?) then filter and sort in each WS?
View 3 Replies View RelatedWhat settings should I use in order to allow a user to sort data in a table when some of the cells are locked?
When I protected the sheet I ticked the option to allow user to sort data but it doesn't work...
I have a sheet with a reference field that I want to sort. Each cell in the reference field has a formula in it, which specifies that the cell remain blank unless there is a value in the cell. The values are either text values or number values. e.g. =IF(ISERROR(S4),"",VLOOKUP(C4,'Rider Data'!A:G,6,FALSE))
When I sort the field in ascending order by the column that contains the formula above (using a macro written for this sort procedure), where the expected value is a text value, all the blank cells are sorted ABOVE the cells with text values in them, rather than below, even though they are blank cells. However,if I sort on a different column which contains time values or numerical values, the sort function works just fine. I have tested the VBA code that produces the erroneous sorting and confirmed that it happens only when sorting on columns that contain text values. I would like to sort text values in ascending order with blank cells BELOW the sorted cells.
I got a complicated macro that I need some help on. I want to write a macro that does the following (for clarity, I have attached an excel file).
I want to write a macro that automatically copies the rows in worksheet 'boekhouding' to their corresponding worksheet. The name of the worksheet, to which the data of each row has to be copied, is specified in row I (Beware: if it is not in row I, it is in row H). The names of all destination worksheets are given in the blue cells in worksheet ‘rekeningen’.
For example, row 2 (of worksheet 'boekhouding') should be copied to worksheet 'ABD'. Row 3 (of worksheet 'boekhouding') sheet be copied to sheet 'bestuur'. Row 4 (of worksheet 'boekhouding') should be copied to sheet 'Commissiekosten gala'. Etc for every datapoint (row) in worksheet 'boekhouding'. The number of datapoints will exceed 300, so manually doing this will be too time-consuming and unreliable.
I am looking for a macro that will allow me to the following:
- search column F for "word1", "word2", "word3", and/or "word4"
- then match the search to row on column C data
- then copy/paste row or rows of matched data unto "Sort" worksheet but only data from columns A, B, C, and F
- also, when copying, copy the row above
Does excel 2013 have a fence way to sort a list of alpha numeric numbers and alphabetize in this order A - Z and then 0 - 9.
Ex) Apple, Greg, Rob, Sand, 123, 126, 1000, 2001
I'm currently working on a problem that I'm having with Hyperlinks. Basically I want to copy the destination data that the hyperlink points to onto another sheet.
The main problem I'm having here is that I cant seem to find a suitable method to do this....I had the idea of using the hyperlink.follow function and then copying the data once I'm there and then moving back to the source hyperlink. My only problem with that is that I dont know how to find the cell address that the hyperlink is in, once I have found that hyperlink.
Therefore my question is two-fold:
- Is there a way to copy the destination data using some sort of hyperlink function?
- If not, is there a way to find the cell address within a worksheet, once a hyperlink is found on that worksheet?
I've attached the spreadsheet below to give a better idea of what Im doing, along with the "findHyperlinks" macro,within that workbook, that I am currently working on.
I want some example of VBA that could copy data (A1:B15) to new range (D1:E15) then sort and remove duplicate.
SWS
Central Pinklao FLG
RMA Trading
Thonglor 13
SWS
IT Square
[Code] ......
I am looking for a shortcut key or some fast way of getting to the last line of information on a excel spreadsheet.
I currently have order spreadsheets with over 10000 lines used and everyday I need to add more lines and if I have used the Shift+F to locate an old order then I can be say sat on line 40 but my last inputted text could be on line 7000 and I would like to know how I can get to that line without knowing the line number.
The shortcut must take me to the last text entered cell not the last cell on the worksheet.
I am trying to sort a table of data by "Status" and automatically populate another Sheet. In Sheet 1, I have data as follows:
Issue Status Issue - 1 Open Issue - 2 Closed Issue - 3 Closed Issue - 4 Open Issue - 5 Closed Issue - 6 Open
I want Sheet 2 to automatically sort this information by Status = "Open".
Issue Status Issue - 1 Open Issue - 4 Open Issue - 6 Open
How I can accomplish this by Excel functions (I do not want to use Pivot table)?
I have 2 columns on sheet 1 as below. I need a code to put all the data in column B vertically on sheet 2 as the result shows. Please note all cells data will be off various lengths all seperated by a comma.
Sheet1 Â AB2BK
1003 CV1173, CV3133BK1004 CV1010, CV1010A, CV13514BK1005 CV1012, CV1257, CV17995BK1006 CV1836, CV506
Result after code has run.
Sheet2 Â AB1
BK1003CV11732BK1003CV3133BK1004CV10104BK1004CV1010A5BK1004CV13516
BK1005CV10127BK1005CV12578BK1005CV17999BK1006CV183610BK1006CV506
Is there a way to copy a series of cells from top to bottom, then paste them back so the would be bottom to top?
View 9 Replies View RelatedI copy information from one worksheet to another. Now i specify the range to copy in the macro. What i need is for the macro to find the end (last row) of data and than copy everything from row 5 to last row.
The below is a macro i currently use:
Sub Import_FNGC()
Const TARGET_FILENAME = "2008.xls"
'
' import_FNGC Macro
' Macro recorded 1/30/2008 by wwrobel
'
'
myMSG = "This will clear the data and import information. Do you want to continue?"
Response = MsgBox(myMSG, vbExclamation + vbYesNo, myTitle)
Select Case Response
Case Is = vbYes
Range("A5:BM100").Select............
I am using the following codes to hide the menu, formula bar and the headings. One more thing I need to do but do not know how - hiding the tabs at the bottom of the sheet. The idea is not to let users to right click and unhide other sheets.
'Hide main menu
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
'Hide headings
ActiveWindow.DisplayHeadings = False
'Hide formula bar
Application.DisplayFormulaBar = False
I have a worksheet which contains details of a storage rack. I would like to be able to identify lines which have identical values in columns B, C and D then take the value in column E and add it to all other occurances when B, C and D are identical. A summary will appear at the bottom of the sheet with a total next to it.
The full list is 600 rows in length....
I am attempting to write a macro so that when a user selects enters a particular selection in a cell, it will automatically move the entire row down to the last row and shade it in a different colour.
View 9 Replies View RelatedI want to be able to copy a name from one sheet (Available Players), paste it to a cell in another sheet (Round 1 through Round 20). The cell that will be copied is fixed but the place where it will be pasted will be different and may be on a different sheet.
also i would like to change the color of the copied cell to "greyed" out or cut if it can not be greyed out. I have created a button and put in a macro that i created but have been having problems with it, generic 1004 errors that i can not figure out. i am attaching the document.