I am trying to have a column that returns either "secure" or "re-assignable" depending on whether the employees title matches the appropriate office/ space allocation.
e.g. an employee who's title is "CEO" and office type is "Large Exterior Office" would return a secure. However an employee with a title of "Admin Assistant", who's office type is "Large Exterior Office" would return "re-assignable"
I have two sheet one is copy sheet and other is past sheet. In Paste sheet Header Title is fixed values , copy sheet header title also same but its not proper aligned & few header title not available. I want to transfer entire data from copy sheet to past sheet matching with header title. No need to change paste sheet Header title & alignment order.
Attached File: Data Transfer.xlsx
I have a spreadsheet that has a list in column A 219 rows long. what i want to do is, if possible is move them so that they run accross the top of the spreadsheet as column headings.
Exampl:
As is:
A B C D E F G
1 ?
2 ?
3 ?
4 ?
5 ?
6 ?
After:..................
In the following code snippet I have worked out a way to verify that the user inputs an Integer and then prompts downstream if an improper value was entered. The user is prompted for a corrected reponse and loops until they get it right. The initial Cancel at the first prompt was causing issues until i saw poster: titarelli use StrPtr(). Except for subsequent cancels, the code works but it is clunky at best. How to tighten this up?
VB:
Dim Quantity As Variant
Dim CorrectedQuantity As Variant
Dim j As Integer
j = 194
Quantity = 0
CorrectedQuantity = 0
[Code] ......
I have a VBA userform with various textbox fields like 'Name' and 'Address' and 'Amount'
I would like an input box to pop up that asks the user to 're-enter for verification'
So that they have to type the same thing twice, to protect against typos
How do I code it so the program compares the inputbox to the textbox and passes only if they are identical?
(or even, using two inputboxes instead if that would be easier)
how do I code in vba for it to wait until the user has checked the file that has been made make a few amendments and then when done one would click OK or resume for the program to carry on with the rest of the code.
View 2 Replies View Relatedi have followed the following criteria correctly
Create a function GetProducerRow() which takes in one String input (give it any name following the conventions) and returns an Integer.
Write a Select Case statement inside the function.It should compare the input string with the various companies listed in the Voting tables in cells F5:F9.
The Case should not use hard coded values for the names of the companies but something like Range("F5").Value.
In each case, set the return value by assigning the appropriate row number. For example, the value assigned would be 5 for "The Hershey Company" store in F5.
Remember to write Case statement for each of the 5 producers.
Add the Case Else in-case none of the producers match the input and have the return value set to 0.
Function GetProducerRow(strProducer As String) As Integer
strProducer = Range("F5")
Select Case strProducer
I am trying to check what was selected from a validation list range. I need to put up a message box if a certain selection is made. I will try to give some more explaination and detail.
I have a 'Labor Type' cell that has a validation list based on the 'LaborType' range that contains things like T&M, PM, Claim*, Quote, etc. When Claim* is selected, I want to put up the message box reminding the user to enter some additional information.
I have tried a few things like Worksheet_SelectionChange that I can't seem to get to work. I admit it has been a while since I have used a function like this (and never with a list).
I started a new collection of cards (soccer cards actually) and since I trade with some of my friends via mail, I needed something to keep track of the ones I have and the ones I don't. I made an excel spreadsheet with the numbers of the cards.
Here's my question (I don't know if its possible or not):
I there any way I can create a way to make the verification easier by, for example:
I just got card A20. I write A20 on a specific cell and, in the main table, that number changes color to indicate that I already have that card.
And in the end, a way to reverse the process so I can have the table brand new for the next use.
Just curious if there is a way to do some sort of Data Validation form that will check the previous selection and remove it from a list for the next selection? I have several machines that my company sells and I am working on an advanced invoice. I am trying to set it up so that if one machine is selected, it will populate the data validation boxes with one set of "options" for that particular machine. Also, when the user clicks on one option, no matter which one, it will remove that option from the list below it. I have posted up somewhat of a screenshot/crop/paste example of what I am attempting to do.
View 1 Replies View RelatedTitle should read "Data Validation Lists"...oops
I'm trying to format a spreadsheet so that based on the value in Column A, Coulmn B displays one of two spearate dropdown menus.
I know the following formula will not work, but that is the effect I want in Column B.
I'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 have a condition setup (under "This Workbook") upon opening a spreadsheet to verify a computer's predetermined motherboard serial number that will shut the Excel workbook down if the numbers do not match. This works fine. What I'd like to do is to add a second condition that will allow a password to be entered in a textbox if the numbers do not match so that the serial number condition could be manually overridden, if necessary. If the serial number and the password are incorrect the workbook automatically closes.
Here is the code that works:
Private Sub Workbook_Open()
If CreateObject("Scripting.FileSystemObject").GetDrive("C:").SerialNumber "-XXXXXXX" Then ActiveWorkbook.Close False
End Sub
Here is what I am attempting to do that is not functioning properly - need to add a textbox to enter a password to override an incorrect serial number
Private Sub Workbook_Open()
If CreateObject("Scripting.FileSystemObject").GetDrive("C:").SerialNumber "-XXXXXXX" Then
Dim Rng
Rng = InputBox("aaaaaa")
If Rng "aaaaaa" Then ActiveWorkbook.Close False
End Sub
I would like to add a piece of code into the user form that will check and verify if a part has already been added so as to avoid multiples in a user-driven/created database.
here is a repost of the current code i am using for the user form (I have posted it before in another thread .. Blane245 helped me out with a different question I had)
I am entering a tremendous amount of data and as I get further doen the spreadsheet I can not always remember the column headings, is there a way to have the headings (Example: product name, code, price, etc) appear at the top of the screen so I do not always have to scroll all the way to the top again.
Second, My commerce system requires a short and long description, I want to have the short desctiption feild grab the first 200 characters of the long description and then follow it up with three periods (...)
ive got my highly expensive office enterprise 2007 disk
what is the best way of installing this so i can still use 97 and 2007. any tips?
i wont bother with outlook but i'd like to try the rest ,mind you onenote,infopath and groove are a complete mystery!
how to change language of MS office.English language is not showing in options.Do I need to purchase language pack?I am using english language other than office.
View 1 Replies View RelatedI'm having a bit of an issue with OWC in 2007. I know they have been deprecated but I was under the impression, form many places including MS themself, that you could install them. I downloaded this file
http://www.microsoft.com/downloads/d...DisplayLang=en
and then the SP1 2007 file here
http://www.microsoft.com/downloads/d...displaylang=en
All seems to go well and there seems to be a appropriate .dll in c:Program FilesCommon FilesMicrosoft SharedWeb Components111033 by the name of OWCI11.DLL. However when I attempt to add a reference to that file in a VBA project in Excel (it's one that has an old broken reference to 2003 OWC) by browsing to that file it tells me
"Can't add a reference to the specified file"
What have I done wrong? Is what I am attempting, getting 2007 to use OWC, even possible? Note I did not write any of the code for this Excel Add-in so have very little idea about what OWC are for.
I have recently updated to Office 2007. I have about 50 forms with VBA in them (all excel) and I was careful to save them all back to 2003 office files. When one of my users opens the files and uses on of the internal userforms it errors out saying it is missing a reference.
View 9 Replies View RelatedI got a copy of Office 2007 and I am having some trouble running an Excel macro. It gives a 405 Error message. This macro runs fine on my Office 2003. Is there any extra setting that I need to do in the Excel 2007?
View 9 Replies View RelatedI create a vb script file using SAS that will open excel and create pivot tables. It works in XP but not in office 97. I am not a vb expert. Here is the code.
Set XL = CreateObject("Excel.Application")
XL.Visible=True
XL.Workbooks.OpenText "D:JDTEMPXLWORKBOOK.TXT", 437, 1, 1, -4142, _
False, False, False, False, False, True, "|", _
array( _
array(1, 2), _
array(2, 2), _
array(3, 1), _
array(4, 1), _
array(5, 2), _
array(6, 2), _
array(7, 2), _
array(8, 2), _
array(9, 2) _ ............................
My organisation has ten small offices within a ten mile radius.
Most of the items to order are office supplies, along with order forms, catalogues, brochures and pro-formas.
Each office does not order the same items.
I would like to make a ‘generic’ supplies order in excel.
Column A = ‘in house’ code
Column B = Description
Columns C to G are size, colour, pack size etc.
Column H = quantity held
Column I = quantity required to hold
Column J = amount to re-order.
I would like Excel to calculate
Amount to bring stock to hold - “=I4-h4” (in J4)
If Current Stock is more than Stock to Hold then ‘0’ is in J4, “=IF(H4<I4, I14-H14,0)” (in J4) I think.
If H4 is left blank then J4 to show “0” or ‘Blank’. (experiments have given J4 a figure of 25)
I have tried putting two formulas together, but Excel tells me I have ‘too many arguments’.
I have call data for a client and I want to know what calls came in after hours. I cant seem to get the formulas to work correctly.
It seems to run the weekday/weekend check correctly but the time is not working properly.
=IF(WEEKDAY(A2,2)>5,"Party",IF(AND(B2<=9,B2>=17),"Party","no Party"))
P.S. While writing this, I realized that it should be (<=9 OR >=17) or (>=9 AND <=17) but neither of those worked either.
party_noparty.xlsx
Im looking to make a formula that states if b3 =10 then a. if b3=12 then b, if b3= 14, then c, if b3=16 then d. A, B, C, D are referring to links to another sheet.
View 8 Replies View RelatedIn certain spreadsheets I have noticed a significant deterioration in save times. There may/may not have any formulas or macros on them and most are very small files 20-50kb. I notice that Excel puts a temporary file on the desktop while saving the original. The temp file goes away once the original is saved. While saving, I get the time icon which goes to beachball and it can take up to a minute to save the file. This happens on 2-3 Macs on network. Using 10.5
View 4 Replies View RelatedI have a scorecard created in excel 2007. All my end users are using excel 2002. Now I want to build a scorecard in Excel 2002 like what we have in excel 2007. Is it possible.
I want to display the traffic signals and 5 level indicators (arrows), based on conditional formatting.
This is out of box in excel 2007. But how do I achieve this in excel 2002?
Is there a simple method?
Is it possible to send the contents of a cell to outlook via VBA trigger?
View 14 Replies View RelatedIs it possible to determine the Version of Office / Outlook that is installed on a machine, an based on that, add a reference to the correct Microsoft Outlook com object library programatically?
View 10 Replies View RelatedI'm opening an Excel file that automatically attempts to update links when I open it, but I am not prompted with the choice to cancel, or update links, when I open the file, like I was in Office 2003.
I have checked the Excel Options, Advanced, General, 'Ask to update automatic links' box, but I still don't get the dialog box when I open the file.
The file is just riddled with VALUE errors. A colleague of mine who opens the file in Office 2003 can see all the data fine.
Can any Mac users out there confirm that if a sheet is protected that a user cannot group and ungroup rows using the "+" if the sheet is protected using the following...
With Sheet1
.Protect Password:="******", UserInterfaceOnly:=True
.EnableOutlining = True
End With
It works fine on my PC Office 2003 but I hear it won't work on a Mac but I can't confirm it.