• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Opgelost Getoonde veld in userform variabel maken

Dit topic is als opgelost gemarkeerd

rob91

Gebruiker
Lid geworden
10 okt 2008
Berichten
195
Hallo,
Ik heb zelf een huishoudboekje gemaakt waar ik alle mijn maandelijkse/dagelijkse uitgaven bijhoud en ook mijn banksaldo zodat te zien is of ik binnen budget blijf.
Bij het openen van mijn bestand verschijnt een userform met het laatste banksaldo, die ik daar kan actualiseren.
Ik zou graag willen weten hoe ik het voor elkaar krijg dat het getoonde veld in mijn userform afhankelijk wordt van de huidige maand; dus nu is het augustus en moet dus eigenlijk het saldo uit de kolom aug getoond worden op het totaalblad; nu pas ik dit iedere maand in de code aan.
Wie kan mij aangeven hoe ik dit moet doen?
Alvast bedankt.
Rob
 

Bijlagen

Code:
Private Sub UserForm_Initialize()
TextBox1.SetFocus
With Sheets("Totaaloverzicht 2025")
  TextBox1.Value = .Cells(14, Application.Match(Format(Date, "mmm"), .Rows(13), 0)).Text
End With
End Sub
 
Hallo HSV,
Erg bedankt voor je oplossing.
Userform toont dan inderdaad de waarde uit de juiste maand.
Maar als ik deze waarde wijzig wordt deze niet in de juiste cel weggeschreven omdat ik daar nog vaste celwaarden aangeef.
Wat moet er daar in de code komen te staan om dit in de goede cel te krijgen?
Alvast bedankt.
Rob
 
De vorige code andersom schrijven
Code:
Private Sub CommandButton1_Click()
   With Sheets("Totaaloverzicht 2025")
     .Cells(14, Application.Match(Format(Date, "mmm"), .Rows(13), 0)) = TextBox1.Value
   End With
End Sub
 
Terug
Bovenaan Onderaan