Contenu récent par olic95

Re : Dir pour tester la présence d'un répertoire Salut Jam, Ca m'a l'air impeccable, oui. Je teste plus loin dans la macro et je te tiens au courant. Merci à vous deux. Olivier.

Re : Dir pour tester la présence d'un répertoire Bonjour Pierrot, L'aide VBA dit Renvoie une valeur de type String représentant le nom d'un fichier, d'un répertoire ou d'un dossier correspondant à une chaîne de recherche, à un attribut de fichier ou au nom de volume d'un lecteur. puis...

Bonjour le forum, J'ai un répertoire toto sur mon disque C -> C:\TOTO Dans une macro, je renseigne une variable REP en faisant REPERTOIRE = Thisworkbook.Path REP = DIR(REPERTOIRE & "\") Et bien REP = "" alors que TOTO existe !!! J'ai essayé sans le & "\", j'obtiens le même résultat...

Re : Ouverture d'un fichier par macro pour modification Juste un petit UP pour qu'on voit bien ma pièce jointe :O)

Re : Ouverture d'un fichier par macro pour modification Bonjour à tous, Désolé, j'avais à faire... mais je suis de retour. Fichier trop gros, je mets le bout de code : ' Message annonçant que le fichier a été généré MsgBox "Le fichier Quittances_" & TextBox_ANNEE.Value & "_" &...

Re : Ouverture d'un fichier par macro pour modification Salut RICO, Je n'ai pas été clair dans mes explications, j'en suis conscient ! Je suis dans ma macro qui vient de générer un fichier de quittances et qui se trouve à l'écran ' je l'enregistre et le ferme ActiveWorkbook.Save...

Bonjour le forum, Voilà. Ma macro génère un fichier de quittance par mois. Ce fichier est sauvegardé, et ensuite je préconise à l'utilisateur de vérifier le fichier avant de l'imprimer. Comment faire, en plus d'afficher ce message, pour ouvrir le fichier en question afin de le vérifier...

Re : Gestion des dates Salut Dull, le forum, Serais-je égoïste ? Encore merci à toi. Olivier.

Re : Gestion des dates Salut Dull, Impeccable. Fallait pas t'embêter à me faire un fichier, me préconiser la commande CDate suffisait. Merci pour la solution. Olivier.

Re : Gestion des dates Salut GPLIONEL, Incompatibilité de type -> débuggage ! Non, ça ne fonctionne pas, enfin pas chez moi :o Une autre idée ?

Salut les EXCEListes, J'ai un UserForm avec une TextBox (TextBox_DATE) où il faut saisir une date (22/11/2006). Cette date vient prendre place dans une cellule d'une feuille : Range("A15") = TextBox_DATE.Value Cette cellule est au format Date 01/01/06 Lorsque j'affecte la valeur...

Bonjour le forum, Dim LOYER, PROVISIONS, ARRIERE As Integer ARRIERE = ActiveCell.Offset(0, 1).Value LOYER = ActiveCell.Offset(0, 5).Value PROVISIONS = ActiveCell.Offset(0, 6).Value Pour faire simple : ActiveCell.Offset(0, 1).Value contient 150,25 ActiveCell.Offset(0, 5).Value...

Re : Sélection d'un répertoire par boite de dialogue Salut à tous, Creepy, ta solution est géniale, elle fonctionne bien et elle est surtout un peu plus simple que celle de lapix. Donc elle est adoptée. Merci à vous tous pour vos réponses. A bientôt. Olivier.

Re : Mise en page par macro Bonjour Pierrot, le forum, Non, pas de temps gagné Pierrot. Ou alors pinuts, rien de significatif. J'avais déjà testé ce genre de solution. yojema, ta proposition ne change quasiment rien non plus. 1 seconde par tranche de 20 quittances. Merci pour toutes...

Re : Mise en page par macro Bonjour Moa, yojema, le forum, Moa : For I = 1 to Sheets.Count Sheets(I).Select Range("A1:G41").Select ActiveSheet.PageSetup.PrintArea = "$A$1:$G$41" Range("A1").Select...