Cel veranderen volgen andere cellen automatisch

[Svenne81]

Hi allemaal,

Ik ben bezig met een orderformulier en is bijna af.
Alleen er is ding waar ik me nog aan irriteer, en weet niet of het op te lossen is.

Je hebt bijv. bij model schoenen 3 keuzes, aan deze cel zit nummer gekoppeld en aan het nummer is weer de maat gekoppeld.
Is het mogelijk dat als je het model schoen veranderd dat dan het nummer en maat automatisch leeg worden?

Ps mocht je een password nodig hebben voor de hide(tabbladen) met het Macro te openen is dat Svenne

Alvast bedankt

Svenne

 

[robdgr]

Svenne,

Zips doen hier moeilijk: beschadigd. Kun je rarren?

 

[Svenne81]

Hier pakt hij nu wel mijn bestand (zit net tegen het limiet aan)

 

[Roncancio]

Onderstaande code wordt geactiveerd indien:

- er een wijziging plaatsvindt in de C-kolom
- De kleur van de cel grijs is.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 And Target.Interior.ColorIndex = 15 Then
    Range("D" & Target.Row & ":R" & Target.Row).Value = ""
End If
End Sub

De macro verwijdert de gegevens op dezelfde regel t/m de R-kolom.

Met vriendelijke groet,


Roncancio

 

[Svenne81]

Bedankt!!

 

[Svenne81]

Hoi,


ik heb je code in VB gekopieerd. En dan ij de sheet[orderform]
Hij werkt dan perfect, totdat ik dus de sheet wil gaan beveiligen dan springt hij op error

groeten
Svenne

 

[HierEnNu]

Svenne,

Als je het spreadsheet gaat beveiligen maak dan gebruik van de optie:
UserInterfaceOnly

Onderstaand een voorbeeld (de VBA-code van dit voorbeeld wordt geplaatst in This Workbook):

Private Sub Workbook_Open()
Dim wSheet As Worksheet
Application.ScreenUpdating = False
    For Each wSheet In Worksheets
        wSheet.Protect Password:="Geheim", _
            UserInterFaceOnly:=True
Next wSheet
Application.ScreenUpdating = True
End sub

Je spreadsheet is dan wel beveiligd, maar de macro's blijven werken.

Groeten,

M.

 

[Svenne81]

Begin me blond te voelen geloof ik...:-(

Ik krijg het niet voor elkaar!

groeten
Svenne

 

[Roncancio]

Zet de code van HierenNu in ThisWorkbook.

Dat vind je via Extra - Macro - Visual Basic Editor
Vervolgens Beeld - Projectverkenner.
(zie bijlage)

Met vriendelijke groet,


Roncancio

 

[Svenne81]

Bedankt!
Ik had hem inderdaad verkeerd ingevoegd.

groeten
Svenne