Including Environment Username In Cell
Feb 1, 2006
I have searched the forum several way to resolve my issue and the only solutions were as follows:
PHP
Public Function UserName()UserName = Environ("username")UserName = Computer("UserName")End FunctionOption ExplicitFunction NetworkUserName() As StringDim responseNetworkUserName = Environ("Username")End Function
Problem is that I get a #REF! and #NAME? instead of the user names
I am using Excel 2000 (I can not upgrade, Government PC) plus we need it to support Excel 2000 - present versions.
View 13 Replies
ADVERTISEMENT
Jun 16, 2009
1. Are the Workbook Environment and the VBE environment simply two different forms? Meaning, when I press alt+F11, am I just switching between 2 default forms?
2. Is Excel itself written in VBA? And if it's written in VB or C, which would make more sense, is the GUI side of things written in VBA?
The reason I ask is pretty simple. I really love the way the Workbook environment and the VBE environment are set up. I want to use them as models for my own forms. Both environments seem little more than two very complex forms. And I want to replicate so much about them.
3. But is it possible to replicate anything I see as part of these environments in my own forms?
For instance, what is the VBE Project window? Is it a ListBox? I need to code a form that does something very similar to the way it groups and collapses Projects and their sub-groups like Microsoft Objects, Sheets, ThisWorkbook, etc. I've used grouping to make rows and columns collapsible. But never items in a ListBox... But am I right to assume that I can do so, just because Excel's environment does it? Meaning, can it be assumed that anything I see Excel doing itself, a talented programmer can replicate in forms of his own?
View 3 Replies
View Related
Oct 5, 2007
I have a thousand names on a column, and I have a several worksheet tabs as locations, such as CA, AZ, TX, and NY.
All names goes to main worksheet, show like this
apitchford 10 100 123
bkishpaugh 9 211 123
blee 14 234 111
cbonny 21 125 412
I need to pull a specific name, example, name = blee, move that name with all data on that row into TX.
I will need to set as automatically, becuase the names add and delete on the main worksheet, and will auto update those tab worksheets. (make sense?)
I have tried INDEX and MATCH, but they keep putting one data in, not all data.
View 9 Replies
View Related
Feb 15, 2007
I've wriiten the following routine :
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
' Unhides all columns prior to saving
ActiveSheet. Unprotect password:="test"
Cells.Select
Selection.EntireColumn.Hidden = False
Range("A1").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, password:="test"
Response = MsgBox("Have you considered all the items on the checklist?", vbYesNo)
If Response = vbYes Then
Go_To_Checkbox
I want the routine to stop without saving (after running Go_To_Checkbox) if the answer to "Have you ticked the checklist checkbox?" is 'No'. I know the 'Stop' function will do it but I just want to exit the routine without saving, rather than the routine stopping and calling up the Visual Basic editor.
View 3 Replies
View Related
Apr 17, 2009
I am trying to get the username from the system to display in A1 in a file in Excel. I got this code form internet and put it in the sheet by clicking right mouse on the sheet1 tab and view code and then pasted it there.
Function UserNameWindows() As String
UserNameWindows = Environ("USRNAME")
End Function
And then as per the instructions on the same page I inserted this formula in A1 : =UserNameWindows()
The person stated that by doing this, I should be able to get user name displayed in A1. BUt all it gives me is #NAME?.
View 9 Replies
View Related
Apr 24, 2014
Trying to get a record of who authorized spending in one of my worksheets and when they did it
I had some VBA code in one of my worksheets which added a time stamp and a user ID to two different cells after the user enters their name. Why it is no longer working, though I suspect after moving the worksheet around.
I would like my users to type their name into cell G65 (which is actually merged from G65-K65). Once the user enters their name, cell L65 (which is actually merged L65-O65) populates with the current time stamp. Also, when the user enters their name into cell G65, I would like cell P65 (which is actually merged into P65-S65) to auto populate. I would like this all of this to go down through line 70.
View 1 Replies
View Related
Feb 14, 2010
I found this code and maybe I'm almost there. I need to get the value of the Environment variable called HOME if it exists.
These macros collect all the environemnt variabes into an array and then show them in a messabe box.
View 3 Replies
View Related
Oct 4, 2013
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" _
(ByVal lpBuffer As String, nSize As Long) As Long
Public Function UserName() As String
Dim Buffer As String * 100
Dim BuffLen As Long
On Error GoTo UNerr
[Code] ......
I found the code online and attempted to call the user name using =username() on the specified cell, but I receive the #NAME? error. I looked around and found several references to check the VB refence box for anything missing and I did not find anything incorrect.
To note, I am attempting this at my job's PC which will be used on other employees PC's as well.
View 6 Replies
View Related
Apr 25, 2014
Is there a way to have a formula or a VBA code associated to the choice of any value in a Validation list.
For example is there a way to have lets say in A1 a validation list and to have B2 returning the username of the person of who will select a value in A1?
View 9 Replies
View Related
Jun 23, 2014
I trying to create a paperless petty cash system. I have my sheet all setup and calculating how I want. When a user makes an entry they Enter their name in column "W".
I am trying to overcome the problem of accountability. I need to achieve a cell calls for Username and Password and if correct the persons name is entered into cell then Row is locked to prevent figures being altered etc. But also if user made mistake they need to unlock it somehow someway
Sure this achievable from snippets of info I seen online but its way beyond my abilities. I realise a determined user can circumvent this if they wanted to.
View 5 Replies
View Related
Dec 14, 2006
Sheets("sheet1").Range("a1").Value = Environ("username")
If Range("a1").Value = Range("H5").Value Then format.cell("c24")Protection=unlocked
I will have someone type in their supervisor's name in H5. When they send the form to their supervisor and A1 matches the entry in H5, I want cell c24 to be unlocked so the supervisor can make an entry.
View 9 Replies
View Related
Aug 27, 2008
I'm having difficulty allowing my macro to run in a more global environment with varying data-set lengths.
For example:
Though the following "copy" scenario works for me when my data set is contained within cells B2:B35:
Range("A2:A35").Select
Selection.Copy
It does not allow me to work with a set of data that extends beyond this--say to B50 or B60. Is there any way to allow this command, and others, to be a bit more flexible with my data set lengths?
View 9 Replies
View Related
Jun 22, 2008
i have the following code to insert comments into cells, however if the user cancels the input box (i.e. doesn't insert any text), a comment is still added with their details and the comment 'FALSE'. Is there anyway to stop comments being added if the user cancels the input?
Sub Insert_Comment()
Dim iReply As Integer
Dim cl As Range
Dim sComment As String
Dim sText As String
Dim UserNameWindows As String
View 4 Replies
View Related
Sep 30, 2013
Is there a way that formula links in spreadsheets can use environment variables to reference formulas in other spreadsheets/addins?
For example, I have a spreadsheet that imports templates which call functions in an addin. The spreadsheet, templates and the addin could be installed into either the 'Program Files' or the 'Program Files (x86)' folders.
I am experiencing issues with the formula references when moved between 32 and 64 bit computers since Excel seems to store the full path of the addin in the Excel formula (even though it hides it when the reference resolves its path) in my templates. I would like to update the references in my templates so that they use an environment variable (set by my software installer) to always know the correct path of the addin.
In Excel 2003, spreadsheet links are edited via: 'Edit'->'Links'
In Excel 2007 and higher,'Data'->'Edit Links'
View 1 Replies
View Related
Feb 27, 2009
I am looking to have a macro which will automatically add the username and date to a cell, when the cell above changes (or in this case =x). I have a bit of code from a previous project, but I have changed Target.Row to Target.Column and it is not behaving as I require:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("B2:BZ2"), Target) Is Nothing Then
Range("C" & Target.Column).Value = Format(Date, "dd-mmm") & " " & Format(Time, "hh:mm") & " by " & (Application.UserName)
End If
End Sub
See the attachment for the example. What I need is whenever row 3 ="x" I need the corresponding cell in row "d" to update with the latest date, time and username. Please not the macro is currently not active on the sheet as i've added the ' character.
View 3 Replies
View Related
May 30, 2012
I am having with Excel 2007.
When I hover the mouse over a cell with comments, the status bar displays a message; for example "Cell A12 commented by A satisfied Microsoft Office user".
I only get this message for one column. The cells in all other columns give my first and second name as the author of the cell comment.
Why it is only effecting one column. I have been unable to change the annoying "commented by A satisfied Microsoft Office user" to my own name.
Is there a macro that can do this? I tried two macros I found online, both from a few years back, but neither of them worked.
View 2 Replies
View Related
May 18, 2014
I have a spreadsheet with some cells which return values using INDEX and MATCH to bring back the entire details of a person based on there membership number. However I require the comments to be attached with the returned values. The comments have there image in, rather than just text.
I have found some answers with vba, which do the process, however you had to manually enter the cell, from which the comment was to be copied from, into a pop up box. This involved finding the box myself to then select the box to take the comment from. In doing this I had found and read the comment, which is the is the process I'm trying to bypass.
View 8 Replies
View Related
Apr 29, 2014
I have a sheet that calculates what items are on any given transaction - this works well. I now want another table that counts how many times a certain brand comes up.
For example one item on a transaction might be "TENSOR REG TRUCK BLK 5.0 x2"
I need the table to look at this and count if tensor is in it (sheet name: 'Sheet 1') but I want it to look at the list of brands and and reference that brand rather than type it out individually.
View 4 Replies
View Related
Mar 28, 2009
There is a big range of cells with normal numbers (ex. 100, 150 .. etc), but I need to convert them in the following formulas that give the same numbers as a result: for example if the cell value is 100, I need to convert it in =if(iserror(100);0;100) and so on with all other values. Is it possible this to be done automatically for all cells?
View 5 Replies
View Related
Dec 11, 2009
I want a dialog box to have a label box reference a cell within a work sheet. This referenced cell contains a formula linked to other cells so it will change value.
View 14 Replies
View Related
Jul 18, 2006
How wud I find out the total number of rows in a column, that are non blank? Value "False" and N/A are considered as blank cell , but a cell with --> one or more space " " is allowed.
View 5 Replies
View Related
Jun 28, 2012
I am looking to standardise data entry for a cell, so that it appears as such: 2011/031T/0003
Data may be entered as 11/031T/03 and is not always consistent.
I am hoping that a custom cell format will do the trick, to keep it simple however the combinations that I have tried have not worked.
This format needs to be Excel 2003 friendly.
View 9 Replies
View Related
Mar 13, 2013
I am trying to create a SUMIFS function to sum estimated hours for specific systems that do not have a Completed date. I do not want to sum remaining hours if it has been completed. i.e.
=SUMIFS(Hours, System#,"110-000-00, Complete (Date), ISBLANK)
System #
HOURS
Complete (Date)
110-000-00
0.5
210-000-00
0.5
[Code] .........
View 7 Replies
View Related
Feb 13, 2014
I'm migrating data from Financisto for Android to CashTrails for iOS, and I need to format my CSV file a specific way for conversion to a CashTrails file.
I'd like to do the following in Excel 2013 (I have access to other versions if I need to):
1. Highlight a range of cells (i.e. A1-H20)
2. Apply following action: IF cell has data, add " to beginning of cell and " to end of cell, AND IF cell has no data, place "" in cell.
This can be done, right? I'm desperate!
It would look like this in Notepad.
Before:
Date,Time,Amount,Category,Tags,Account
12/31/13,12:00 PM,$3.99,General,,Checking
12/31/13,12:30 PM,$5.00,Shopping,gift,Cash
After:
"Date","Time","Amount","Category","Tags","Account"
"12/31/13","12:00 PM","$34.99","General","","Checking"
"12/31/13","12:30 PM","$5.00","Shopping","gift","Cash"
View 2 Replies
View Related
Oct 8, 2012
Excel 2007.I have a list of postcodes (UK) which have different lengths of characters (including spaces) from 6-8, however our system seems to add additional spaces inbetween the postcode, so it could have upto 11/12 characters (inc spaces) Below is what could come out:
EH21 6PQ - 1 Space (8 Char)
EH12 9HG - 3 Spaces (10 Char)
E1 8DF - 3 Spaces (8 Char)
LL5 1GH - 2 Spaces (8 Char)
L5 1FG - 1 Space (6 Char)
What I need is a formula to ensure each postcode only has 8 characters by inserting spaces between if there's less than 8 char and trimming if there's more than 8 char
So from the above postcodes the desired results would be:
EH21 6PQ - 1 Space (8 Char) - This would be correct
EH12 9HG - 3 Spaces (10 Char) - Trim off 2 spaces from the middle
E1 8DF - 3 Spaces (8 Char) - This would be correct
LL5 1GH - 2 Spaces (8 Char) - This would be correct
L5 1FG - 1 Space (6 Char) - Insert 2 spaces in the middle
View 9 Replies
View Related
Jul 25, 2006
how do i show a userform in Excel in the spreadsheet environment? I used to "run macro" but unable to run userform code "private sub".
View 2 Replies
View Related
May 29, 2008
I have Timesheet workbooks with 3 levels of access (user, viewer & me as developer).
I want use the GetuserName API function (with If/Then) to auto open the wkbk if I am loged in under my network login so psuecode looks bit like this
If network user is me then open wkbk
else ask for username & password
I have googled & searched the forum & the closest I have is this
Public Declare Function GetUserName Lib "advapi32.dll" _
Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Function ReturnUserName() As String
' returns the NT Domain User Name
Dim rString As String * 255, sLen As Long, tString As String
tString = ""
On Error Resume Next...............
View 9 Replies
View Related
Nov 10, 2006
I've got a sheet with a "Last Edited By:" field and I want this to be populated with the current users name i.e. I suppose I mean the user name that is assigned to Excel, as opposed to the XP log in... although I guess either would do. I'm OK on the change event thing, but just dont know the function to find the the current users name.
View 3 Replies
View Related
Jan 17, 2007
I'm trying to use the code listed below on the works shared drive. When I open up the worksheet and save it, my log on identity is left as required in Cell B2 etc.. When someone else uses the sheet it just leaves the company name in this cell and not their log on identity? The date & time function always works ok. Can anyone advise me if what I'm after is achievable.
The code I've used below was used from a previous string on a similar question.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Range("A" & Rows.Count).End(xlUp).Offset(1).Value = Now()
Range("A" & Rows.Count).End(xlUp).Offset(0, 1).Value = Application.UserName
End Sub[/b]
View 9 Replies
View Related
Jun 29, 2007
I have copied a macro off another board that get the username of the computer where the excel file is opened. It works fine on my pc but when I have sent the workbook to a colleague my username came up when he opened it. Also what I am trying to do is to modify the macro that does a vlookup on a range in worksheet 1 from where it picks name and surname (and transpose it onto worksheet 2 on cell A2), email (on B2), tel number (on C2) etc etc.
View 3 Replies
View Related
