VBA Code automatisch

[thst]

Hallo Allemaal,

Ik heb een vba code gemaakt met een button om hem op te starten.
Er moeten 5 cellen ingevuld worden E4 t/m E9 dan moet de code gaan werken.

Weet iemand of ik dit ook automatisch kan laten werken ?

Angela

 

[MJONK]

er zijn verschillende mogelijkheden om een macro te starten.

Hiervoor moet je de macro plaatsen in : This worksheet.

Bovenaan kun je hem dan aan een gebeurtenis koppelen.

bijvoorbeeld:

Private Sub Workbook_Open()

End Sub

of

Private Sub Workbook_SheetActivate(ByVal Sh As Object)

End Sub

 

[Warme bakkertje]

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, [E4:E9]) Is Nothing Then
        If WorksheetFunction.CountA([E4:E9]) = 6 Then
            'plaats hier je code ......
        End If
    End If
End Sub

 

[thst]

Beste Warm bakkertje,

Volgens mij doe ik iets verkeerd want de code doet niets.

Wat heb ik gedaan?

Heb de code geknipt en in ThisWorkbook geplaatst, daarna heb ik jouw code bovenin en onderin geplaatst.

Ben ik nog wat vergeten ?

Angela

 

[Warme bakkertje]

De code hoort niet in ThisWorkbook, maar in de bladmodule waarop deze bewerking betrekking heeft.

 

[thst]

ehm.. krijg nu een error melding op End Sub

 

[Hoornvan]

Staat er nu zeker 2x End sub?

 

[thst]

nee, 2x end if en 1x end sub
wil de code ook niet op helpmij zetten i.v.m. gevoelige info

 

[Warme bakkertje]

Tja, dan zal je het zelf moeten uitzoeken want helderziendheid is niet onze specialiteit

 

[thst]

Heb gisteren avond het een en ander geprobeerd maar kom er nit uit.
Zodra in cellen E5 tot en met E9 iets veranderd wordt zou de cod moetn werken.
Maar krijg een error

Angela

 

[Jack Nouws]

Heb gisteren avond het een en ander geprobeerd maar kom er nit uit.
Zodra in cellen E5 tot en met E9 iets veranderd wordt zou de cod moetn werken.
Maar krijg een error

Angela

Hallo,

Ik heb je code laten draaien en ik miste een End If onder in je code.
Ik heb deze toegevoegd en volgens mij werkt het nu.

Met vr gr
Jack

 

[Warme bakkertje]

Daarom is het ook aangewezen om je code trapsgewijs te schrijven zodat je elk blok afzonderlijk analiseren.

 

[thst]

Ik zal met het schrijven van de code daar rekening mee houden.
Alhoewel het niet altijd zal meevallen.

Maar dit had ik zelf ook moeten zien.
In ieder geval allemaal hartelijk dank voor de oplossing en tips.

Angela