Discussion :

[kenobyalex]

Bonjour,

Mon problème est le suivant :

Via une macro VBA entre Business OBjects et Excel, je fais un copier dans BO et je viens coller les données dans une feuille Excel. Jusqu'ici tout va bien.

Le Pb est que quand je fais ActiveSheet.paste, cela me colle mes données dans un format Text, alors que se sont des pourcentages.
Constatant cette anomalie, j'ai tout simplement fait un Clt + V pour voir si cela vient des données, et en faisant Clt+V les données se collent au bon format.
Dans l'assistant Macro un Clt + V correspond à ActiveSheet.Paste.

Quelqu'un aurait une idée sur ce point.

Voici le code :

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
18
19
20
 
xcl.Sheets("Feuil1").Select
 
xcl.Cells.Select
 
xcl.Selection.Clear
 
xcl.Range("A1").Select
 
 
 
'5/ Collage des éléments dans Excel
 
xcl.Application.DisplayAlerts = False
 
xcl.Sheets("Feuil1").Select
 
xcl.Range("A1").Select
 
xcl.ActiveSheet.Paste

Merci d'avance à tous.

[ouskel'n'or]

Effectivement, quand tu copies les données dans Business Object, tu récupères des données en format Texte. Par contre, dans BO, tu peux demander l'export en Excel. Si tu vas dans Fichier -> Enregistrer sous -> Microsoft Excel Worksheet (.xls) tu peux récupérer un classeur Excel.
Tu testes, peut-être récupéreras-tu le bon format (je n'ai plus BO)
Sinon, le pourcentage est sans doute le résultat d'un calcul, et Excel peut permettre de refaire le calcul, non ?
Bonne chance

[kenobyalex]

Il est vrai qu'il y cette solution, mais pour mon cas elle ne fonctionnne pas car je dois rapatrier des tableaux et les transformer en Graph dans Excel. (la galère quoi.) donc je dois obligatoirement passer par une macro qui me colle mes tabbleaux dans des Sheets et qui me génère auitomatiquement des Graphs que BO est incapable de faire.

La chose bizarre est que, quand sous BO, je mets un format Numérique sans décimale, ça passe bien, tout se copie bien au format Numérique sous Excel, mais dès que je mets des décimales ou un format pourcentage ou autre, rien à faire le format texte domine dans excel.
J'ai pensé aux Réglages d'environnement Windows, il y a peut etre une hiostoire de Virgule et de point avec l'import de donnée BO qui gère un fomat américain et excel un format Fr, mais dans cette fucking boite tout est bloqué, pas moyen d'accéder au panneau de config.

Si vous avez d'autres idées elles sont les bien venues, et merci à tous.

[LeForestier]

Bonjour,
Je crois que tu a mis le doigt sur le problème.
De quel façon les nombres sont-ils inscrits dans les cellules.
Si c'est du genre 23.5, fair une Macro qui remplace les .(point) par des ,(virgule).
Ou, essayer avec PasteSpecial ?
A+

[ouskel'n'or]

J'ai eu à extraire des données BO pour les traiter dans Excel et n'avoir pas eu de problème. Tu devrais poser ta question sur le forum BO, il y a certainement une solution pour les décimale, je ne me souviens pas avoir dû modifier les formats.
J'ai retrouvé un code sous Excel pour l'import. En fait, j'enregistrais la requête en fichier Texte puis, dans Excel, j'ouvrais le txt en précisant pour chaque champ le type de données.
Ce qui donnait par exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
    Workbooks.OpenText Filename:= _
        NomCompletBO, Origin:= _
        xlWindows, StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlNone, _
        ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, Comma:=False _
        , Space:=False, Other:=False, FieldInfo:=Array(Array(1, 2), Array(2, 1), _ 
'etc

où, dans Array(1, 2) => 1 est le N° de colonne, et 2 le paramètre XlColumnDataType. Dans l'aide, à OpenText, tu as les différentes "valeurs" que peut prendre ce paramètre.
Mais il n'y a pas pourcentage
Bon courage