Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
formula correct - display is funny
OK I've got a spreadsheet that reads the windows User Name and displays it
properly in the cell I choose. However when this is used to load data into another program it grabs the cells content which is actually =UserNameWindows ()... I need the other program to read the cell as the result of that formula. This is how I get to the =UserNameWindows() result - any suggestions on how to change the display? would be greatly appreciated... Function UserNameWindows() As String UserNameWindows = Environ("USERNAME") End Function Sub AutoFillIn() Dim myNames As Variant Dim c As Range Dim res As Variant myNames = Array("dadunlap", "slhull", "mdringler", _ "sljackson", "ccparker", "thenry", _ "rdowling", "jslong", "mhjames", _ "lndavis", "jdscott", "jfullem", _ "alwrinch") For Each c In Range("A8:A1000") If c.Value = "" Then Exit For End If c.Offset(0, 8).Formula = "=UserNameWindows()" res = Application.Match(UserNameWindows, myNames, 0) If IsNumeric(res) Then 'found it c.Offset(0, 6).Value = "YES" Else c.Offset(0, 6).Value = "NO" End If Next c End Sub TIA Rebekah -- Message posted via http://www.officekb.com |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
if conditions in 2 cell correct then display third cell | New Users to Excel | |||
Why does Regression tool in '07 not display Line Fit Plots correct | Excel Discussion (Misc queries) | |||
formatting a cell to display the correct date. | Excel Discussion (Misc queries) | |||
Accounting Category Display does not show the correct format/outpu | New Users to Excel | |||
display correct toolbar icon on starting excel application program | Excel Programming |