macro's uit te voeren bij opstarten van het programma

[LisaAlberta]

Hoi,

ik zit al een tijdje te puzzelen en ik kom er niet uit.
Ik wil bij het openen van een bestand de volgende macro uit laten voeren, iedere keer als het bestand geopend wordt moet dit automatisch gedaan worden.

Public DatumVandaag As Date
Public RegelsVandaag As Integer

Sub Vandaag()


Sheets("anders").Select
DatumVandaag = Range("B19").Value
'MsgBox DatumVandaag
RegelsVandaag = Range("C19").Value
'MsgBox RegelsVandaag
End Sub

Waar en hoe moet ik dat neerzetten? Ik krijg het niet voor elkaar...

alvast heel erg bedankt!
Lisa

 

[LisaAlberta]

verder wil ik RegelsVandaag en Datumvandaag gebruiken in macro's in module 1.

 

[bullenpees]

Hoi,

Volgens mij ga je als volgt tewerk.
* Ga, in het lind, naar Tabblad Ontwikkelaars (als die er niet is, dan bij opties aanzetten).
* Kies voor de VBA editor (links op de balk)
Links in het beeldscherm staat [VBA Project (naam document)]
* Dubbel klik op [This Workbook] (Nieuw venster verschijnt met bovenin twee keer een Pull down menu).
* Het linker menu zet je op [Workbook]
* Het rechter menu zet je op [open]

Standaard verschijn het volgende:

Private Sub Workbook_Open()

End Sub

Tussen deze twee regels zet je dan je macro.

Tip: onderzoek de mogelijkheden van dit scherm. Er is veel te bedenken wat je hier allemaal zou kunnen regelen.


Succes.

Grtjs BP

 

[LisaAlberta]

Hoi BP,

als ik dat doe op de volgende manier
Private Sub Workbook_Open()

Public DatumVandaag As Date
Public RegelsVandaag As Integer

Sheets("anders").Select
DatumVandaag = Range("B19").Value
MsgBox DatumVandaag
RegelsVandaag = Range("C19").Value
MsgBox RegelsVandaag
End Sub

dan krijg ik de volgende melding "Ongeldig kenmerk in Sub of Function" waarbij PUBLIC dan mooi geel gemaakt is.
Als ik daar Global van maak, dan wordt ie boos, dat dat niet kan.

:/

groetjes Lisa

 

[bullenpees]

Hoi,

Helaas kan ik je met het laten werken van je macro weignig helpen.
Echter je zit wel op de goede plek om macro's bij het opstarten van het document te laten werken.
Er zijn veel forumleden die je waarschijnlijk goed kunnen helpen. Als je ook aangeeft wat je precies met de macro's wil.

Succes
BP.

 

[snb]

We hebben ook een macro subforum (VBA).....

Sub Workbook_open()
  sn=Sheets("anders").Range("B19:C19")
  msgbox sn(1,1)
  msgbox sn(1,2)
End Sub

Maar wat moet er met die ingelezen gegevens gebeuren ??

In module 1 kun je bovenaan het volgende zetten:

Public sn

 

[LisaAlberta]

dat is t m dus...
wel de macro opnemen in thisworkbook
maar de declaratie van de variabelen in de module!
thx, het werkt als een trein

Lisa