Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
MAcro help
I have a question, I am making a goal seek using
the followed the code. And is working, but I want to add something else. The numbers for this macro depend on values in another sheet and when I don't have any data in that range I receive a debug error. And what I want is, if in the range [b23:m33] (data in another sheet) some cells are null (empty cell), the macro jumps to next (number2). Because when the debug appears only runs the goal seek for number1. I want to avoid to open all the time the debug and comment the extra lines that the debug shows. number 1 and number 2 depends on the data from range [b23:m23] Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, forside.Range("B6:B7")) Is Nothing Then Exit Sub Else 'number1 .Range("D45").GoalSeek goal:=0, changingcell:=.Range("D44") .Range("f45").GoalSeek goal:=0, changingcell:=.Range("F44") .Range("h45").GoalSeek goal:=0, changingcell:=.Range("H44") .Range("J45").GoalSeek goal:=0, changingcell:=.Range("J44") 'number2 .Range("D45").GoalSeek goal:=0, changingcell:=.Range("D44") .Range("f45").GoalSeek goal:=0, changingcell:=.Range("F44") .Range("H45").GoalSeek goal:=0, changingcell:=.Range("H44") .Range("J45").GoalSeek goal:=0, changingcell:=.Range("J44") End If End Sub Could someone help me Thanks Sofia |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Macro recorded... tabs & file names changed, macro hangs | Excel Worksheet Functions | |||
Macro to copy and paste values (columns)I have a macro file built | Excel Programming | |||
AutoRun Macro with a delay to give user the choice to cancel the macro | Excel Programming | |||
Macro not showing in Tools/Macro/Macros yet show up when I goto VBA editor | Excel Programming | |||
Start Macro / Stop Macro / Restart Macro | Excel Programming |