checkbox koppelen aan textbox

[rontermaat]

Hallo lieve mensen

ik heb een bestan daarin ben ik mijn maandelijks uitgave aan het bijhouden.
Nu heb ik daarin een userform gemaakt

met de maanden (checkbox)
de benaming van de uitgave (textbox) Kolom B
en de kosten (textbox)

nu wil ik graag dat als de kosten 50 euro zijn en de kosten per kwartaal terug komen dat je dan
de checkbox jan april juli Oktober aanvink en dat dan in de eerste lege rij de benaming komt te staan en bij de maanden dan het geld bedrag

zie bijlage

alvast weer ontzettend bedankt

 

[rontermaat]

Is er niemand die mij hier mee kan helpen

al is het alleen maar het begin

 

[rontermaat]

Jammer dat neimand mij hiermee kan helpen
bij de vorige vragen werd ik altijd keurig geholpen

 

[Roncancio]

Ik kan hier geen .RAR bestanden openen.
Is het bestand te groot om zo geplaatst te worden? Kan je het eventueel zippen?

Met vriendelijke groet,


Roncancio

 

[rontermaat]

Kijk roncancio

ik kon geen excel met macro's plaatsen dus vandaar dat ik hem had ingepakt. nu heb ik hem converteerd.

Als je mij een opzetje kan geven dan kan ik hem zelf afmaken alvast ontzettend bedankt.

groet Ron

 

[Noord2011]

Rontermaat,

Ik heb een kleine opzet gemaakt.

Het ziet wel lastig / uitdaging uit,, misschien ga ik verder mee knutselen!

Mv/Gr.

 

[Roncancio]

Ik heb de code aangepast.
Het ingevoerde bedrag wordt bij de aangevinkte maanden geplaatst op de regel van de geselecteerde kostenpost.

Met vriendelijke groet,


Roncancio

 

[rontermaat]

Jullie zijn al weer goed bezig geweest echt top.

Nu wilde ik alleen graag dat als je een nieuwe uitgave heb dat je die kan invoeren en dat hij dan gewoon onderop er bij komt te staan.

Nu had ik in een eerder bestand ook zoiets gebruikt maar vraag me dan af of je dat hier dan ook toe kan passen.

Deze had ik eerst gebruikt:

iRow = ws.Cells(Rows.Count, 1) _
           .End(xlUp).Offset(1, 0).Row

En dan was ik ook bezig met de inkomsten 2e tabblad in het userform maar ik kan in de programma code niet terug vinden waar staat welk tabblad gebruikt word.

IK hoop dat jullie mij weer kunnen helpen.

Groet Ronnie

 

[Jack Nouws]

Hallo,

Hier een kleine bijdrage van mijn kant.

Met vr gr
Jack

 

[rontermaat]

Hoi Jack en alle andere hulp

Wat fijn dat je me helpt.
Helemaal top wat je hebt gedaan. Nog een vraag en dan is ie wat mij betreft helemaal goed.
Nu zou ik als ik een nieuw inkomen zou hebben bijvoorbeeld een Belasting meevaller.
Die ook graag in willen voeren in de textbox van Naam inkomen, Wat nu het geval is dat een fout melding geeft als ik dat doe omdat hij alleen de dingen herkent die al in de lijst staan.(ook fijn dat je die lijst heb natuurlijk. Maar het zou makkelijk zijn als het allebij kan.

Dit zou dan natuurlijk ook moeten werken bij uitgaven..
En als je hem dan gemaakt hebt zou ie de eerste lege regel op moeten zoeken in het vak inkomen/uitgave natuurlijk.

Nou ik hoop dat dat kan.

Met vriendelijke groet Ron Termaat

 

[Jack Nouws]

Hallo,

Is dit wat je wilt?

Met vr gr
Jack

 

[rontermaat]

helemaal top Jack

B edankt ik zet mijn vraag als opgelost.

 

[rontermaat]

toch nog even een klein vraagje

ik had laatst al gevraagd en toen had trucker daar gelijk op gerageerd alleen ik krijg hem niet aan de praat.

ik wil graag dat waar de x jes in gevuld moeten worden dat als je daar op klik/dubbelklikt dat je dan het kruisje krijgt of niet

hij had toen dit gestuurd

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

ActiveCell.Formula = "x"

End Sub

of

Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
With ActiveCell
.Formula = "x"
End With
End Sub

alleen ik krijg hem niet aan de praat
kan iemand mij hierbij helpen.

 

[Roncancio]

En zo?

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
With ActiveCell
    If .Value = "x" Then .Value = "" Else .Value = "x"
End With
End Sub

Met vriendelijke groet,


Roncancio

 

[rontermaat]

Jullie zijn de beste

dank je wel

 

[Roncancio]

Jullie zijn de beste

dank je wel

Graag nog even de vraag op opgelost zetten (rechts onderaan op de pagina).
Bvd.

Met vriendelijke groet,


Roncancio