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

Gegevens validatie en formules

Status
Niet open voor verdere reacties.

bartspar

Gebruiker
Lid geworden
15 aug 2010
Berichten
13
Hallo Allemaal,

Ik heb het volgende probleempje:

Ik wil door gebruik te maken van gegevens validatie een formule kopieren, dat zal ik komt uitleggen.

Ik heb de formule =PRODUCT(A3;B3) en deze formule staat in C3
Cel C3 heeft de naam test geregen.

Vervolgens zou door gebruik te maken van gegevensvalidatie in cel C6 de uitkomst van C4*C5 moeten komen op voorwaarde dat C5 de tekst test bevat (dat is de naam van cel C3) omdat hij de formule uit C3 naar C6 door kopieerd.
En dus zou de uitkomst 12 moeten zijn.

Wie kan mij hiermee verder helpen

Zie bijlage

Groetjes Bart
 

Bijlagen

Bartspar

Zo iets ?

Code:
=ALS(C5="test";PRODUCT(A6;B6);)
 
Bartspar

Bedankt voor je reactie

Dit leverd zeker het gewenste eindresultaat op maar het probleem is dat die cel ook voor tekst moet worden gebruikt.
Het gaat om een keuzelijst waar soms een berekening in moet.

Zou ik gegevens validatie en een formule kunnen toepassen?

Groeten Bart
 
Bedoel je het wellicht zo?

Code:
=INDIRECT(C5)

Met vriendelijke groet,


Roncancio

Als je bij validatiecriterium lijst kiest werkt dat perfect.
Het probleem is nu juist dat ik aangepast kies in de hoop dat excel dan ipv een lijst een formule overneemt.
En dan wil helaas niet lukken.
 
Ik vind het allemaal maar wat onduidelijk in je eerste post, maar ik doe maar een poging.
 

Bijlagen

Ik vind het allemaal maar wat onduidelijk in je eerste post, maar ik doe maar een poging.

Das precies wat ik bedoel!

Ik kan geen macro's schrijven maar kopieren moet wel lukken.

Hartelijk bedankt
 
Ik vind het allemaal maar wat onduidelijk in je eerste post, maar ik doe maar een poging.

Hoi Harry,

Nu loop ik tegen het volgende probleem aan.

Ik wil jouw oplossing in een registratielijst verwerken en die heeft 1000+ regels.
Door knippen en plakken schuift de macro helaas niet mee.
Mijn vraag is dus hoe kan je die macro aanpassen zodat hij het volgende doet:

Overal waar in kolom C "test" voorkomt gaat excel in de cel eronder de berekening Ax * Bx uitvoeren.

Alvast bedankt voor je hulp.

Groetjes Bart
 
Test welke het geschikst is Bart.

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Column = 3 And Target.Value = "test" Then Target.Offset(1) = "=RC1*RC2"
End Sub
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
 Application.EnableEvents = False
   Dim c
     For Each c In Range("C1:C1000")
      If c = "test" Then c.Offset(1) = "=RC1*RC2"
    Next
  Application.EnableEvents = True
End Sub
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Dim i
   For i = 1 To 1000
      With Cells(i, 3)
        If .Value = "test" Then Cells(i, 3).Offset(1) = "=RC1*RC2"
     End With
    Next i
  Application.EnableEvents = True
End Sub
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan