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

VBA Access Discussion :

Problème TransferSpreadsheet (underscore systématique avant le nom de l'onglet)


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Mars 2012
    Messages
    50
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2012
    Messages : 50
    Par défaut Problème TransferSpreadsheet (underscore systématique avant le nom de l'onglet)
    Bonsoir à tous,

    J'ai un petit soucis qui a de lourdes conséquences (retravaille important), je ne sais pas si vous l'avez déjà rencontré.
    Je réalise dans le programme (ci-dessous) un TransferSpreadsheet (basique) pour exporter une table dans une feuille Excel que je souhaite nommer X1. Cependant et systématiquement l'export me nomme la feuille _X1 et pas X1. J'ai beau chercher , essayé de décomposer en créant une sorte de macrovariable, rien n'y fait l'onglet est toujours nommé _X1. J'ai essayé sur une version 2003 et 2010 sans succès.

    N'ayant pour l'instant pas de solutions, j'envisage à partir de vba accesss de renommer à posteriori cet onglet, chose que je ne sais pas encore faire, pourriez-vous m'aider?

    Merci d'avance, je suis à l'écoute de tout autres solutions sinon.


    Code : 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
    Private Sub Commande0_Click()
    Dim rec As Recordset
    Dim sql As String
    Dim rep, fichier As String
    
    'exportation des résultats dans le fichier excel*/
    
    sql = "Select Parametrage.repertoire as repert, Parametrage.nom as feuille FROM Parametrage;"
    Set rec = CurrentDb.OpenRecordset(sql, dbOpenSnapshot)
    rec.MoveFirst
    
    rep = rec![repert]
    fichier = rec![feuille]
    
    DoCmd.TransferSpreadsheet acExport, 8, "Table1", (rep & fichier), True, "X1"
    
    End Sub

  2. #2
    Invité
    Invité(e)
    Par défaut
    Bonjour

    Change le nom X1 en toto par exemple pour voir si le phénomène se reproduit.

    S'il n'y a pas pu de soucis, je pense qu'Excel fait cela en raison du fait que X1 et l'adresse d'une cellule dans une feuille et cela pourrait créer un confilt.

    Ce n'est qu'une hypothèse que je n'ai pas testés.

    Philippe

Discussions similaires

  1. Réponses: 2
    Dernier message: 19/12/2006, 18h37
  2. Problème de mise en avant d'une forme
    Par vantoff dans le forum C++Builder
    Réponses: 3
    Dernier message: 03/08/2006, 04h00
  3. point d'exclamation avant le nom de la variable
    Par khamed dans le forum VB 6 et antérieur
    Réponses: 14
    Dernier message: 20/07/2006, 01h12
  4. Problème de la poule avant l'oeuf ?
    Par norwy dans le forum C++
    Réponses: 10
    Dernier message: 10/11/2005, 20h52
  5. Problème d'utilisation select () avant recv sous windows
    Par init dans le forum Développement
    Réponses: 3
    Dernier message: 16/03/2005, 19h36

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