Numéro de sécu en VBA
n
Bonjour
Je débute en Visual Basic
J'ai fait un programme qui compare le numéro de sécu par rapport à la date de naissance
J'ai été obligé d'utiliser les colonnes C et D pour créer des formules.
J'aimerais modifier mon programme "PAGE SUIVANTE" pour qu'il transcrive les formules des colonnes C et D en VBA, de maniere à ce qu'il n'y ai plus rein dans ces colonnes.
J'espère que je me suis fais comprendre
Ci joint le fichier (se sera plus claire)
https://www.excel-pratique.com/~files/doc/QUESTION_NUM_DE_SECU.xls
Merci
A
Bonjour
Depuis, tu devrais savoir....
https://www.excel-pratique.com/forum/viewtopic.php?t=13
Cordialement
Bonjour, Salut Amadéus,
Essaye ton code modifié ci-joint :
Sub PAGE_SUIVANTE()
If Len(Range("B4")) < 13 Then MsgBox (" N° DE SECU INCOMPLET"): Exit Sub
If Range("B4") = "" Then MsgBox (" AU MOINS LES 5 PREMIERS CHIFFRES DU N° DE SECU"): Exit Sub
If Len(Range("B4")) > 15 Then MsgBox (" NIR ERRONE"): Exit Sub
If Mid(Range("B4"), 2, 2) = Right(Range("B10"), 2) And Mid(Range("B4"), 4, 2) = Mid(Range("B10"), 4, 2) Then
MsgBox (" CORRECT")
Else
MsgBox (" LE N° DE SECU NE CORRESPOND PAS A LA DATE DE NAISSANCE")
End If
End Sub