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

Dubbele sub onder 1 knop afhankelijk van waarde cel

Status
Niet open voor verdere reacties.

Developer

Gebruiker
Lid geworden
21 sep 2013
Berichten
103
Goede dag allemaal,

Ben druk bezig om een nogal gecompliceerde sheet in elkaar te draaien.
Om nou het aantal knoppen op de heet te beperken ben ik nieuwsgierig of het mogelijk is om aan de hand van een bepaalde waarde in een cel, de sub die geactiveerd wordt door de knop te doen veranderen ...

Met andere worden ..

Cel B4 kan als waarde hebben (drop down menuutje) of Nieuw of Wijzigen ... Ik heb 1 knop en daar wil ik dan 2 subs aan vast plakken. Afhankelijk van de waarde van cel B4 wordt of te wel de 1e bewerking gedaan of de 2e

Kan iemand mij vertellen of dit überhaupt mogelijk is, en zo ja, hoe je dit zou kunnen realiseren ?

Alvast bedankt voor jullie feedback

Developer
 
beste

zoiets (uit mijn hoofd)

Code:
Sub test()

If Range("B4").Value = "Wijzigen" Then
    Call macronaam1
ElseIf Range("B4").Value = "Nieuw" Then
    Call macronaam2
End If

End Sub

Sub macronaam1()
    MsgBox "macronaam1 aangeroepen"
End Sub

Sub macronaam2()
    MsgBox "macronaam2 aangeroepen"
End Sub

grt.
Demeter
 
Laatst bewerkt:
Demeter,

Dank je voor je feedback. Dacht al wel dat het mogelijk zou zijn.
Ga het even proberen ..

Developer
 
Zou het ook zo kunnen?
Code:
Sub test()
If Range("B4").Value = "Wijzigen" Then
    Call macronaam1
Else
    Call macronaam2
End If
End Sub
 
Laatst bewerkt:
EA,

Die zou inderdaad moeten werken
Ligt natuurlijk volledig aan hoe de input is afgebakend en in hoeverre dit een onderdeel van een geheel gaat worden.
Je kan eventueel ook nog een case functie nemen als er meerdere mogelijkheden zijn.


grt.
Demeter
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan