Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
frendabrenda1
 
Posts: n/a
Default Code to an in cell drop down list

I would like to assign code to an in cell drop down list..... so that once an
item is chosen it would run the code. Is this possible? I know you can
attach code to a control list box, but I am having trouble creating a
dependant list like I can with the in cell drop down.

Thanks for any help.
  #2   Report Post  
Otto Moehrbach
 
Posts: n/a
Default

You can use a Worksheet_Change event macro like:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) < A1 Then Exit Sub
If Target = "" Then Exit Sub
Call YourMacro
Application.EnableEvents = False
Target.ClearContents
Application.EnableEvents = True
End Sub
This macro will run your macro whenever the contents of A1 are changed to
anything other than blank. This macro must be placed in the sheet module of
your sheet. To do this, right-click on the tab of your sheet, select View
Code, and paste this macro into that module. HTH Otto
"frendabrenda1" wrote in message
...
I would like to assign code to an in cell drop down list..... so that once
an
item is chosen it would run the code. Is this possible? I know you can
attach code to a control list box, but I am having trouble creating a
dependant list like I can with the in cell drop down.

Thanks for any help.



  #3   Report Post  
frendabrenda1
 
Posts: n/a
Default

I cannot get this code to work. I have tried writing the instructions in a
separate macro, and also replacing the "yourmacro" with the instructions
directly and neither runs the code upon changing A1 or any other cell I try.

What am I doing wrong?????

"Otto Moehrbach" wrote:

You can use a Worksheet_Change event macro like:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) < A1 Then Exit Sub
If Target = "" Then Exit Sub
Call YourMacro
Application.EnableEvents = False
Target.ClearContents
Application.EnableEvents = True
End Sub
This macro will run your macro whenever the contents of A1 are changed to
anything other than blank. This macro must be placed in the sheet module of
your sheet. To do this, right-click on the tab of your sheet, select View
Code, and paste this macro into that module. HTH Otto
"frendabrenda1" wrote in message
...
I would like to assign code to an in cell drop down list..... so that once
an
item is chosen it would run the code. Is this possible? I know you can
attach code to a control list box, but I am having trouble creating a
dependant list like I can with the in cell drop down.

Thanks for any help.




  #4   Report Post  
Dave Peterson
 
Posts: n/a
Default

This code goes behind the worksheet that has the dropdown (you built the
dropdown via data|validation, didn't you???).

Right click on the worksheet tab, select view code and paste Otto's code there.

(change YourMacro to the correct name, too.)



frendabrenda1 wrote:

I cannot get this code to work. I have tried writing the instructions in a
separate macro, and also replacing the "yourmacro" with the instructions
directly and neither runs the code upon changing A1 or any other cell I try.

What am I doing wrong?????

"Otto Moehrbach" wrote:

You can use a Worksheet_Change event macro like:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) < A1 Then Exit Sub
If Target = "" Then Exit Sub
Call YourMacro
Application.EnableEvents = False
Target.ClearContents
Application.EnableEvents = True
End Sub
This macro will run your macro whenever the contents of A1 are changed to
anything other than blank. This macro must be placed in the sheet module of
your sheet. To do this, right-click on the tab of your sheet, select View
Code, and paste this macro into that module. HTH Otto
"frendabrenda1" wrote in message
...
I would like to assign code to an in cell drop down list..... so that once
an
item is chosen it would run the code. Is this possible? I know you can
attach code to a control list box, but I am having trouble creating a
dependant list like I can with the in cell drop down.

Thanks for any help.





--

Dave Peterson
  #5   Report Post  
Dave Peterson
 
Posts: n/a
Default

Just to add to Otto's response.

There's a bug in xl97 that stops the worksheet_change event from firing under
certain conditions:

From Debra Dalgleish's site:
http://contextures.com/xlDataVal08.html#Change

In Excel 97, selecting an item from a Data Validation dropdown list does not
trigger a Change event, unless the list items have been typed in the Data
Validation dialog box.

She also has some workarounds for this bug.



Otto Moehrbach wrote:

You can use a Worksheet_Change event macro like:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) < A1 Then Exit Sub
If Target = "" Then Exit Sub
Call YourMacro
Application.EnableEvents = False
Target.ClearContents
Application.EnableEvents = True
End Sub
This macro will run your macro whenever the contents of A1 are changed to
anything other than blank. This macro must be placed in the sheet module of
your sheet. To do this, right-click on the tab of your sheet, select View
Code, and paste this macro into that module. HTH Otto
"frendabrenda1" wrote in message
...
I would like to assign code to an in cell drop down list..... so that once
an
item is chosen it would run the code. Is this possible? I know you can
attach code to a control list box, but I am having trouble creating a
dependant list like I can with the in cell drop down.

Thanks for any help.


--

Dave Peterson


Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Refreshing drop down cell values... Dyce Excel Worksheet Functions 0 August 24th 05 10:49 PM
How do I make a drop down list to pick from for a cell in Excel bbiernbaum Excel Discussion (Misc queries) 2 June 15th 05 02:32 PM
Possible Lookup Table Karen Excel Worksheet Functions 5 June 8th 05 09:43 PM
How do I insert a drop down list in a cell using Phil Excel Worksheet Functions 2 May 8th 05 08:17 PM
Drop List Referencing Boony Excel Worksheet Functions 2 November 11th 04 11:42 AM


All times are GMT +1. The time now is 01:51 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"