cel verplicht invullen voor opslaan

[bta]

ik heb een formulier dat door verschillende collega's moet worden
ingevuld. ze vergeten echter vaak hun naam in te vullen. is het
mogelijk een cel verplicht te laten invullen met de naam voordat het
bestand kan worden opgeslagen.
graag jullie gewaardeerde aandacht, waarvoor hartelijk dank.
bta

[René]

Misschien een nog betere oplossing is dat de naam van de gebruiker
automatisch wordt gevuld adhv het logon-id:

Zet in "This Workbook" de code:

Private Sub Workbook_Open()
Dim Naam As String
Naam = Environ("username")
Range("A1").Value = Naam
End Sub

(naam van de gebruiker wordt automatisch gevuld in veld A1)

Groeten,
René.

[bta]

dank voor het meedenken, maar gebruikers kunnen document ook thuis
maken. dus als het mogelijk is een cel verplicht laten invullen.
dank
bta

[René]

Dan kun je inderdaad beter deze gebruiken -->

Zet in "This Workbook" de code:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
If Range("A1").Value = "" Then
MsgBox ("Voor opslaan eerst je naam invullen in cel A1.")
End If
End Sub

Groeten,
René.

[TRexx]

Hoe kan ik ervoor zorgen dat de volgende cel A2 ook gevalideerd wordt als A1
is ingevuld ?
De validatie moet als het ware iedere keer een regel verspringen.

groeten,

[René]

Kijk maar even of je hier iets mee kan:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)

Dim Rij As Integer

If Range("A1").Value = "" Then
MsgBox ("Voor opslaan eerst je naam invullen in cel A1.")
End If

For Rij = 2 To 100
If Cells(Rij - 1, 1).Value <> "" And Cells(Rij, 1).Value = ""
Then
MsgBox ("Cel A" & Rij & " moet nog gevuld worden.")
End If
Next Rij
End Sub

Als het alleen om de validatie van cel A2 gaat, dan 100 veranderen in
3. Mocht je daarna nog A4, A5, etc. willen valideren dan dit getal
steeds met 1 ophogen.

Groeten,
René.

[tim.b...@gmail.com]

Op vrijdag 14 maart 2008 11:41:38 UTC+1 schreef René:

Hey Rene,

Het is een tijd geleden, maar kunt u mij vertellen hoe u deze code van kolom kunt veranderen? ik krijg het niet voor elkaar. Ook al geeft de prompt aan dat F2 nog ingevuld moet worden, pas als ik A2 invul gaat hij naar de volgende cel.

Met vriendelijke groet,

Tim

[tim.b...@gmail.com]

Op dinsdag 9 januari 2018 14:11:04 UTC+1 schreef tim.b...@gmail.com:

Opgelost. De 1 na de komma veranderd naar een ander cijfer corresponderend met een kolomnummer zet de code op de betreffende kolom.