ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Validation List (https://www.excelbanter.com/excel-programming/362010-validation-list.html)

Modell

Validation List
 
Is there a way to reset a validation list to "blank" or for example the first
choice in the list in a macro?

Thanks.

Bob Phillips[_14_]

Validation List
 
range("A1").Value =""

where a1 is the cell with the DV.

--
HTH

Bob Phillips

(remove xxx from email address if mailing direct)

"Modell" wrote in message
...
Is there a way to reset a validation list to "blank" or for example the

first
choice in the list in a macro?

Thanks.




Debra Dalgleish

Validation List
 
There's a sample file here that clears cells with data validation, and
selects the first item from a validation list, if one exists:

http://www.contextures.com/excelfiles.html

Under Data Validation, look for 'Reset Data Validation Cells'

Modell wrote:
Is there a way to reset a validation list to "blank" or for example the first
choice in the list in a macro?

Thanks.



--
Debra Dalgleish
Contextures
http://www.contextures.com/tiptech.html


Modell

Validation List
 
That works great. Thanks Bob.

"Bob Phillips" wrote:

range("A1").Value =""

where a1 is the cell with the DV.

--
HTH

Bob Phillips

(remove xxx from email address if mailing direct)

"Modell" wrote in message
...
Is there a way to reset a validation list to "blank" or for example the

first
choice in the list in a macro?

Thanks.





Modell

Validation List
 
I ran into a problem. I have the following code in a worksheet, so when that
cell is changed, it automatically runs a macro. Is there any way to have it
skip the macro if the cell is blank?

Here's the code I have in place right now.


If Target.Address = "$C$10" Then
Application.Run "Program_Filter"

I want the application "Program_Filter" to automatically run when $C$10 is
changed only if the cell isn't blank. Basically, if it could check the cell
first to determine whether or not it's blank, then if it is blank skip
running the macro, otherwise if it isn't blank, go ahead and proceed to run
the macro.

Thanks for all your help Bob. You too Debra.


"Modell" wrote:

That works great. Thanks Bob.

"Bob Phillips" wrote:

range("A1").Value =""

where a1 is the cell with the DV.

--
HTH

Bob Phillips

(remove xxx from email address if mailing direct)

"Modell" wrote in message
...
Is there a way to reset a validation list to "blank" or for example the

first
choice in the list in a macro?

Thanks.





Bob Phillips[_14_]

Validation List
 
If Target.Address = "$C$10" Then
If Target.Value < "" Then
Application.Run "Program_Filter"


don't forget the extra End If

--
HTH

Bob Phillips

(remove xxx from email address if mailing direct)

"Modell" wrote in message
...
I ran into a problem. I have the following code in a worksheet, so when

that
cell is changed, it automatically runs a macro. Is there any way to have

it
skip the macro if the cell is blank?

Here's the code I have in place right now.


If Target.Address = "$C$10" Then
Application.Run "Program_Filter"

I want the application "Program_Filter" to automatically run when $C$10 is
changed only if the cell isn't blank. Basically, if it could check the

cell
first to determine whether or not it's blank, then if it is blank skip
running the macro, otherwise if it isn't blank, go ahead and proceed to

run
the macro.

Thanks for all your help Bob. You too Debra.


"Modell" wrote:

That works great. Thanks Bob.

"Bob Phillips" wrote:

range("A1").Value =""

where a1 is the cell with the DV.

--
HTH

Bob Phillips

(remove xxx from email address if mailing direct)

"Modell" wrote in message
...
Is there a way to reset a validation list to "blank" or for example

the
first
choice in the list in a macro?

Thanks.






Modell

Validation List
 
Thanks Bob. That worked great. Your help is much appreciated.

"Bob Phillips" wrote:

If Target.Address = "$C$10" Then
If Target.Value < "" Then
Application.Run "Program_Filter"


don't forget the extra End If

--
HTH

Bob Phillips

(remove xxx from email address if mailing direct)

"Modell" wrote in message
...
I ran into a problem. I have the following code in a worksheet, so when

that
cell is changed, it automatically runs a macro. Is there any way to have

it
skip the macro if the cell is blank?

Here's the code I have in place right now.


If Target.Address = "$C$10" Then
Application.Run "Program_Filter"

I want the application "Program_Filter" to automatically run when $C$10 is
changed only if the cell isn't blank. Basically, if it could check the

cell
first to determine whether or not it's blank, then if it is blank skip
running the macro, otherwise if it isn't blank, go ahead and proceed to

run
the macro.

Thanks for all your help Bob. You too Debra.


"Modell" wrote:

That works great. Thanks Bob.

"Bob Phillips" wrote:

range("A1").Value =""

where a1 is the cell with the DV.

--
HTH

Bob Phillips

(remove xxx from email address if mailing direct)

"Modell" wrote in message
...
Is there a way to reset a validation list to "blank" or for example

the
first
choice in the list in a macro?

Thanks.








All times are GMT +1. The time now is 05:22 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com