Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: Vervolg combinatie formule en VBA in exel  (gelezen 5409 keer)

0 leden en 1 gast bekijken dit topic.

Offline flipper52

  • Ervaren lid
  • ***
  • Berichten: 297
  • Geslacht: Man
Vervolg combinatie formule en VBA in exel
« Gepost op: 17 november 2008, 21:36:12 »
Hallo, iedereen

In het bijhorend bestand staat een kalender die met behulp van VBA geopent wordt in de huidige datum.
rechts van de kalender zie je een keuzevak waarin de huidige datum staat (dag(letters),dag (cijfers)en maand).
Mijn vraag nu is,als ik een maand kies in de kalender zou ik graag met behulp van VBA de eerste dag van deze maand zien in dit keuzevak( deze data staan in kolom "AH")en daarna ook een andere datum kunnen kiezen in dit keuzevak.
Hopelijk ben ik een beetje duidelijk.

Wie kan of wil mij helpen ?

Groetjes, Rudy

Standaard emailprogramma: Microsoft Outlook 2010
Standaard Operating System: Windows 7 Home 64-bits
Standaard Browser:Internet Explorer 9
Microsoft Office 2010

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.284
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: Vervolg combinatie formule en VBA in exel
« Reactie #1 Gepost op: 17 november 2008, 22:42:46 »
Flipper52, zet deze 2 blokjes in de Sheetmodule van 'Blad1'...
Sub Keuzevak()

    Range("K2").Value = DateSerial(Range("G3").Value, Range("E3").Value, 1)

End Sub

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Address(False, False) = "G3" Then
        Range("K2").Value = DateSerial(Range("G3").Value, Range("E3").Value, 1)
    End If

End Sub
...en voortaan reageert je samengestelde cel K2 op elke verandering van de maand of het jaar.

Groet, Leo

EDIT: Je moet trouwens wel ff je Dropdown control verbinden aan de macro 'Keuzevak' (anders werkt 't nog niet)

EDIT2: Misschien heb je nog iets aan dit voorbeeld dat ik ooit heb gemaakt...
______________________________

Groet, Leo

Offline flipper52

  • Ervaren lid
  • ***
  • Berichten: 297
  • Geslacht: Man
Re: Vervolg combinatie formule en VBA in exel
« Reactie #2 Gepost op: 17 november 2008, 23:05:42 »
Hallo, Leo

Bedankt voor de snelle reactie.
Maar sorry, ik heb toch twee vragen, ik ben trouwens een leek in VBA.
wat bedoel je met

1) Sheetmodule van 'Blad1'

2)  Je moet trouwens wel ff je Dropdown control verbinden aan de macro 'Keuzevak'

kan je dit vertalen in verstaanbare taal A.U.B.

Groetjes,Rudy
Standaard emailprogramma: Microsoft Outlook 2010
Standaard Operating System: Windows 7 Home 64-bits
Standaard Browser:Internet Explorer 9
Microsoft Office 2010

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.284
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: Vervolg combinatie formule en VBA in exel
« Reactie #3 Gepost op: 18 november 2008, 07:25:23 »
Citaat van: Flipper52
ik ben trouwens een leek in VBA.
DAN leg ik 't toch gewoon ff uit (leer je er ook nog van ;))

Stap1: Klik met je rechtermuisknop op de tab van het blad waar je je kalendertje hebt staan. In het popup-menu kan je dan kiezen voor 'View Code' (? bekijk code). Als je daarop klikt, opent de VBA-editor (= de 'VBE'). Je komt dan rechtstreeks terecht in de Sheetmodule (je hebt namelijk ook nog een ThisWorkbook module die je gebruikt voor het hele workbook. Of je kan een algemene module aanmaken (en eventueel kan je nog verder maar dat gaat nu te ver!)). Plak daar de 2 codeblokjes. Sluit de VBE door op het kruisje te klikken (je bent nu weer terug in je sheet).
Stap2: Klik met je rechtermuisknop op je Dropdown control. Dat is dat boxje waarin je de maanden aangeeft. Kijk ook maar 'ns in de NameBox (links in de hoek bij de formulebalk daar waar je standaard het celadres ziet verschijnen). Daar zie je dan de naam 'Drop Down 2' staan. Je Dropdown staat nu met van die witte bolletjes geselecteerd en een popupmenu is zichtbaar. Kies daar voor 'Assign Macro...' (? verbind macro). In het verschenen venstertje zie je diverse macro's staan (wellicht wat meer als je de onderste optie op 'All Workbooks' hebt staan). Kies daar voor de macro met de naam 'Keuzevak' (gewoon dubbelklikken op de naam). Het venstertje wordt gesloten en de macro is voortaan actief als je een andere maand kiest.

Kom je zo weer verder? Succes.

Groet, Leo
______________________________

Groet, Leo

Offline flipper52

  • Ervaren lid
  • ***
  • Berichten: 297
  • Geslacht: Man
Re: Vervolg combinatie formule en VBA in exel
« Reactie #4 Gepost op: 18 november 2008, 11:01:29 »
hallo, Leo

Bedankt voor de uitgebreide uitleg, nu begrijp ik het al veel beter.
Het werkt precies zoals ik het in gedachte had.
Mijn doel is een agenda te maken met verjaardagen, afspraken en feestdagen.

NOGMAALS BEDANKT !!!

Groetjes, Rudy
Standaard emailprogramma: Microsoft Outlook 2010
Standaard Operating System: Windows 7 Home 64-bits
Standaard Browser:Internet Explorer 9
Microsoft Office 2010

Offline firmin

  • Ervaren lid
  • ***
  • Berichten: 442
  • Geslacht: Man
  • Excel Specialist
Re: Vervolg combinatie formule en VBA in exel
« Reactie #5 Gepost op: 18 november 2008, 14:53:35 »
Rudy,
Enkel maar als voorbeeld bedoeld, de agenda die ik voor
mij heb gemaakt.
Op het blad SETUP --> selecteer een jaartal in de dropdown list,  klik op de knop kalender maken en daarna op de knop SETUP.
Bewaar het bestand op je harde schijf, open het en selecteer het blad 'Blanco maand'.
Ga naar de kolom AE en AF (groen)
vanaf AE4 wijzig je de datums, dat zijn de verjaardagen.
OPGEPAST want dat is een formule "=DATE(year;3;22)"
verander alleen de 3 = maand en 22 = dag.
Zet (wijzig) in kolom AF de naam.
Bewaar (save) het bestand.
Om de kalender te maken : blad SETUP --> jaar kiezen,
klik op knop kalender maken, klik op knop SETUP.
OPGEPAST Bewaar nu de kalender met een nieuwe naam. bijvoorbeeld 'kalender 2009', het is de bedoeling om het bestand 'kalender' als blanco begin te houden.

Firmin
PB easynote LE69KB,AMD quad-core,1000GB HDD,AMD Radeon HD8330,8GB DDR3
Windows 10,office 2007
MSE, Internet Explorer 11

Offline flipper52

  • Ervaren lid
  • ***
  • Berichten: 297
  • Geslacht: Man
Re: Vervolg combinatie formule en VBA in exel
« Reactie #6 Gepost op: 18 november 2008, 17:07:55 »
Hallo, Firmin

Dit is wat ik tot hiertoe gemaakt had.
Standaard emailprogramma: Microsoft Outlook 2010
Standaard Operating System: Windows 7 Home 64-bits
Standaard Browser:Internet Explorer 9
Microsoft Office 2010

Offline firmin

  • Ervaren lid
  • ***
  • Berichten: 442
  • Geslacht: Man
  • Excel Specialist
Re: Vervolg combinatie formule en VBA in exel
« Reactie #7 Gepost op: 19 november 2008, 14:29:42 »
Dat is toch perfect !

Firmin
PB easynote LE69KB,AMD quad-core,1000GB HDD,AMD Radeon HD8330,8GB DDR3
Windows 10,office 2007
MSE, Internet Explorer 11

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.284
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: Vervolg combinatie formule en VBA in exel
« Reactie #8 Gepost op: 19 november 2008, 18:48:19 »
Citaat van: Firmin
OPGEPAST Bewaar nu de kalender met een nieuwe naam. bijvoorbeeld 'kalender 2009', het is de bedoeling om het bestand 'kalender' als blanco begin te houden.
Klein tipje van mijn kant hierover.... Als je niet wilt dat een gebruiker je 'standaard bestand' kan overschrijven, kan je 't beste dat bestand als ReadOnly opslaan. Dit doe je via de explorer (verkenner). Zoek het bestand op en klik daarop met rechts. In het popup menu kies je voor Properties (eigenschappen). In het dan geopende venster zet je een vinkje bij Read Only (alleen lezen). Sluit af met OK.
In het vervolg kan dit bestand alleen onder een andere naam worden opgeslagen en is dus veilig voor overschrijven.

Groet, Leo
______________________________

Groet, Leo

 


www.combell.com