Search:
Type: Posts; User: jdubsOR
Search:
Search took 0.03 seconds.
-
-
I have two fairly straightforward Worksheet_SelectionChange projects that I would like to combine into a single one but I can't quite figure it out.
#1
Private Sub...
-
If I change;
Filename:=filesavename, _
to
Filename:=InputBox("Enter file name"), _
it lets you choose a file name and works the first time with no problems. The second time you push...
-
Hi,
I have a button in my sheet which creates a PDF of the sheet and saves it to the users desktop. The name of the PDF is just the name of the excel file. I found that if the button is pushed twice...
-
To answer my original question
Sub Auto_Open()
If vbYes <> MsgBox("Message", vbYesNo + vbExclamation, "User Agreement Disclaimer") Then
ThisWorkbook.Close False
With...
-
Holding Shift will bypass what? The disclaimer?
I think there might be some confusion on my intent. Don't people create workbooks everyday that require users to enable macros? I might have made a...
-
Just to be clear, when I say I force users to enable macros, all i mean is that they are told that this workbook requires users to enable macros and they are given directions on how to enable them. ...
-
So, do you have a better suggestion?
Is there a way for users to agree to the terms every time they open the file without using macros? There are hundreds of web applications out there that work...
-
What will I achieve? Users can choose not to enable macros and users can choose not agree to our terms. This is a tool that my company provides for free, nobody is forced into using it. Whats the...
-
What? I'm not tricking anybody. This is a free tool (file) that hundreds of people download from our site monthly. It deals with solar electric design and we have to provide a means of saying we are...
-
I have in Module1:
Sub Auto_Open()
If vbYes <> MsgBox("Message", vbYesNo + vbExclamation, "User Agreement Disclaimer") Then
ThisWorkbook.Close False
End If
End Sub
I am...
-
Hello,
I found this nifty method to force users to enable macros and so far it's working great and was very easy to implement.
See method here: http://www.vbaexpress.com/kb/getarticle.php?kb_id=379...
-
Just as it reads. This is what I have:
Set rng = Range("E39")
If Not Application.Intersect(Target, _
Range("E38")) Is Nothing Then
ActiveSheet.Range("E38").ClearContents
End If
There...
-
Set rng = Range("E33")
If Not Application.Intersect(Target, _
Range("E27")) Is Nothing Then
If rng = "N/A" Then
MsgBox "Message", vbExclamation, "Title"
End If
End If
Thanks...
-
The data validation (drop down list) is at E27 and the cell that might be changed to "N/A" is located at E33.
-
Looked high and low for this one with not success even though I thought it would be very easy.
I use data validation to change the value of another cell. When that other cells value equals "N/A" I...
|
Click Here to Expand Forum to Full Width
|