Contenu récent par senpan

Bonjour à toi JHA, Je te remercie d'avoir pris le temps de comprendre ma demande et de t'y être penché dessus. Je viens de tester et c'est exactement le résultat attendu. 👏 Il va de soit que je n'ai rien compris à ta formule car il y a des fonctions que je ne connais pas encore et donc pas...

Bonjour tout le monde 👋 Je suis à la recherche d'une solution, bien évidemment, qui me pose problème 🤔. Voici l'explication du fichier : le tableau en bleu : permet à mes collègues de compléter les informations demandées à la suite le tableau en vert : permet de concaténer en fonction de deux...

Cette ressource a été supprimée et n'est plus disponible au téléchargement.

senpan updated Ce lien n'existe plus with a new update entry: Ce lien n'existe plus Ce lien n'existe plus

@Staple1600 C'est une très bonne question. Là je prend un joker !

Avec les \ : oui problème. Avec les \\ : pas de problème. Je ne prétends rien, je constate.

Merci à vous deux ! ;) C'est vrai qu'avec Worksheet_Change(ByVal R As Range) c'est bien mieux. Un oubli d'un début (même si je le suis). J'ai adopté la solution de @Staple1600

Oui, il l'est. Cela fonctionne parfaitement chez moi avec Excel 2016 et les dernières MAJ. Attention, le code de mon post précédent ouvre uniquement le premier fichier trouvé dans le répertoire.

Bonjour Staple1600, à tous, Une vrai honte d'avoir oublié le End If. :oops: Maintenant, comment faire pour que cette macro fonctionne ? Je mets le code dans la feuille ? Chose que j'ai fait. Mais cela ne fonctionne pas. Voir en PJ.

Bonjour le forum, à tous, Posons le problème. 1. Dans une feuille en cellule E33 il existe un calcul de somme. 2. Si la somme est strictement supérieur à 1000, alors un MsgBox. 3. Si la somme est inférieur ou égale à 1000, alors ne rien faire. Voici le code testé sans succès : Sub ATTENTION()...

Bonjour à tous, J'ai finalement opter pour : Sub TOTO() Dim ws As Worksheet Workbooks.Open ("\\nas\Dossier1\Dossier2\2. Excel\ASP - TITI*.xlsm") Set ws = ActiveWorkbook.Worksheets("MIMI") Set ws = Nothing End Sub J'ai vu en interne pour la gestion des fichiers dans les...

Le nom est : ASP - Fichier V7.1.xlsm

Bonjour le forum, le fil, Staple1600, J'ai finalement fait cette macro qui me convient parfaitement : Sub ENREGISTREMENT() 'Pour enregistrer le document en format PDF '----------------------------- ' enregistrement du document | '----------------------------- ActiveDocument.Unprotect...

Bonjour à tous, le fil, le forum, J'ai un problème un peu différent. Je souhaite ouvrir un fichier Excel (bien sur) qui se situe toujours dans le même répertoire mais dont le nom est ainsi fait : ASP - Fichier V7.1.xlsm Vous l'aurez compris, le numéro de version du fichier est susceptible de...

Bonjour à tous, Bonjour Staple1600, Merci pour ton aide mais j'ai réussi à trouver quelque chose de plus court. Seul problème, la récupération du nom présent dans le champ de formulaire intitulé ORGANISME. Mon code actuel : Sub ENREGISTREMENT() 'Pour enregistrer le document en format PDF...