Résolu XL 2016 inscription date automatique

BOUCOIRAN

XLDnaute Nouveau
Messieurs,
Je tente de développer un petit programme pour faire mes comptes sir excel 2016. En pièce jointe je joins un fichier sur lequel je n'ai laissé que deux pages afin qu'il ne soit pas trop lourd lors de la transmission. Sur la page "Journal", je souhaiterais que lorsqu'un code est saisi en colonne "E", il s'affiche automatiquement dans la colonne "D" la date du jour. Pour cela j'ai une routine en VBA que je n'arrive pas à faire fonctionner. Si quelqu'un pouvais m'indiquer ce qui cloche, j'en serai ravi.
Seules les cellules dans lesquelles une saisie est attendue sont accessibles, les autres étant protégées à l'écriture.
Dans cette attente et en vous remerciant par avance de vos réponses,
Cordialement,
Boucoiran
 
Ce fil a été résolu! Aller à la solution…

Fichiers joints

Jacky67

XLDnaute Accro
Messieurs,
Je tente de développer un petit programme pour faire mes comptes sir excel 2016. En pièce jointe je joins un fichier sur lequel je n'ai laissé que deux pages afin qu'il ne soit pas trop lourd lors de la transmission. Sur la page "Journal", je souhaiterais que lorsqu'un code est saisi en colonne "E", il s'affiche automatiquement dans la colonne "D" la date du jour. Pour cela j'ai une routine en VBA que je n'arrive pas à faire fonctionner. Si quelqu'un pouvais m'indiquer ce qui cloche, j'en serai ravi.
Seules les cellules dans lesquelles une saisie est attendue sont accessibles, les autres étant protégées à l'écriture.
Dans cette attente et en vous remerciant par avance de vos réponses,
Cordialement,
Boucoiran
Bonjour,
Une piste...
Dans ton code tu veux écrire dans une cellule verrouillée (Colonne D) avec la feuille de protégée
Pour permettre l'écriture (par code VBA uniquement) dans une telle cellule sans se soucier de la protection, tu peux utiliser ce code.

Dans le "Thisworkbook" du classeur en question.
VB:
Private Sub Workbook_Open()
'Protège la feuille (ici sans mot de passe) et permet l'écriture par VBA
Sheets("Journal").Protect , Userinterfaceonly:=True
End Sub
 

BOUCOIRAN

XLDnaute Nouveau
Bonjour,
Une piste...
Dans ton code tu veux écrire dans une cellule verrouillée (Colonne D) avec la feuille de protégée
Pour permettre l'écriture (par code VBA uniquement) dans une telle cellule sans se soucier de la protection, tu peux utiliser ce code.

Dans le "Thisworkbook" du classeur en question.
VB:
Private Sub Workbook_Open()
'Protège la feuille (ici sans mot de passe) et permet l'écriture par VBA
Sheets("Journal").Protect , Userinterfaceonly:=True
End Sub
 
Ce message a été identifié comme étant une solution!

BOUCOIRAN

XLDnaute Nouveau
Merci Jacky67 pour cette suggestion si simple que je n'y avais pas pensé et en plus elle fonctionne.
BcN
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas