Thread: Blinking Text
View Single Post
  #30   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Esra Dekan Esra Dekan is offline
external usenet poster
 
Posts: 22
Default Blinking Text

Oh and its also worth pointing out, that the workbook you sent me that
is supposed to have blinking in it, has all the commands in exactly
the same places as I do in my workbook, and it TOO doesnt work.

I suggest something might have been overlooked.

Esra



On Sat, 16 Feb 2008 14:12:40 -0800, Gord Dibben <gorddibbATshawDOTca
wrote:

The only thing I asked you to put in the Immediate window in the workbook I sent
to you was

Application.EnableEvents = True

The reason for that was to make sure events were enabled.

If you do that, close the workbook and re-open the green text should blink.

My comment was not intended to make you out to be dumb.......dumb is your word,
not mine.

It was intended only to prod you to read things a little more closely when you
are given instructions.

You and anyone else using the workbook are much better off without the annoyance
of blinking text, so abandoning the idea is a good decision.

Apologies for upsetting you.

I guess my people-skills are drifting away with the other wearing-out parts.


Gord



On Sun, 17 Feb 2008 10:17:12 +1300, Esra Dekan wrote:

If I didnt post things in the right location thnen it is purely
because I didnt understand what you are telling me to do.

Excuse me for being ignorant abouit it, its why I am asking for help,
coz I dont know.

I didnt even know an "immediate" window existed until a very recent
post of yours when you told me how to get to it so how could I have
posted all this stuff to the immediate window.

Also, I just posted to you, telling you where things are and I only
have one thing in immediate window in that post dont i?

Look, dont worry about it, its not life or death that I get this done,
I will just do without it.

And I resent your ciomment "Why would assume that when you were given
specific instructions to the contrary?", it was uncalled for. Dont
make people out to be dumb.

Esra




On Fri, 15 Feb 2008 13:21:44 -0800, Gord Dibben <gorddibbATshawDOTca
wrote:

Esra

Why would assume that when you were given specific instructions to the contrary?

Quoted directly from my second post........................

a) Copy these two macros to a general code module:
=================

Option Private Module
Public Sequence As Date
Sub StartBlinking()
Sequence = Now + TimeSerial(0, 0, 1)
Worksheets("MySheet").Range("B1").Calculate
Application.OnTime Sequence, "StartBlinking"
End Sub

Sub StopBlinking()
On Error Resume Next
Application.OnTime Sequence, "StartBlinking", Schedule:=False
End Sub

===================

b) Copy these two events to 'ThisWorkbook' code module:
===================

Private Sub Workbook_Open()
StartBlinking
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
StopBlinking
End Sub

End quote..................................

And the other instructions I gave was for you enter

Aplication.EnableEvents = True into the Immediate window.

Sounds like you placed your workbook_open code into the Immediate window.



Gord Dibben MS Excel MVP



On Sat, 16 Feb 2008 09:34:58 +1300, Esra Dekan wrote:

OK, (my mistake, I just assumed it went there)
that stops the compile error thing coming up and seems to be ok,
but text still doesnt blink in the requested cell.

Any ideas?

Esra


On Fri, 15 Feb 2008 10:47:53 -0600, Dave Peterson
wrote:

Under Sheet1 "General"

Isn't right.

If the code is behind a worksheet, then it's not in the right place.

Select your project in the VBE
Insert|Module
Paste the code in that newly opened window.
Delete the code from behind Sheet1.

Esra Dekan wrote:

Under ThisWorkbook

Private Sub Workbook_Open()
StartBlinking
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
StopBlinking
End Sub

Under Sheet1 "General"

Sub StartBlinking()
Sequence = Now + TimeSerial(0, 0, 1)
Worksheets("Sheet1").Range("x8").Calculate
Application.OnTime Sequence, "StartBlinking"
End Sub

Sub StopBlinking()
On Error Resume Next
Application.OnTime Sequence, "StartBlinking", Schedule:=False
End Sub

This in "immediate" window now

Application.EnableEvents = True

No other macros in workbook

HTH
Esra

On Thu, 14 Feb 2008 18:51:09 -0600, Dave Peterson
wrote:

It's time to post your macros.

What's Under the ThisWorkbook module?

What's under each (and every) general module?

Esra Dekan wrote:

Well, that doesnt work either.

I put it in there, then saved it, opened it up again, and it opened
the VBA with this error:

Compile Error:

Sub or Function not defined

Referring to this:

Private Sub Workbook_Open()
StartBlinking
End Sub

When I click off that error message, I check to see if the "immediate"
still contains that command, and although I saved it, it does not.

So, I put it back in, save again, and close the VBA and then save and
close the file, and get this message:

Compile Error:

Sub or Function not defined

Referring to this:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
StopBlinking
End Sub

So, got me stumped.
I just wont have the text blinking. It would of been nice, but not
going to all this trouble for that effect.

TY for all your help everyone.

Esra

On Thu, 14 Feb 2008 15:59:00 -0600, Dave Peterson
wrote:

Open the VBE and hit ctrl-g (or view|Immediate window)

Esra Dekan wrote:

Now I am even more confused. Im so dumb when it comes to a lot of
things in Excel.

Where is the "immediate" window in VBE?

Esra

On Thu, 07 Feb 2008 20:37:39 -0800, Gord Dibben <gorddibbATshawDOTca
wrote:

Other than send you another working copy of a workbook, I see nothing else to
help you.

Well........maybe try opening the Immediate Window from VBE and copy this in and
hit ENTER

Application.EnableEvents = True


Gord

On Fri, 08 Feb 2008 15:01:24 +1300, Esra Dekan wrote:

Yes, happens in the workbook you sent, and cell b1 is just green with
text in, not blinking.

All i get in MY workbook here, is the compile error thing. I dont
know enough to know what that even means.

The Private sub thing, I right clicked "this Workbook",,,and inserted
a module, pasted the Private Sub into there.

It must be something with my excelt surely, coz it happens on the book
you sent me,,,maybe?

:((

TIA

Esra



On Thu, 07 Feb 2008 10:06:54 -0800, Gord Dibben <gorddibbATshawDOTca
wrote:

Does this occur in the workbook I sent you?

If so, have you changed anything at all?

Was working fine when I emailed the workbook to you.

"asdfg" in B1 was blinking a green color.

I still have the original if you want it re-sent.


Gord Dibben MS Excel MVP

On Thu, 07 Feb 2008 19:26:44 +1300, Esra Dekan wrote:

Still not working,

When I open the file, it comes up saying "Compile Error. Sub or
Function Not Defined"

and goes to this macro

Private Sub Workbook_Open()
StartBlinking
End Sub

When closing does the same too, goes to the macro StopBlinking


Any help??

Esra




On Sun, 03 Feb 2008 11:46:17 -0800, Gord Dibben <gorddibbATshawDOTca
wrote:

Worked fine before I sent it to you.

Did you get a message about enabling macros when you opened the workbook I sent?

If not, your macro security is set too high and Excel automatically prevents
code from running and puts the workbook in the HelpAbout MS ExcelDisabled
Items.

Have a look there first and re-enable it then reset your security level.

ToolsOptionsSecurityMacro Security.

Set it to "Medium", OK out, then close out Excel and re-open.

Enable macros when you get the message about workbook contains macros.


Gord

On Mon, 04 Feb 2008 07:38:58 +1300, Esra Dekan wrote:

That doesnt work here either.

maybe something wrong with the program? Do I need an add=in or
something?


Esra


On Sat, 02 Feb 2008 20:10:42 -0800, Gord Dibben <gorddibbATshawDOTca
wrote:

Have sent one to you.


Gord

On Sun, 03 Feb 2008 16:18:45 +1300, Esra Dekan wrote:

Maybe by chance, could someone email me a workbook with a flashing
cell? and I should be able to work it out from there.

I just cant seem to get it for some reason.

My email address is in the message i think, minus the underscore.

I wouls appreciate it

Esra