Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
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...
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...
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...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.