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

Simpele VBA-vraag over validatie in macro

Status
Niet open voor verdere reacties.

tomswaelen

Gebruiker
Lid geworden
8 dec 2004
Berichten
349
Ik heb een Excel waar een zelf gemaakte print-knop achter zit, via macro. Die ziet er zo uit:

Code:
Sub Afdrukken()
'
' Afdrukken Macro
'

'
    ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1
End Sub

Nu zou ik hier nog willen inbouwen dat deze print-knop niet werkt, wanneer een bepaalde cel (laat ons zeggen A1) de waarde 'Nee' bevat. Als deze 'Ja' bevat, mag gewoon geprint worden. Als er 'Nee' staat, mag er een foutboodschap weergegeven worden.

Of is dit toch moeilijker dan het klinkt? :) Ik ken dus heel weinig van VBA en macro's en zo...

Die validatiecel (A1) bevat wel een formule (Ja/Nee is de uitkomst van een formule). Maakt dat uit?
 
Ik zal het eens proberen :) Ik zou ook wel graag vooraf een melding (Msgbox) laten verschijnen, met de melding dat er niet geprint kan worden omdat de validatie niet klopt. Hoe doe ik dat?
 
Test dit eens.
Code:
Sub Afdrukken()
'
' Afdrukken Macro
If Range("A1").Value = "Nee" Then
  MsgBox "Er kan niet geprint worden omdat de validatie niet klopt"
  Exit Sub
End If

    ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1
End Sub
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.

Nieuwste berichten

Terug
Bovenaan Onderaan