Limit Password Attempts
Jan 25, 2008I have a code the requires user to enter a password when prompted, but i like to limit the user from attempting to enter a password to "x" amount of times.
View 10 RepliesI have a code the requires user to enter a password when prompted, but i like to limit the user from attempting to enter a password to "x" amount of times.
View 10 RepliesI'm trying to write what is supposed to be a simple script that looks at a column of usernames (ColumnA) and passwords (ColumnB). I start off by prompting the user to enter their username in an input box and then I want a loop to check this value against the values in Column A. If the username exists, I want to prompt an input box for the password. If the username does not exist I need some kind of limit on the loop to prompt an input box for the user to enter a new username and password that I'll add to the last row of the data table. The loop part is kicking my butt, this is what I have so far...
Sub Main()
Set StartRange = Worksheets("16.10"). Range("A1")
username = InputBox("Please enter your username.", "Enter username", "Jdoe")
i = 1
Do While StartRange.Offset(i, 0).Value <> "username"
i = i + 1
Loop
If StartRange.Offset(i, 0).Value = "username" Then
password = InputBox("Please enter your password.", "Enter password", "password")
End If
End Sub
I notice i could not get into the Vb script password for the excel file given by royUk. May i know what's the password to open it? I need to see it urgently as i am rushing for my current project.
View 5 Replies View RelatedTrying to calculate average successful attempts before failure. Have several hundred data points (1=success, 0=failure). A1:A10 = 1 1 1 1 1 0 1 1 1 0
Cell A11 should calculate average attempts between failures for the whole range A1:A10.
Now that the code is configured to do what I want, can someone assist me in adding a code that will delete the expired file after the third attempt of the user trying to open an expired file.
Private Sub Workbook_Open()
Dim StartTime#, CurrentTime#
Const TrialPeriod# = 1 '< 1 days trial
Const ObscurePath$ = "C:"
Const ObscureFile$ = "LBFileLog.Log"
'*****************************************
If Dir(ObscurePath & ObscureFile) = Empty Then
StartTime = Format(Now, "#0.#########0")
Open ObscurePath & ObscureFile For Output As #1
Print #1, StartTime....................................
I am trying to calculate players ranking based on their weight categories and attempts total, e.g. Category (50kg, 69kg etc..) Rank should be calculated automatically the highest total value of cat. 50kg is 1st second highest is 2nd etc. However, if tow players or more within the same Category have scored same point ranking will be calculated based on Body Weight less comes first and if both have similar weight calculation will be based on Start # first player comes first etc..
Table:
Start #
Name
Body Weight
Team
Category
Total Point
Rank
1
Player #1
49.2
Team #1
50kg
75
When opening a new Excel file, it is asking me for a password to an old excel file that was password protected, which I have deleted from my computer. It is still asking for this password every time I open a new or existing file. When I hit cancel it lets me open the file.
View 11 Replies View RelatedI have a spreadsheet, which has certain worksheets that are password protected. I need to make changes to some of the formulas, and the VBA modules, however I cannot remember the password!! Is there a way of identifying the password??
View 3 Replies View RelatedI am havng problems with the belwo macro code -
Range("G7").Select
Selection.Copy
Workbooks.Open Filename:= _
"Q:PublicPAYMENTS Q&RREPORTSSuspense Activity BUSINESS2008 - Suspense BUSINESS - Activity Reports2008 Avon.xls"
Application.CutCopyMode = False
ActiveWorkbook.Save
ActiveWindow.Close
End Sub
When i open the workbook it requires me to insert a password, i tried to type this but excel will not follow keystrokes, i then inserted the password in cell G7 which i then copy and paste, which you can see the copy at the beginning of the macro.
Is there a way where you can get it to insert the password so i can open the workbook in a macro.
What im trying to do is save 26 suspense spreadsheets by just clicking on a macro.
I have a sheet that is password protected. I have this code attached to a command button. It will unlock the worksheet, autofilter it, print it, unfilter it, and password protect the sheet again. However it is protecting it without a password. I need to have it protected with the password so that someone will not be able to just go to tools to unprotect the sheet.
Private Sub CommandButton1_Click()
ActiveSheet.Unprotect "rainforest"
Columns("O:O").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:=">0", Operator:=xlAnd
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Selection.AutoFilter Field:=1
Selection.AutoFilter
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowSorting:=True, AllowFiltering:=True
End Sub
I copied the macro and it works on text files, but will this work if you have
a .csv file or does it have to be text? What I have is an extra large .csv
file that needs to be broken up into a couple of sheets.
I am running a formula on a large data set and need the returned value to never be less than zero or more than 100. using the MIN and MAX functions, but how do I use them both at the same time?
View 4 Replies View RelatedHi All,
Why is
1-NORMSDIST(7.8) = 3.10862e-15
while
1-NORMSDIST(7.9) = 0
Is there a limit to how far out the Gaussian PDF curve you can go before Excel rounds to zero?
I'm adding some necessary code to the beginning and end of some cell contents in Format | Cells | Custom and I seem to be coming up against a character limit.
I'm using the phrase "!!<"@">!!" to add the code, but with some cell contents the result is ########### (but much longer), and I'm having to remove some of the text to make it work. The limit seems to be around 255 characters.
I have a formula that adds two numbers. Here it is:
=IF(E10="","",(E10+$C$8))
I don't want the numbers to be more than 360 when added up. When it reaches 360, I want it to start over from zero. Instead of, say, E10 = 200 and C8 = 200 ... I don't want the answer to be 400, I want it to be 40.
I have a workbook with 3 sheets. Sheet 1 contains a month of data with Customer Name and Product Code, and quantity shipped (columns A, B, and C). Sheet 2 contains Product Code and quantity produced (Column A and B). In Sheet 3, I have the customer name listed once by running a pivot table against the data in Sheet 1. I need to show the quantity produced for each customer in Sheet 3 but not exceed the quantity produced for that Product Code in Sheet 2 even if the quantity shipped was greater. For example:
Sheet 1
Customer A - 100 shipped of Product Code X
Customer B - 200 shipped of Product Code X
Sheet 2
Product Code X - 150 produced
Sheet 3
Customer A - 100 total
Customer B - 50 total
Customer B would only be allocated 50 as there was only 150 produced and Customer A was allocated 100 of the total 150 produced, leaving 50 to allocate to Customer B.
how to make a summation formula in excel (not simply adding 2 numbers together)? I have one cell that I would enter a number into, and another cell which would specify the limit. So if the first cell A1 = 1, and cell A2 = 50, then the 3rd cell would automatically add up every number "n" plus 1 until n=50. ie: (1+1)+(2+1)+(3+1)+...+(50+1)=result. The limit would have to be flexible, so if I change the 3rd cell to 70 then it would calculate to 70.
View 9 Replies View RelatedI have a MAX formula that searchs a range of cells and then gives the largest number.
How can I set a limit so that even if the MAX number is 200 I want the return to be only 150 maximum.
Example:
A11002005075
I want to be able to search for the largest number but even if the largest number is >150 limit the return to 150.
I have a bunch of city and state data in a range that I am referencing in
VB.
Example: ...
I've spent a fair amount of time creating a financial planning spreadsheet that I'd like to try to sell. My biggest problem is selling it to people and allowing them to use it without them being able to email it to anyone else. My first thought was to code it where a macro will run when the spreadsheet opens that checks if the spreadsheet is being opened on a specific computer and will close down if it is opened on an unauthorized computer. I'm not sure if this will work or how to code it
View 2 Replies View Related have a set of numbers ranging from 1-25 in column A1-A25 in descending order. I want to have a column B1-B25 which outputs numbers in column A up to a maximum of 5.
Eg.
column A
25, 6, 5, 3, 1, 0
I want in column B
5, 5, 5, 3, 1, 0
I have constructed an inventory formula, subtracting Current Inventory (CI) from Required Inventory (RI), to generate a number of how many new products must be Ordered: RI-CI=O. The problem is that if CI exceeds RI, I get a negative number for "O".
Question: How can I structure the formula to give a zero for any sum less than 1?
For example in this formula I typed in WWW as the max:
=SUMPRODUCT(($F$5:$WWW$5>=C2)*1,($F$5:$WWW$5<=C3)*1,ABS($F$6:$WWW$6))
If I try to type in a value higher than WWW it will give me an error. I was just trying to put in an amount that I would never hit within the row.
in the attached spreadsheet I have multiple sheets. On the tab "Tech IDS", column A is named "Name" and column B is the tech ID that is associated with the name in column A. Column B is validated as List=Name. Now under the tab "CAL Form" under Column A I need to type the tech's name. Now under the tab "CAL SHEET TEMPLATE" the name that I typed corresponds with a given cell (i.e. B2='CAL Form'!A2). Notice though that I2 does not give a tech id b/c of DV dropdown list meeting its limit. Look at I68, Bob's id appears b/c he fits within the limits. My question is... how can I still use the list with more names or can I modify the formula (=INDEX(ID,MATCH(B68,Name,0))) to include another Match search?
View 4 Replies View RelatedI'm trying to use the countif function to search a cell containing, say, 1000 alphanumeric characters.
For example, cell A1 contains the text...
"There needs to be an easier way to build worksheet formulas for 64 levels of nesting and 255 arguments to be meaningful. Perhaps a "Formula Composer" dialog box or something that allows you to build up a complex formula in parts and allows you to evaluate the partial formulas. When you're done, and the formula is displayed in the sheet, all of the parentheses would be automatically put in the correct places."
...and cell A2 contains the formula...
I have an excel-sheet with two worksheets one called "sheet1", this is where all data is stored, and "sheet2", where data from sheet1 can be evoked.
I'm now looking for some code that get arounds the 3 conditions limit of conditional formatting. Most of the codes on internet, just do this but only when entered manually on the selected sheet. In my case all data is entered on sheet1 and are displayed by some formulas on sheet2. It is on sheet 2 where I would like the color change to happen.
I found a piece of code that was said to do just that, but when testing it appears not to. It only updates the cell color when the concerning cell is clicke twice.
Is there a way to make the find and replace function not stop when a cell is too large? Instead, make it pass over the large cells and move on to the next cells? Is there a function that gives the number of characters in a cell? If so, one could sort by cell size and then work around the cells that are too large?
View 2 Replies View RelatedI am trying to add a final if statement to a formula but it wont let me and I cannot see what i am doing wrong - I wondered if there was a limit? ...
View 14 Replies View RelatedHow do I adjust the VB code below so when the user clicks the command button they are prompted to set a limit.
i.e the code only runs til it hits the limit and stop (instead of running until it there are no more x in the columns)
Row 2, Col 9 stores the column numbers (listed as 1, 2,.....100) so thought this could be used in some way.
1. how do i set up the code so a user can enter a parameter value e.g 50 (which is the limit but also includes the values in column number "50")
2. how do i adjust the code so it take the parameter value and stop when it reaches column number "51"...
I am currently writing some VBA code to loop through and copy data from Excel file in sub folders into a master sheet of data. There are some 1200 Excel files (these are pre-2007 files), each containing a maximum of 600 lines of data. So far the code works until it gets to around 65000 rows (the old Excel limit). I am using and writing the code in a Macro-Enabled Excel 2007 file.
I am using a Range.Offset call, which is where the error is occurring, to copy in a name basically. What happened right before this was a Range.Copy operation from the old Excel file to a Range.PastSpecial in the new one. This worked fine, and actually went a few hundred rows past the pre-Excel 2007 limit. But when the single cell operation Range.Offset().Value is called next, it crashes with a Application or User-Defined error. The code works some 100+ times through the loop with no problem, and the file that it was working on is no different then the other files.