Bonjour,
je viens de faire une petite macro pour incrémenter un n° de reçu dans un fichier sur mon disque dur mais à chaque fois j'obtiens le même msg "Voulez-vous enreg. les modifs" du fichier en question. Et donc valider l'opération.
Que dois-je faire pour lui faire comprendre que c'est moi le demandeur et qu'il ne doit pas s'inquiéter ?
Petite question subsidiaire : Dans quel format doit être la cellule qui reçoit ce n° pour garder les zéros devant : 0005 et non 5 ?
Merci d'avance de votre aide
Alain
A voir également:
Macro : Mise à jour d'un fichier et msg "Voulez-vous enreg ...."
Question 1 Pour fermer et sauvegarder sans message : ActiveWorkbook.Close True
Pour fermer sans sauvegarder et sans message : ActiveWorkbook.Close False
Bonjour Gyrus pour ta réponse,
Le problème 1 est effectivement résolu. Je n'ai plus de message. Merci
Le problème 2 demeure mais je n'ai probablement pas été suffisamment précis :
En fait j'ai un fichier Excel qui stocke le rang de n° de reçu (nombre de 3 chiffres : par exemple au début 000). La macro accède à ce fichier pour récupérer ce dernier n° de reçu attribué, fait + 1, enregistre ce nouveau rang puis concatène l'année avec ce rang obtenu pour obtenir le nouveau n° de reçu (par exemple au début 2016001). Mais moi j'obtiens, même en mettant le format texte : 20161. Il ne veut pas me garder les zéros non significatifs du rang.
Merci
Alain
J'ai un petit soucis car comme les données rang et année ne sont pas sur la même feuille j'ai appelé "Rang" le n° de rang que je récupère du fichier : Rang = Range("B1").Value
et Année l'année que je récupère sur la feuille "SUIVI_PARRAIN :
Année = Range("B4").Value
et la concaténation est :
Num_Reçu = Année & Rang
Et dès le Rang les zéros ont disparus
Merci
Si je comprends bien, Année et Rang correspondent à des variables utilisées dans ta macro.
Année étant une variable de type Integer,
Num_Reçu étant une variable de type String, Il faut coder :
Num_Reçu = Cstr(Année) & Format(Rang,"000")
