[VB] flashing text * - Softwareontwikkeling

maandag 16 februari 2004 15:40

Acties:

Verwijderd

Topicstarter

De volgende code geeft de volgende foutmelding en ik kan maar niet vinden waarom:
The macro 'book1!Flash' Cannot Be Found

iemand een idee waarom en hoe ik dit kan verhelpen?

p.s. De fout komt voor uit regel 14: Application.OnTime NextTime, "Flash"
Deze regel geeft die foutmelding

code:

Dim NextTime As Date

Private Sub CommandButton1_Click()

Flash

End Sub

Sub Flash()
  NextTime = Now + TimeValue("00:00:01")
  With ActiveWorkbook.Styles("Flash").Font
    If .ColorIndex = 2 Then .ColorIndex = 3 Else .ColorIndex = 2
  End With
  Application.OnTime NextTime, "Flash"
End Sub

[ Voor 15% gewijzigd door Verwijderd op 16-02-2004 15:44 ]

maandag 16 februari 2004 15:57

Acties:

Maasluip

Kabbelend watertje

Als ik deze code zo gebruik (okee, je hoeft geen hint te geven dat het VBA in excel is) dan krijg ik een compile error: Expected Function or variable.
Als ik dan van Sub Flash een Function Flash maak loopt het niet vanwege een Runtime error '1004': Method 'OnTime' of object '_Application' failed.

Misschien weten we nog niet alle details?

[edit]Oh ja, en ik heb de aanroep van Application.OnTime veranderd in Call Application.OnTime(NextTime, Flash)

[ Voor 19% gewijzigd door Maasluip op 16-02-2004 15:58 ]

Signatures zijn voor boomers.

maandag 16 februari 2004 16:01

Acties:

Verwijderd

Topicstarter

Maasluip schreef op 16 februari 2004 @ 15:57:
Als ik deze code zo gebruik (okee, je hoeft geen hint te geven dat het VBA in excel is) dan krijg ik een compile error: Expected Function or variable.
Als ik dan van Sub Flash een Function Flash maak loopt het niet vanwege een Runtime error '1004': Method 'OnTime' of object '_Application' failed.

Misschien weten we nog niet alle details?

[edit]Oh ja, en ik heb de aanroep van Application.OnTime veranderd in Call Application.OnTime(NextTime, Flash)

Jawel. Die meldingen krijg ik allemaal niet
Ik krijg alleen de melding dat de macro niet gevonden kan worden

Ik heb deze code van het internet met een pdf. Waarin ook staat hoe je de style aanmaakt. maar verder staan er geen stappen bij dus dacht dathet zo wel moest werken