IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Nommer un fichier avec vba


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Homme Profil pro
    comptable principal
    Inscrit en
    Octobre 2010
    Messages
    434
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 47
    Localisation : Autre

    Informations professionnelles :
    Activité : comptable principal
    Secteur : Finance

    Informations forums :
    Inscription : Octobre 2010
    Messages : 434
    Par défaut Nommer un fichier avec vba
    Bonjour
    J'ai un fichier classeur1
    Je souhaite le nommer et le sauvegarder au baureau avec cette expression
    Grand livre date du jour heure du systhem
    Exemple :
    Grand livre le 10 dec 2014 11h10
    Merci

  2. #2
    Membre confirmé
    Homme Profil pro
    Étudiant
    Inscrit en
    Novembre 2014
    Messages
    81
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 31
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Novembre 2014
    Messages : 81
    Par défaut
    Bonjour,

    Test ça :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    Sub Enreg()
    Dim Path As String, valeur As String
    Path = ActiveWorkbook.Path & "\" ' met le chemin de ton bureau à la place de ActiveWorkbook.Path et entre " "
    valeur = "Grand livre le " & Format(Date, "dd-mmmm-yyyy") & " " & Format(Time, "hh-mm") & ".xlsm"
    ThisWorkbook.SaveAs Path & valeur
    End Sub
    Cordialement,
    Ltspitfire

  3. #3
    Invité
    Invité(e)
    Par défaut
    bonjour,
    s'il s'appelle classeur1 c'est que le classeur Excel est nouveau donc ActiveWorkbook.Path va planter !
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Path = ThisWorkbook.Path & "\"
    Dernière modification par Invité ; 10/12/2014 à 19h57. Motif: Inutile de citer entièrement le message précédent

  4. #4
    Membre confirmé
    Homme Profil pro
    Étudiant
    Inscrit en
    Novembre 2014
    Messages
    81
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 31
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Novembre 2014
    Messages : 81
    Par défaut
    Salut rdurupt,

    Je pensais qu'en changeant le "ThisWorkbook.Path" par le chemin jusqu'au bureau cela allait fonctionner (d'où le commentaire).

    Cordialement,
    Ltspitfire

  5. #5
    Invité
    Invité(e)
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Path = Environ("UserProfile") & "\Bureau"
    Code Environ : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    USERNAME		Nom de l’utilisateur ayant ouvert la session Windows.
    USERDOMAIN		Nom du domaine auquel appartient l’utilisateur.
    USERPROFILE		Chemin pointant vers le dossier où est stocké le profil (les réglages divers comme le fond d’écran, les icônes, les paramètres de logiciels) de l’utilisateur.
    ALLUSERSPROFILE	Chemin pointant vers le dossier “Documents partagés”, sous Windows XP.
    APPDATA			Chemin pointant vers le dossier “Application” de l’utilisateur.Sous Windows XP, il s’agit d’un dossier nommé Application Data résidant le dossier profil de l’utilisateur.
                                    C’est dans ce dossier que sont stockés les réglages de vos logiciels (pour un utilisateur donné, donc).
    COMPUTERNAME       Nom de l’ordinateur.
    HOMEDRIVE		Nom du disque où se trouve le dossier personnel de l’utilisateur.
    HOMEPATH		Chemin – sans le nom du disque (HOMEDRIVE) pointant vers le dossier personnel de l’utilisateur.
    LOGONSERVER		Serveur ayant identifié l’utilisateur lors de l’ouverture de la session. Il peut s’agir de la machine elle-même.
    OS				Nom du système d’exploitation.
    PATH			Différents chemins définis par défaut.
    PATHEXT			Différentes extensions prises en compte par le système.
    SYSTEMDRIVE		Nom du disque où se trouve le système d’exploitation.Exemple : C:
    SYSTEMROOT		Chemin pointant vers le dossier contenant le système d’exploitation.Exemple : C:WINDOWS
    TEMP			Nom du dossier temporaire de l’utilisateur.
    TMP				Variante du précédent.
    NUMBER_OF_PROCESSORS         Nombre de micro-processeurs sur la machine.
    PROCESSOR_ARCHITECTURE     Type d’architecture du processeur.Exemple : x86 pour les processeurs Intel.
    PROCESSOR_IDENTIFIER           Identifiant plus détaillé du processeur.
    PROCESSOR_LEVEL                    Niveau du processeur.
    PROCESSOR_REVISION             Numéro de révision du processeur.
    Dernière modification par Invité ; 10/12/2014 à 14h54.

  6. #6
    Membre éclairé
    Homme Profil pro
    comptable principal
    Inscrit en
    Octobre 2010
    Messages
    434
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 47
    Localisation : Autre

    Informations professionnelles :
    Activité : comptable principal
    Secteur : Finance

    Informations forums :
    Inscription : Octobre 2010
    Messages : 434
    Par défaut bonjour
    bonjour les amis et merci pour vos réponses
    lorsque j'ai lancé macro voici le premier message et moi je souhaite le enregistré sans macro

    Nom : Capture1.PNG
Affichages : 1200
Taille : 29,9 Ko

    et après voici le deuxième message

    Nom : Capture2.PNG
Affichages : 1244
Taille : 52,4 Ko

Discussions similaires

  1. Traitement des gros fichiers avec VBA sous MsACCESS
    Par GBAGO dans le forum VBA Access
    Réponses: 1
    Dernier message: 07/11/2008, 10h48
  2. Création automatique d'un fichier avec VBA
    Par NEC14 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 23/10/2008, 08h00
  3. zipper un fichier avec vba
    Par moimemessssssssss dans le forum VBA Access
    Réponses: 3
    Dernier message: 20/09/2008, 01h50
  4. Copier un fichier avec VBA
    Par ravidat dans le forum VBA Access
    Réponses: 3
    Dernier message: 21/04/2008, 14h19
  5. dézipper un fichier avec vba
    Par Echizen1 dans le forum Contribuez
    Réponses: 3
    Dernier message: 06/02/2007, 10h23

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo