View Single Post
  #12   Report Post  
Posted to microsoft.public.excel.programming
dqsp dqsp is offline
external usenet poster
 
Posts: 9
Default Colours not changing

Hi Norman,

I only stepped through the code to find the errorspot. The macro just
stops, no errormessage from Excel. I added some code to produce a
msgbox with the errorcode and the error is a "1004 Application or
object defined error", which doesn't surprise me.
No references missing.
I replaced the (now) with "01-06-2008" (Dutch format). Same errorcode.
When I delete the two lines for the values for column 2 and 3, no
error anymore, but the cell isn't colored blue (for example).
When I delete only the columns(2) line, the same error occurs.
Dark forces at work if you ask me!

Still any ideas?

Thanks again,
regards,
Rob


On 31 mei, 18:22, "Norman Jones"
wrote:
Hi Rob,

Earlier, you reported that the code
was not working either on your
home or work systems; now, at
least, works on your home system.

Reviwing the thread, I note that
you only discuss the 'error' in
terms of stepping though the code.

Therefore, two questions arise:

What happens when remove any
stop points and simply select a new
value from one of the data
validation dropdowns in column G?

What error message and error
number are reported?

If the error complains about the
Now function, I would suggest that
you check the references:

When the code errors, go to the
VBE and select the project in the
Project Explorer Window

Hit the reset button and look at the
Menu | Tools | References list

Look for any references marked
as "MISSING".

Either uncheck the reference or, if
the reference is needed, try the browse
button *to locate the library.

---
Regards.
Norman

"dqsp" wrote in message

...
Hi Norman,

I allready tried that, but no succes.
At home it works (had to do with macroprotection (grr)). At my work it
doesn't. If I debug with F8, I stll see that the macro ends
after .Columns(2).Value = (Now)

Any other idea?

Thanks again,
Rob

On 30 mei, 18:11, "Norman Jones"
wrote:



Hi Rob,


Run the following sub and then try
changing column G values.


'========
Public Sub Tester()
Application.EnableEvents = True
End Sub
'<<========


---
Regards.
Norman- Tekst uit oorspronkelijk bericht niet weergeven -


- Tekst uit oorspronkelijk bericht weergeven -