Maybe (untested)
![]()
Private Sub Workbook_Open() With Worksheets("Sheet1").Range("A1") If Me.Name Like "*.xlt*" Then .Value = vbNullString ElseIf .Value = vbNullString Then .Value = Environ("username") End If End With End Sub
Maybe (untested)
![]()
Private Sub Workbook_Open() With Worksheets("Sheet1").Range("A1") If Me.Name Like "*.xlt*" Then .Value = vbNullString ElseIf .Value = vbNullString Then .Value = Environ("username") End If End With End Sub
Entia non sunt multiplicanda sine necessitate
Shoot...I need to get in the practice of stating all my restrictions on these, too. Because the ultimate template will actually be launched from another program that gets a little finicky, I am restricted from using anything that activates upon open of the worksheet, as it appears this one does. I'm still testing whether "on activate" of a particular worksheet will work, but I doubt it will. (I've heard that "on modification" of a certain cell is possible, but I can't find the way to write that, and I'm not certain it would work in this instance anyway; I understand that requires an active modification of a cell, which this would not be.)
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks