• 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.

Wijzigen naar het invullen in het userform!!

Status
Niet open voor verdere reacties.

dorlando

Gebruiker
Lid geworden
9 feb 2009
Berichten
66
Vraagje,

Naar het oproepen van het Userform1,worden de gegevens getransformeerd via een keuzelijstje naar sheet I2.1 en opgeslagen!!
Als ik daarna bepaalde gegevens nog wilt wijzigen op blad I2.1 en ik wilt dat via de blad Userform1 doen,worden alle gegevens overschreven en dat wilt ik juist niet.
Weet iemand hoe ik dit voor elkaar krijgt,zodat alleen bepaalde gegevens worden overgeschreven??


Gr,dorlando
 
Laatst bewerkt:
Wat kunnen wij hier nu mee ????
Dit is enkel code om werkbladen zichtbaar of onzichtbaar te maken.
 
Opgelost!!!!

Private Sub CommandButton1_Click()

Dim iRow As Long
Dim ws As Worksheet
Set ws = Worksheets("i2.1")
Unload Me ..................................................gewijzigt to Me.Hide


ws.Range("K12").Value = Me.Tijden.Value
ws.Range("K13").Value = Me.ComboBox20.Value
ws.Range("K18").Value = Me.ComboBox22.Value
ws.Range("K19").Value = Me.ComboBox2.Value
ws.Range("k20").Value = Me.ComboBox3.Value
ws.Range("k21").Value = Me.ComboBox23.Value
ws.Range("k22").Value = Me.ComboBox7.Value
ws.Range("k23").Value = Me.ComboBox4.Value
ws.Range("k24").Value = Me.ComboBox5.Value
ws.Range("k25").Value = Me.ComboBox6.Value
ws.Range("J27").Value = Me.ComboBox9.Value
ws.Range("K28").Value = Me.ComboBox21.Value
ws.Range("K29").Value = Me.ComboBox11.Value
ws.Range("K30").Value = Me.ComboBox12.Value
ws.Range("K31").Value = Me.ComboBox13.Value
ws.Range("K32").Value = Me.ComboBox14.Value
ws.Range("K45").Value = Me.ComboBox16.Value
ws.Range("K46").Value = Me.ComboBox17.Value
ws.Range("K47").Value = Me.ComboBox18.Value
ws.Range("K48").Value = Me.ComboBox19.Value

End Sub
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan