I am making a company wide estimate sheet and having trouble with the drop down box. I have a drop down to pick the branch, but when I name the source it only says branch, even though I named the data on the branch sheet. I would like to be able to pick the branch initials and have it populate the phone and fax number under the main heading but am getting a error there.
Also for the labor is it possible to have it insert the correct labor into the formulas at the labor lines according to which branch is picked from the drop down.
Sub testDateCompare() Dim nmiDate As String nmiDate = CDate("23/4/08") Dim origDate As String origDate = CDate("23/04/2008 15:05") origDate = Left(origDate, InStr(origDate, " "))
Dim minDate As String minDate = WorksheetFunction.Min(origDate, nmiDate) MsgBox minDate End Sub
I'm working on a spreadsheet and I want the letter "E" to have a numerical value of zero, and not necessarily in just place as my sheet will be regularly updated. If you're a fan of golf, you will understand what I am doing. I'm basically making a custom leader board for a fantasy golf game that I'm doing, and I'd like for the letter E to represent the value of zero when I am adding up the scores.
For example A1: -1 A2: -3 A3: 4 A4: E A5: -2 A6: 3 A7: 3 A8: -5 Total: -11 (have a formula set up to only count the best 4 scores).
I want to be able to add up those columns, and since only the lowest 4 scores count, I need E to equal zero. I get that I could just put 0 there, so I'm being a little picky (in golf E represents Even par, essentially a value of zero for the purposes of this game). There are 20+ teams in the game so I need E to be recognized as zero in each of those fields.
Sheet 1 has 3 columns: grade, step, NBS Sheet 2 has 3 columns: SM, grade, step I want to add a column NBS to sheet 2 for that exact grade and step, from the data on sheet 1.
I tried the following formula but it gives me #value!.
This formula has been working fine for me...until I have the condition where no value >0 has been entered in my LOOKUP range as yet. Or at least that is what I have managed to test so far. I've verified that my values have the same format (General) and I've verified that my ranges are all of the same size.
I'm looking in one worksheet for a work order meter reading that will be entered in another sheet when the Unit # for the equipment matches. I discovered if there is a work order entered for and no meter reading has ever been recorded yet, I get the #N/A error. If I go in and put a fictitious meter reading in of 1, the error goes away. It doesn't like a blank or zero meter reading and I need to know how to get around this. Here's the current calculation:
I referred the above two articles and accordingly created Personal.xls file in XLSTART folder. Here is the screenshot: http://dl.getdropbox.com/u/872430/excel.png I have done nothing else to the workbook except what is seen in the screenshot. I have tested the funtion by using it as a formula in the Personal.xls file. When I start Excel, Personal.xls does start up but the funtion is not available to my in my other workbooks. Is there anything that I have missed out?
I have a very large excel spreadsheet with many formulas in it. Some of the formulas are giving a 0.00 value even when there should be a $value. I don't know why this is happening? It is not happening to every formula and it is not consistant within the same row or even the same column. Most of these formuals have been used in this spreadsheet for years by many different people with no problems.
I noticed that when I clicked F4 Button on the keyboard it shows the screen resolution(with screen 1 and screen 2) as though one wants to use projector. The keyboard's configurations seems different from what I am used to.
What I can do to resolve this as I wanted to use the F4 Button referencing($).
I was looking at the other posts and this should work. Why the bleep can't I get the MROUND function to work. Simple scenario...I need to round UP numbers to the nearest 50. 320 should bring back 350, 351 should bring back 400. For example, if this is in cell A1, I think the formula should be =MROUND(A1,50). Yet everytime I use the function, it gives me NAME#.
I have a fomula field in row 67 and 68 .Row 67 calculates the average and row 68 calculates the improvement i.e. average(row 68)- last row inserted(row 67). The values for improvements are not showing correct value. C68 seems to give correct value but B68 and D68 is giving wrong value.
B68=4.8-4.5 =0.3 but it shows 0.4 C68=14.9-15.1=-0.2 D68=11.3-10.2=1.1 but it shows 1.0
Find enclosed a chart wherein there is a super user of a particular system under him there are 5 users (can get increased also), now every user including super user is having a specific function to perform and a specific area to operate. i want to give a separate hyperlink to every user for describing his role & responsibilities and to list his dos and donots.
So I am using a macro to do a particular task. Part of the macro's process is to delete some unwanted rows.
The code below was for my original macro which works absolutely fine:
Note: The ranges are fixed (i.e. column "AT" is reffered)
Code:
Sheets(1).Select Dim Current As Worksheet Dim Flt As String Flt = Me.TextBox2.Value For Each Current In Worksheets With Current With .Columns("AT") .AutoFilter field:=1, Criteria1:="
I have a fomula field in row 67 and 68 .Row 67 calculates the average and row 68 calculates the improvement i.e. average(row 68)- last row inserted(row 67). The values for improvements are not showing correct value. C68 seems to give correct value but B68 and D68 is giving wrong value.
B68=4.8-4.5 =0.3 but it shows 0.4 C68=14.9-15.1=-0.2 D68=11.3-10.2=1.1 but it shows 1.0
I have attached the sheet also.
Sheet 1.xlsx - Speedy Share - upload your files here
I am using VB6 to automate excel. Ofcourse, the code needs to work with 2007 and all lower levels. When trying to save the excel doc in 2007 I get no errors. However, in 2000 (using the same code) I am unable to save my document.
Here is the OfficeDoc.SaveAs FileName:=NewFileName, FileFormat:=FileFormatValue
It fails with error 1004: application-define or object-defined error.
I have checked to make sure no other office documents are running in the background under task manager.
I have a workbook with calculations for a sale less the assorted fees and at the end giving the final amount from a sale.
I have noticed that some of the rows are not giving the correct amount in them. In other words the addition of some columns in that row are not adding up correctly. It is only off by 1 cent (either over or under), but I can't figure out why.
I have the feeling that I am going to want to kick myself when someone explains this to me (I just know that I know the answer but for the life of me I can't right now).
I have a formula that is correct all the way up to adding the last *K9. here is an
example:
C9 a number 4 then add 1 to it which makes it 2 now * it by D9 which is the number 384 and the answer is 768 now * that by K9 which is 6 and you get 4608 I'm getting 2310 using this formula... =IF( C9=0, 0, C9+1*D9)*K9.
I'm getting a mismatch error on my If activecell.value > 5 Then portion of this code. I'm trying to say if the value in column AG is greater than 5 then create an email address from the first and last name. I've even made sure to copy and paste the formula results as values.
Code: Sub CheckPFPDates() Dim OutApp As Object Dim OutMail As Object Dim cell As Range Dim emails As String Dim salution As String Dim currenttime As Integer
I'm trying to add the total product sold by a group of sales person for example : Chad + Javier. My actual worksheet includes 600 rows of salespeople and 20 rows of product, i'm using this simple example to get the message across.
I was using =sum(sumif(A1:A9,"Chad',D1:D9),sumif(A1:A9,"Javier",D1:D9)), the formula should have given 91, but instead is calculating 113...
Salers PersonProduct AProduct BProduct C Chad567 Chad567 Chad567 Chad567
I am building a macro and am just not figuring out how to do this. I am trying to create a new workbook, then give it a name. Simple right? Well, I have the format for the file name to be "mm-dd-yy Transmittal #.xlsx" but I can't figure out how to make the # part of that equation start as 1 but if the file already exists change it to 2, if that exists, change it to 3, and so on. Here's what I have so far:
Code: Sub Transmittal() Dim NewBook As Workbook Dim MyPath As String
[Code]....
I don't think I'm allowed to do "x + 1" so that is probably where my problem is coming from.
=SUBSTITUTE(A1) in cell 'A2' gives me: 1234567890 =ISTEXT(A2) in cell 'A3' gives me: TRUE
BUT, =A3+1 gives me: 1234567891
Hows that happening? Substitute function gives me the output which is a TEXT, and how is it that when I add 1 to it, I get an answer? Shouldn't I get a #VALUE! error instead?
I am currently using a bunch of msgboxes to tell the user if a specific error has occurred. I want to get rid of the ugly gray box and customize my own. I am having problems setting up the code as I would like it to function like msgbox does where I can supply a header and message string and then it displays in the userform. I tried coding it kind of how I would pass variables to a function and it doesn't seem to work.
Userform:
Code: Private Sub userform_initialize(msg As String, hdr As String) MessageBox.Caption = msg myMessageBox.Caption = hdr End Sub
I can't seem to get why one code is giving a correct solution and the other one, not even close. They are both identical but there are some difference.
The program is suppose to pick up about 11 cell values, it then store these cell values into a collection, and randomly picking out the 11 values without repeating until there is no more to pick out.
Here is the code: (the top one doesn't give the correct result, it picks it out of the same ones and the number doesn't seem to store correctly, the bottom codes works as it suppose to work.)