Checking Info Entered
Aug 5, 2009I want add some code into a macro of mine which checks to see if J8 >20 and DA8 = "TRUE" then a msgbox appears saying "no auto margins".
View 2 RepliesI want add some code into a macro of mine which checks to see if J8 >20 and DA8 = "TRUE" then a msgbox appears saying "no auto margins".
View 2 RepliesI have to enter date into cells. It is being written from the lists of paper, where for date is entered only year (e.g. 1987), but I have to enter it into excel with day and month (the program working with data only recognizes this form; eg 01.01.1987).
I was thinking of writing a conditional formatting, to remind if I will forget to write 01.01. before year.
I prepared formula like this (to check for the dots):
=IF(AND(MID(AD2;3;1)=".";MID(AD2;6;1)=".");1;0)
But it is not working, because the function recognizes general formatting of cell instead of date formatting (28491 instead of 01.01.1987).
I have a form with various textboxes and combo-boxes and a command button to enter the details into some cells.
What is the best way of writing some vba code to check all textboxes and combo's are entered before carrying on with entering the data. If any details are not entered then a message box should show and take the user back to the form.
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 would like to fill in a a form on page /sheet one and have the same info on every sheet that follows is it possible?
View 3 Replies View RelatedI have attached a spreadsheet and I am trying to capture the info in lines 2,7,12,17 and return the info into column d,e,f,g
The info in these columns at present has been manually entered but I am sure it could be automated.
OOL Roster Final 18-31Aug14.xlsx
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")
On the attached example i am concatenating surname with the first letter of the forename. However, what i want to add into the formula is if the answer is a duplicate of another answer in a range that these duplicates are changed to surname and full forename.
Is this possible with a formula or would it need a bit of vba programming?
Is there a code in vba, that will return today's date (or the date of the week before, [today-7]) I need a vba code that will check a current cell - let say cell "A1", that contains a date( for exmpel: 12/7/09), and compare this date to the date last week, if the cell (A1)contains a date that is older then last week , then fill in A2 with "False", if the date in A1 is between the date of today and a week ago then fill A2 with "True". (For the exmple that I gave of course in A2 the value will be "False")
I have lots of rows of text data on sheet 1(Q2:AB139708), on sheet 2 I have a list of text (A2:A44). In sheet 1 I would like to display "1" in cell ap2 if any of the row from (Q2:AB2) contains text from the list on sheet 2(A2:A44), then I would copy this down to 139708.
View 9 Replies View RelatedI've got all the grades sorted out for the Principal, she is now looking for me to tally up all the students who got straight 'A' grades. I know there is going to be anotehr combination here but I'll start with the basics of straight 'A's
The screen below shows how the data is presented although I've slimmed down the headings to fit better.
How do I insert a formula to look at each row to see where based on the subjects taken, there are straight 'A's
************************************************************************>Microsoft Excel - Y13 & 14 Combined Worksheet.xls___Running: 11.0 : OS = Windows XP (F)ile (E)dit (V)iew (I)nsert (O)ptions (T)ools (D)ata (W)indow (H)elp (A)boutZ6=
ABCDEFGHIJKLMNOPQRSTUVWXYZ1ArtArt*2BiologyBSChemistryD&TDramaEconomicsE.*LitFrenchGeographyHistoryH.*EconICTICT2IrishLatinMathematicsMaths*PureMusicPhysicsPoliticsPsychologyR.ESociologySpanish2********A****A**********A*3********AA*A*******A******4******A*C*****D****B******5***********B**********BAA*6*******C***D************BBSheet1*
[HtmlMaker 2.42] To see the formula in the cells just click on the cells hyperlink or click the Name box
PLEASE DO NOT QUOTE THIS TABLE IMAGE ON SAME PAGE! OTHEWISE, ERROR OF JavaScript OCCUR.
I only want then to be able to make entries between 07:45 and 08:45.
If TimeValue(Now()) > "0:745:00" And TimeValue(Now()) < "08:45:00" Then
code if OK
Else
code if not OK
MsgBox "TIME HAS EXPIRED .....SORRY."
End If
All it does is step the cursor down 1 cell from where it starts on the worksheet, rather than sorting through the defined range and then selecting the cell I want. I'm not sure why as I've used almost exactly the same code successfully on a different worksheet in the same workbook:
Dim mycheckrng as Range
myupdatedate = "04/06/2008"
Set mycheckrng = Range("D5:AR5")
For Each c In mycheckrng
If c.Value = myupdatedate Then
c.Select
End If
Next c
mycsdcdateref = ActiveCell
ActiveCell.Offset(1, 0).Select
Is there a way to check a value, that is a multiple of another value.
E.G.
say the user specifies a height of 225 and then specify laminations of 45
is there a way to check the value of 225 to ensure 45 divids into it perfectly??
and if it doesnt then gives an error message of some kind.
So if someone specifies height of 200 and lamination of 45 an error would show because 45 cant be divided into 200 perfectly.
I am just having trouble getting vba to recognize cell values. All I want it to do is if cell g2 = 5, then end sub, Else, continue. But I am so clueless that I cant even get it to recognize that what is in cell g2 is the number 5. I would think that I could just put,
If range(g & 2) = 5 Then
End Sub
Else
Resume
End If
I regularly check formula's in quotations to ensure they are working on the correct cells by cycling through each cell and pressing F2. Pressing F2 on a cell with a formula (in office 2003) draws boxes around each cell that is being referenced in the cell. This is very handy, but for large worksheets is time consuming to "F2" each cell. . . . can the F2 behaviour of highlighting cells be automated ? See attached screenshot.
View 5 Replies View RelatedI am trying to compare 2 conditions to see if one or other is correct and if so out put ok if correct and wrong if incorrect i tried this formula but does not work.
IF(OR(AND(j3="UP",t3=1),(AND(j3="DOWN",t3=-1),"ok","wrong")
I want to have C9 populated with a budget type from H1, I1 or J1. How do I create the formula that checks which budget type the value in F9 is?
I am using excel very infrequently.
Screen Shot 2014-05-18 at 12.52.26.jpg
I have a spreadsheet with 2 columns of values. I need to check that the two columns have the same values, however the last digit of the values will differ every time, in the first column the value will always be a 3 and in the 2nd column it will always be a 0. Unfortunately the amount of digits before the last, differs from 6 to 9 so its not as easy to do a trim. Example
Column 1 Column 2
11111113 11111110
222222223 222222220
4444444443 4444444440
I need to check that the first digits (no mater how many) are all the same except the last digit.
I have a sheeet conditionally formatted so that if data is missing from certain cells, that cell turns 'red'. Is it possible to have cell A1 (for instance) report if there is a red cell anywhere on the sheet?
View 4 Replies View RelatedI've got two text boxes where users input the dates in specified format (dd/mm/yyyy). current validation checks whether one date is not earlier than the other one and it looks like this:
[Code] .....
However if they are equal which suits me I am still getting an error. don't need a calendar btw
Have created a small form with 5 checkboxes and a button on a worksheet. Want to check all checkboxes on the worksheet when the button is pressed.
However, I am getting "Run-time error '438': Object doesn't support this property or method". Enclosing the code for your reference.
[Code] .....
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 file of users and security codes. each user should have at least one security code. How can I get rid of all the good combinations and only leave the bad ones?
Example:
user: joe blo
security code = 1
user: jim white
security code = 1
user: sam song
security code=5
user: jo jo
user: billy boy
security code=1
You can see Jo Jo does not have a security row. I need to the good ones to be removed so only the user with the missing security code is left:
I have data like follwing strings.
WAY-308312-1
WAY-521340-1
233-6767-676-6
First two strings are correct. If I get number like in third string first part of string then we have to move row to some other sheet.
The first part of string should have text like WAY-123-13-1.
I used Val function it checking first charector only. It the string is like 2A1A-243-233-2 the it is not checking.
I am getting a NEXT without FOR error message when i try to run this code. This is the portion of sub im having trouble with.. been trying to work it out but to no avail. I thought that i might have to do Next Ccell, though I got the same error.
View 2 Replies View RelatedProgrammatically speaking, any way of checking whether an arbitrary cell is part of a named range (that is, short of looping through an entire book's named ranges checking for intersections)? (It can be assumed that all the named ranges consist only of one cell).
View 6 Replies View RelatedI'm trying to create a questionnaire and in each question you got to rank the answers 1, 2, 3 and 4 according to your preferences.
So I'm trying to use data validation to allow ranges between 1 and 4 and at the same time I'm trying to use =countif($A$1:$A$20,A1)=1 to prevent repeating selections but my problem is that with the data validation tool I can only select one of those options either allowing whole numbers between 1 - 4 or allowing custom and using =countif($A$1:$A$20,A1)=1.
Is there a way to do both?
I have 2 stocks (A10 & A11)
Using VBA I want to check the table above to determine which lending percent each will be given.