Résultats de la recherche

  1. T

    Sécurité des macros à l'ouverture des fichiers

    Bonjour, Mon projet contient plusieurs fichiers tous en liaisons les uns avec les autres. Je veux créer un bouton ouvrant l'ensemble des fichiers, de manière à ce que les liaisons se mettent à jour, puis les referme. Par conséquent l'utilisateur n'à plus qu'à cliquer et attendre. Tout...
  2. T

    Protection, vérouillage cellules et/ou classeur

    Bonjour à tous, Cela fait un petit moment que je me renseigne, que je test...différentes solutions pour tout ce qui est question de la protection des feuilles, classeurs, vérouillages des cellules, lecture seule... Mais rien ne me donne de réelles satisfactions. Mon projet contient...
  3. T

    Transfert de données Access-Lotus-Excel

    Re, Voilà mon problème. Pour mon projet, je dois utiliser des données qui sont des dates. Ces dates ont le processus suivant : Création sur access Je récupère ces données sur Lotus, ou je réalise une extraction sur excel Ensuite je récupère certaines données de cette extraction...
  4. T

    Lecture seule

    Bonjour, Pour des fichiers qui doivent être ouverts, je veux les mettre es lecture seule, afin que l'utilisateur puisse ne pas modifier quoique ce soit. Or est il possible de lui dire par un code VBA de s'ouvrir en lecture seule, et de répondre systématiquement oui lorsqu'il m'informe que...
  5. T

    Mot de passe pour ouverture d'un fichier

    Bonjour, Comment peut-on faire pour qu'à l'ouverture d'une fichier, on me demande un code avant même que le fichier en question s'affiche? Le fichier est confidentiel. Je veux donc avoir un mot de passe pour que seul les utilisateurs le connaissant puisse ouvrir le fichier. Pour les...
  6. T

    Format de date?

    Re, Mon code est le suivant : Range('W7').Value = '1/5/' & Year(Date) Pourquoi avec ce code, le contenu de la cellule est 05/01/2005 et non 1/5/2005?
  7. T

    Passage à minuscules

    Bonjour, Je veux passer le contenu de plusieurs cellules de majuscules en minuscules. Mon code ne foncitonne pas. Il s'éxécute lorsque je clique sur un bouton : Range('H2:H65535').Value = LCase(Range('H2:H65535').Value) Merci.
  8. T

    Problème dans mon code de copier coller

    Re bonjour, J'ai un bouton dans un fichier qui me permet de faire un copier/coller de données d'un fichier à l'autre. Le code est le suivant : Workbooks.Open 'P:\\Centre-R&D\\Productivite\\Reporting plan de productivité à 3 ans\\Bases de données+sauvegardes\\PAP\\Extraction...
  9. T

    Fermeture d'un fichier sans sauvegarder.

    Re bonjour, Après avoir réaliser différentes opérations dans un fichier je veux qu'il se ferme automatiquement mais sans le sauvegarder, donc sans non plus m'afficher l'invite me demandant ou non de le sauvegarder. Pour la fermeture du fichier, c'est ok : ActiveWorkbook.Close...
  10. T

    VBA format cellule : retour à la ligne

    Bonjour, Je n'arrive pas à trouver comment définir que le contenu d'une plage de cellules retourne à la ligne lorsque c'est nécessaire. Merci.
  11. T

    Gros problème de gestion de gains

    Bonjour à tous, j'ai un gros problème. Le fichier joint vous permettra de voir comment cela fonctionne, mais c'est vraiment un condensé. Le fichier contient un tableau dans lequel je rentre des idées à l'aide d'une usf. Je sélectionne enregister une idée (1er bouton) pour entrer une...
  12. T

    Copier/coller de valeur et non de formule

    Bonjour, Voici mon code pour copier coller. Sauf que je veux que cela copie uniquement la veleur et non la formule complète. Que dois -je modifier svp? Range('B100:AK100').Copy Range('B101').Select ActiveSheet.Paste Application.CutCopyMode = False
  13. T

    Lorsque je change les données d'une feuilles...

    Re bonjour J'ai une feuille ou je rentre des valeurs et j'ai des liens entre cette feuille et d'autres. Ce que je veux c'est que lorsque je change les données de cette feuille, les liens se modifient automatiquement. J'ai voulu me mettre dans Worksheet_Change mais ça ne marche pas...
  14. T

    Problème dans mon code

    Bonjour, mon code ne fonciotnne pas, quelqu'un aurait il une idée svp? Private Sub Worksheet_Activate() With Range('B11:AK11') .Value = Format(.Value, '###0.00') End With With Range('B15:AK15') .Value = Format(.Value, '0.00%') End With End Sub
  15. T

    Problème de calcul excel qui ne s'effectue pas

    Re bonjour, J'ai un problème sur l'un de mes fichiers. J'ai crée une version réduite ou est expliquer mon problème. Merci d'avance. [file name=Exemple_20051123185810.zip size=4957]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Exemple_20051123185810.zip[/file]
  16. T

    Erreur dans mon code

    Salut, Comment faire pour que le code suivant fonctionne. Cela vient d'un problème de déclaration de variables? For k = B To AK Range(k & '152').Value = Range(k & '11').Value Next
  17. T

    changement d'année

    Bonjour, Comment faire pour qu'un code s'éxecute uniquement à chaque changement d'année? Mon code se trouve dans thisworkbook Merci
  18. T

    Chercher 3 caractères dans une chaîne

    Bonjour à tous, Dans un tableau, j'entre grâce à une usf des idées comportant notamment une référence. J'ai donc des références du type : IPJ81MERL001 IPJ81MERL002 … Dans ces références, les seules choses qui changent sont le numéro et les 3 lettres avant le L. Ces 3 lettres...
  19. T

    Gestion de la date

    Bonjour, Mon code suivant s'execute à l'ouverture du fichier et se trouve dans ThisWorkbook. Si on se trouve à la date indiquée (ici le 10 du mois) cela me crée une sauvegarde du mois précédents du fichier en cours d'ouverture à l'emplacement désiré. Dim d As Date d = CDate('10/' &...
  20. T

    Format du contenu de textbox

    Bonjour, J'ai une texbox dans laquelle je veux rentrer des chiffres du type : 0.325. Cela marche mais j'ai 2 problèmes Le premier est que dès que je rentre + de 3 chiffres après la virgule, cela ne m'arrondi pas le chiffre à 3 derrière la virgule. Ca le laisse telle qu'il est rentré...