VBA uitvoer waarde TB_801

Status
Niet open voor verdere reacties.
B

Bosswilly

Gebruiker
Lid geworden
28 mrt 2016
Berichten
110
Goededag,

Ik ben al een heel end, maar mis nog net de finishing touch.

Wie kan mij helpen met het volgende, nl

Ik heb de gegevens ingevuld en wil de waarde TB_801 (Over) invullen in de label van de kleding op de plek, waar eerst dit bedrag stond.

Hoe doe ik dit?

Alvast bedankt.

Bosswilly
 

Bijlagen

  • Test.xlsm
    47,5 KB · Weergaven: 27
Hierin moet het geplaatst worden?
Code: 
Sheets("Verborgen map").ListObjects("tabel21").DataBodyRange(C_403.ListIndex + 1, 4) = TB_801.Value
 
Hartelijk dank HSV.

Dit is hem.

Ik zie nu wat ik fout gedaan heb.

Nogmaals dank hiervoor.
 
Als ik verder uitbreid met nieuwe tabellen tbv spaardoelen, dan werkt dit niet op een ander spaardoel.

Heb dan netjes de knoppen en de tabellen hernummerd.

Waar zou dit kunnen liggen?
 
Geen idee natuurlijk, ik zie de uitbreiding niet.
 
Code: 
Private Sub CB_901_Click()
  If C_403.ListIndex > -1 Then [tabel21].Cells(C_403.ListIndex + 1, 4) = TB_801.Value
End Sub
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan