sheet1 has a list of names. sheet2 has a list of names and some of the names are the same as sheet1. What I want is for the names on sheet1 to indicate (preferably change text colour) if they are on sheet2.
View 5 RepliesI am writting a Macro the following
lnum= Range("d1")
Now this works well when the cell is in that same sheet but lets say I am making reference to a cell that is in a diferent spreadsheet how do I write that?
So in my excel document I have it such that on the first sheet (Labeled 'Sorted') the data is set up as follows: LOCATION, EXTENSION, NAMEWith the appropriate data under each header. On the second sheet (Labeled 'Locations_Ext') I have a named range called Locations; it contains extensions from a separate document, names of people associated with the extensions from the document, and their locations on the map. I am trying to have it such that the excel matches the extension number given on the first sheet with the ones that I extracted from the document on the second and output the location into the first column on the first sheet. The code I have set up for that process is:
=VLOOKUP(B(//SomeValue),Locations,1,FALSE)
I then want the excel to cross check the information that I took from the Visio to see if the visio is up to date with the latest info we have received (Which is the data on the first page under Extension and Name). The code:
=IF(C(//SomeValue)=VLOOKUP(B(//SomeValue),Locations,3,False),"Good","Error")
Both codes seem to be giving me this: #N/A as the results for every cell.. I'm using MS 2010
I got the following code to create new worksheets based on the values in column "a". However, I don't know how to check if the new worksheets to be created already exist.
For k = 2 To 10
x = range("a" & k).value
Worksheets(Worksheets.Count).Copy after:=Worksheets Worksheets.Count)
Worksheets(Worksheets.Count).Name = x
Next
I need a line of code that will display a message box if a specific sheet does not exist. eg. If sheet called "ThisSheet" does not exist, then display the message "Not here". I've been struggling with this one!
View 3 Replies View RelatedData set has three columns: dates, cycle times for event and event type. I want to create a XY chart with cycle time ploted against date (filled circles connected by line). I further want the color of each of these symbols to change as a function of event type. I vizualize a chart where the symbols might be red, red, blue, red, yellow where red indicates event type 1, blue event type 2 and yellow event type 3. how I might build this chart.
View 1 Replies View RelatedFrom the attached file.
Column 1 is a file name
Column 2 is a list of file names (but some of the files have been split into -A and -B parts or suffixed with an A or B
I need to highlight in column B, if the exact file name in column A exists
Example:
Column A: BSDS-0001
Column B: does not have this exactly instead it has BSDS-0001-A and BSDS-0001-B
I need some indication/highlighting that BSDS-0001 does exist on column B
So an indication that the whole of the file name in column A appears partially in column B. I have tried using max character lengths searches etc but cannot get an accurate way of doing this.
In exceltip.com i found many solution of my problems
View 11 Replies View RelatedI'm trying to create a spread sheet for our staff holidays. I have the year dates all mapped out across the sheet, and the staff names running down the first column. I would like to do the following:
1. When an "H" is put into a certain day, indicating a holiday, the cell color changes to i.e. blue. The color will be different for each staff member. We have four members of staff! (big company).
2. The "H"'s are totaled up for each member of staff to indicate how many days holiday they've had. Or if the staff member has 20 days per year, 20 is in a cell next to their name, and each "H" takes a number from that, i.e 19, 18 etc.
Sorry if I sound like a complete noobie!
I have the following macro, which is assigned to ctrl+shift+h to allow users to make a list and to insert hyperlinks to other sheets that have more details than the list can show:
Code:
Sub linker()
Dim strDocument As String
Dim strSheet As String
Dim strAddress As String
Dim strLink As String
[Code] .......
I was surprised to see that even if the contents of the active cell is not a valid sheet name in the target document, the link is still inserted without error. If the link is subsequently clicked, the target document will open and an "invalid reference" error box will appear.
Is there any way to check whether the contents of the cell constitutes a valid sheet name in the target workbook at the point at which the hyperlink is created, without opening up the target document?
I am trying to check and see if column "A" has a certain number if it does not then keep going and if it does then find wich row in column "A" has that number then in the same row increase column "B" value by 1.
Dim rngPartNumber As Range
Dim Rws As Long
Dim R As Long
Set rngPartNumber = ActiveSheet.Range(Cells(2, 1), Cells(Rows.Count, 1).End(xlUp))
Rws = rngPartNumber.Rows.Count + 1
For R = Rws To 2 Step -1
If Application.WorksheetFunction.CountA(Rows(R)) = compName Then Quantity = Quantity + 1
Next
I have a user form that writes data to a worksheet (Sheet1)
Is there any way of getting a macro to check what is in "textbox1" against all the entries in column A of "Sheet1"?...........and bring back a message if it already exists?
I'm looking to display a message if data in the active cell is changed. I'm using the code below to check if data in a cell matches certain criteria:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column = 9 Then
ThisRow = Target.Row
If Target.Value Like "As*" Then
MsgBox "Please add a note about why the biology of this species is distinct the Comments column."
End If
End If
But I have another column where the cells are prefilled with data. This column stores data from a dropdown, such as Critically Endangered, Endangered, Vulnerable etc. I allow the user to change the data in these cells, by selecting an alternative value from the dropdown, but I want to display a message if they change the data in one of these cells.
I need to make sure that the two sets of data i have highlighted in yellow and blue are completely the same. Please can some one write a formula that will flag a cell next to the blue column indicating that there is a difference between that of the blue and the yellow columns individual row.
View 3 Replies View RelatedI have a requirements in excel vba to evaluate and check the column data from other workbook. I would like to filter remarks for all "INTRANSIT" from my working file then If the data or tracking# is exist from the source file evaluate if transaction remarks is "Done" or if "Not yet" exist. If remarks from SourceFile is "Done" i will put "RECEIVED" or If "Not yet" i will put "INTRANSIT" in my Working file Remarks column.
Workbook WorkingFile:
Tracking# QtyModelRemarks
---------------------------------------------------
D-8840862402|20llllRECEIVED
D-8840862402|20kkkkRECEIVED
D-8840862411|20mmmINTRANSIT
D-8840865000|230mmmINTRANSIT
D-8840865000|50bbbbINTRANSIT
D-8840862450|20bbbbINTRANSIT
D-8840862450|120bbbbINTRANSIT
SouceFile --- to evaluate if Done or Not Yet
Tracking# QtyModelRemarks
----------------------------------------------------------
D-8840862402|20llllDone
D-8840862402|20kkkkDone
D-8840862411|20mmmNot Yet
D-8840865000|230mmmNot Yet
D-8840865000|50bbbbNot Yet
D-8840862450|20bbbbNot Yet
D-8840862450|120bbbbNot Yet
The following code doesn't check null condition in Scannedby field. The scannedby has text data type. The code gives me all the data where scandate=20130722 but doesn't check that scanned by can't be blank.
[Code] .....
I am writing a macro that will allow me to copy all the data in a set range (A2 and below) after checking that B1 contains the text "Year_id".
Right now, I am able to copy all the information, and paste it onto "Sheet 4". I am unable to code for the part where the macro would check for the text. The code that I have (for copying-pasting the date) is below.
Any code that would check the information in B1 into this macro code below:
Code:
Sub Copy_Allinfo()
Dim Sht As Worksheet
Dim Rng As Range
For Each Sht In Sheets
If Sht.Name = "Sheet4" Then
[Code] ........
using a command button to input data back into the spreadsheet at a specific location.
Background: I am building a time clock spreadsheet, of sorts. I have a user form that provides a list of volunteer names in a combobox and then a list of activities they can perform in another combobox. Some activities have Details. (So, VolunteerName Todd can choose Activity Maintenance, which has no details; Volunteer Joe can choose Activity Teaching and then can select Details Intermediate 2.) The volunteer then clicks a SignInCommandButton.
The SignInCommendButton populates a worksheet (VolunteerLog) with the following information:
Column A: Volunteer Name
Column B: Today's Date
Column H: Exact Time In
Column E: Activity
Column F: Details, if populated
The SignInCommandButton also copies a formula from cell L2 into the appropriate row of column C (Time In) that rounds the Exact Time In to the nearest 15 minutes. The SignInCommandButton then does a Copy/Paste Special Values to remove the formula from column C and then resets the Userform.
What I need to do:
1) When the person first selects their name from VolunteerNameComboBox, I want to check 3 things:
a) whether the person's name exists in Column A of the VolunteerLog worksheet;
b) if it does, if the Date associated with that entry = Today; and
c) if it does, if the Time Out column is Blank.
If all three conditions are met, I want the ActivityComboBox to populate with the values in Column E and F, if necessary. The user will then click the SignOutCommandButton. (details in a moment)
I already have the code for if the conditions aren't met (Activity box populates and, depending on the selection in the Activity box, the Details box may appear for a selection to be made, or may remain hidden.)
2) The SignOut Button needs to enter the Time into Column I of the appropriate row found in (1) above. It will also need to copy the rounding formula I mentioned earlier, and do the Paste Special, but I have that already.
For (1), I think I have a start. My thinking is to first check if the Name selected in VolunteerNameComboBox is in the VolunteerLog. Each time it shows up, I'd like to add it to a list (range?) called rngSignedInDate. Then I'd loop through all the entries in that range checking if the Date = Today. If it does, then I'd add it to a list called rngSignedOut and loop through those results to see if Column C (Time Out) is blank.
I think I have the first loop, but am stuck on how to populate the results into rngSignedInDate. Here is the code:
Code:
Private Sub VolunteerNameComboBox_Change()
'Check if the Volunteer has signed in already
Dim strVol As String
Dim rngSignedInVol As Range
Dim rngSignedInDate As Range
Dim rngSignedOut As Range
Dim rngSignedInActivity As Range
Dim rngSignedInMatch As Range
[code]....
(2) I haven't started working on the SignOutCommandButton. The challenge for me with that is directly tied to the challenge in (1). If someone does pass all 3 tests, I need to have that specific instance defined in a way that I can have the SignOutCommandButton put the time in the appropriate row.
in writing a loop that will check a number of cells to see if it is emtpy, if it is not, then run the macro. If the cells are not empty it will copy the data in that row and paste it to another sheet and delete that line. If it hits a cell that is empty, i want it to skip that row and move on to the next row.
here is the macro that moves the data.
Sub movedata()
Range("A1:H1").Select
Selection.Copy
Sheets("Sheet2").Select
ActiveSheet.Paste
Sheets("Sheet1").Select
Application.CutCopyMode = False
Selection.Delete Shift:=xlUp
Range("A1").Select
Sheets("Sheet2").Select
Rows("1:1").Select
Selection.Insert Shift:=xlDown
Range("A1").Select
Sheets("Sheet1").Select
End Sub
what i want to do is 1 have a workbook with 3 worksheets. Sheet1 contains the columns:
Reference No. Line Item No. Amount Date
1 3 500 12/01
2 4 900 01/01
Sheet2:
Reference No. Line Item No. Quantity PersonInCharge
1 3 10 Kim
5 6 60 Noel
For sheet 3, what i want to happen is that when i run the VBA macro, it searches through both worksheets (Sheet1 and Sheet2), finding rows that have matching Reference No. AND Line Item No. and combine all of the columns (and values) for that particular row into another row in Sheet 3. So for the above data set, the resulting data in Sheet 3 would be:
Reference No. Line Item No. Amount Date Quanity PersonInCharge
1 3 500 12/01 10 Kim
As this is the only entry in both sheet1 and sheet2 where there is a matching reference and line item no.
I have a workbook where Sheet A is a Master Order Form. Employees will input the quantities they need in Column C. The sheet will be otherwise protected. Sheet B is a "printable" order form that only contains the rows from Sheet A where the Quantity on Sheet A is not blank and is >=1. This will allow me to print sheet B with no blank rows for the items I don't need.
I found the following formula which claims to be able to do what I want:
=IF(ROWS($1:1)>MAX(C:C),"",INDEX(A:A,MATCH(ROWS($1:1),C:C,0)))
I can't get it to work correctly across two sheets.
I've attached Sample of spreadsheet for review : HDForm_Test01.xlsx
I use my workbook to track sales data from one store to the next. I use my workbooks to compare data from year to year. Each year's data is displayed on a separate worksheet. '2013' has 2013's data, '2014' has 2014's. On the 2014 sheet, I have a Prior Year's Sales that pulls data from the previous year's spreadsheet using a formula which I just drag down each day I enter sales. I would like to automate this process and have the VBA code check for today's date and automatically pull the previous year's sales data from the '2013' sheet and put it in the appropriate cell on the '2014' worksheet. I hope I have explained this well enough to understand. I've included a link to my workbook for reference.
I had to use dropbox since I can't post a file over 1 MB. The file size is around 1.25 MB.
I 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.
I want to be able to paste the large amount of data I get each day into the first sheet in my workbook ("data dump" sheet), the data will be formatted in the way i have used in the example workbook.
I then would like to be able to just have to enter 2 values into columns A and B of "1st output" sheet (Label in A, and Item in B), then have it look up the data that corresponds to those 2 values that are both in the same row in the "data dump" sheet, and have it copy and paste all of the relevant data in that row into the row in the "1st output" sheet.
The data I would want excel to find and place for me in the first sheet is highlighted in yellow
As a way of keeping track of this every day, I then need the data from the "1st output" sheet, to be fed into the "2nd output" sheet. This sheet would have all of the peoples' names already in it, but would just need to look in the "1st output" sheet for references to these names. If one of the names pops up, I'd need the date shown in the row of that instance to be placed after their name. This will allow me to keep a log of how many times their name gets flagged up, as well as the dates on which it happens. Again, the data I'd need excel to look up in the "2nd output" sheet is highlighted in yellow.
If there was a way of having the 2nd sheet add new names it finds on the 1st output sheet, that aren't already referenced on the 2nd output sheet in column A, that would be amazingly handy if it could then enter that name into column A and start a new row for them
Example file :
Attachment 334122
Alternative link [URL]
The data from the Data sheet is copied over to the Report sheet with formula.
Basically, what I need to do is If statement:
-when there is no any data in csv file (so the Data sheet will be empty);
-the range (A7:N1000) to be hidden (on the Report Sheet)
-the Report sheet to be saved
and also...
I would like to ask, how to select from the Data sheet, the rows with Data only. I copy them over with formula instead of macro- but would like to hide all the empty rows on the report.
Option Explicit
Sub Update_Report()
'
' Macro1
Dim extract1 As String
Dim dReport As String
Dim rSheet As String
Dim dSheet As String
extract1 = "LeadSheetAll_0001.csv"
dReport = "Appointments.xls"
rSheet = "Report"
dSheet = "Data1"
Application.ScreenUpdating = False
Application.DisplayAlerts = False
I have a data sheet (Sheet 1) which consists 1000 lines of data (1000 rows and column til DP all different). This is the data of all theprojects that my team undertakes on a monthly basis. Sometimes the data might change on in column AG to AL. I want to put the details of the changes to be done in Sheet 2. The unique value here is the project ID.
What i want is: I will create a table in sheet 2 and update the details that will need changes and it should directly change in sheet 1.
Example, I have a sheet named DATA1, I want to add a new worksheet, copy a certain range from the DATA1 sheet to the new sheet and rename it the same name DATA1 and delete the old DATA1 sheet.
Also, the sheetname will be unknown, the macro must get the sheet name first.
This work is challenging for me, now am doing Comparing the Data between One Sheet to Another Sheet, and Paste into Different Sheet.
I am Manually Comparing the Data between two different sheet, If the Data is matching, or Not matching, those data i have document in other sheet, So i have lots of records available. so manually doing its very difficult, but macro can compare the data. I will give the details of my process and example sheet is attached here....
Data 1.xls == This sheet have multiple tab with data and different order no.(Multiple Tab with thousands of records available)
orderNumberModified.xls == Modified data available. (Compare the OrderNumber to Data1.xls)
Now we have to compare the modified.xls and Data1.xls... For modified.xls have ORDERNUMBER available, that Numbers match with all tabs from Data 1.xls sheet.
If ORDERNUMBERS are matching, Need to copy the entire row from modified.xls To AVAILABLE TAB from Comparedata.xls sheet
If ORDERNUMBERS is not matching, copy the entire row from modified.xls To NOTAVAILABLE DATA tab from comparedata.xls sheet
what will be the code if commandbutton1 is clicked, it will check if the text in the combobox is in the range A2:A10 in the worksheet, if not in the range it will display a message box that the text is not in the range :D
View 9 Replies View RelatedDid Microsoft do this for a reason. But it seems to me there is no built in formula to check weather a number is odd or even.
=isodd(A1) or =iseven(a1) would be nice.
curent if I have to do something like, which works but is a lot of effort.
=IF(A1/2=INT(A1/2),"Even","Odd")