Discussion :

[Jasmine80]

Bonjours,


Dans Excel, via la combinaison de touches 'Alt+Entrée', on peut effectuer un saut de ligne à l'intérieur d'une cellule, et ainsi donc écrire plusieurs lignes à l'intérieur d'une même cellule. J'aimerais que la sortie de mon programme perl soit du texte et qu'un copier-coller de celui-ci dans excel me donne la même chose (si possible sans utiliser Win32::OLE). Est-ce possible?

Exemple de texte à placer dans une seule cellule:

TAAAAG-5'
{ X|||
GAATTCGCTTATTTGG-3'

code testé

Code :

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

print $hash_result{'Seq1'}.chr(10).$hash_result{'Pipes'}.chr(10).$hash_result{'Seq2'}."\n"

Merci,

[Philou67430]

Si tu étais passée par un fichier csv, je t'aurais dit que le contenu d'une cellule contenant des retours à la ligne doit être "quotée" (avec des doubles quote). Peut-être cette information t'aidera.
Pour intégrer une double quote dans une chaine, l'usage de l'opérateur qq (ou q) est bien utile :

Code :

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

1
2
print qq("ma cellule $cellule_name qui est\nsurplusieurs lignes");
print q("ma cellule $cellule_name qui est). qq(\n) . q(surplusieurs lignes");

[Dimitry.e]

Personnellement, je n'ai pas de problème : un copier-coller de plusieurs lignes dans une cellule Excel (Version 2007) fonctionne correctement.

[Jasmine80]

Personnellement, je n'ai pas de problème : un copier-coller de plusieurs lignes dans une cellule Excel (Version 2007) fonctionne correctement.

Dans mon cas, à chaque \n il passe à la cellule du bas, ce qui est attendu ... comment fais-tu afin de différentier 'saut de cellule' et 'saut de ligne dans la même cellule'?


Merci,

[Jasmine80]

Si tu étais passée par un fichier csv, je t'aurais dit que le contenu d'une cellule contenant des retours à la ligne doit être "quotée" (avec des doubles quote). Peut-être cette information t'aidera.
Pour intégrer une double quote dans une chaine, l'usage de l'opérateur qq (ou q) est bien utile :

Code :

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

1
2
print qq("ma cellule $cellule_name qui est\nsurplusieurs lignes");
print q("ma cellule $cellule_name qui est). qq(\n) . q(surplusieurs lignes");

A priori cela ne m'aide pas ... à moins que je ne sauve mon résultat dans un fichier csv que j'importe ensuite dans excel ... j'essaierai si je ne trouve pas mieux. Merci.

[Jasmine80]

dans la partie Microsof office Excel de ce forum, ils m'ont dit que :

Le code ASCII est le 10
en VBA

Code :

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

CHR(10)

... y a-t-il moyen d'utiliser cela en perl?

[Philou67430]

Peux-tu montrer le code que tu utilises pour remplir ta cellule... à priori, tu n'as pas besoin du code ASCII du \n...

[Jasmine80]

Peux-tu montrer le code que tu utilises pour remplir ta cellule... à priori, tu n'as pas besoin du code ASCII du \n...

A la base :

Code :

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

print $hash_result{'ID'}."\t".$hash_result{'Matches'}."\t".$hash_result{'Score'}."\t".$hash_result{'Pattern'}."\t".$hash_result{'Tm'}."\t".$hash_result{'DeltaG'}."\t".$hash_result{'Seq1'}."\n".$hash_result{'Pipes'}."\n".$hash_result{'Seq2'}."\n";

Puis j'ai testé sans succès

Code :

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

print $hash_result{'ID'}."\t".$hash_result{'Matches'}."\t".$hash_result{'Score'}."\t".$hash_result{'Pattern'}."\t".$hash_result{'Tm'}."\t".$hash_result{'DeltaG'}."\t".$hash_result{'Seq1'}.chr(10).$hash_result{'Pipes'}.chr(10).$hash_result{'Seq2'}."\n";

Je voudrais un tableau excel où la première cellule serait l'ID, puis le matches ... et pour terminer $hash_result{'Seq1'}."\n".$hash_result{'Pipes'}."\n".$hash_result{'Seq2'}."\n" dans une même cellule ce qui équivaut manuellement dans Excel à utiliser 'Alt+Entrée' entre ces 3 lignes au lieu de 'Entrée'

[Jasmine80]

Voila ce qu'il me faudrait :



Uploaded with ImageShack.us

[Philou67430]

C'est bien ce que je pensais, tu écris bien un fichier csv (un tsv en fait : tab separated vector) que tu importes sous Excel.
Et pour résoudre ton problème, il faut bien faire ce que j'avais indiqué précédemment, c'est à dire ajouter des quotes :

Code :

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

1
2
 
print qq("), (join "\t", $hash_result{'ID'}, $hash_result{'Matches'}, $hash_result{'Score'}, $hash_result{'Pattern'}, $hash_result{'Tm'}, $hash_result{'DeltaG'}, "$hash_result{'Seq1'}\n$hash_result{'Pipes'}\n$hash_result{'Seq2'}\n"), qq(");

[Jasmine80]

C'est bien ce que je pensais, tu écris bien un fichier csv (un tsv en fait : tab separated vector) que tu importes sous Excel.
Et pour résoudre ton problème, il faut bien faire ce que j'avais indiqué

Je n'écris pas un fichier csv, je fais apparaitre le résultat dans la fenêtre de l'éditeur (scite) puis je fais un simple ctrl-C et ctrl-V . Néanmoins, passer par un fichier csv intermédiaire est peut-être la seule solution, ou du moins la plus simple ... je peux toujours effacer le fichier csv par la suite.

Merci, je vais procéder ainsi

[Jasmine80]

C'est bien ce que je pensais, tu écris bien un fichier csv (un tsv en fait : tab separated vector) que tu importes sous Excel.
Et pour résoudre ton problème, il faut bien faire ce que j'avais indiqué précédemment, c'est à dire ajouter des quotes :

Code :

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

1
2
 
print qq("), (join "\t", $hash_result{'ID'}, $hash_result{'Matches'}, $hash_result{'Score'}, $hash_result{'Pattern'}, $hash_result{'Tm'}, $hash_result{'DeltaG'}, "$hash_result{'Seq1'}\n$hash_result{'Pipes'}\n$hash_result{'Seq2'}\n"), qq(");

le séparateur de champ (cellule) est \t et mon bloc

ce que ton code donne :

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
21
22
"pXO1_72644_R_0	5	3	NTGTTCN	97.3	DeltaG @37.0 degrees =  greater than zero	 AAAACAAGG-5'
{  X|||||X
 TGATGTTCTGGA-3'
""pXO1_3807_F_0	2	2	TG	68.1	DeltaG 37.0 degrees =  greater than zero	 CTAC-5'
C  ||
 ATTGACCATTCTTTG-3'
""pXO1_3807_F_0	4	2	TCNNTG	92.3	DeltaG @37.0 degrees =  greater than zero	 CCAGTTACCTAC-5'
{  ||XX||
 ATTCTTTG-3'
""pXO1_3807_F_0	2	2	TG	68.1	DeltaG 37.0 degrees =  greater than zero	 TTACCAGTTACCTAC-5'
C  ||
 TTTG-3'
""pXO1_3807_R_0	5	3	GATNGCN	99.8	DeltaG 37.0 degrees =  greater than zero	 CGCTAACGG-5'
T  |||X||X
 TAGATAGCTT-3'
""pXO1_3807_R_1	5	3	GATNGCN	99.8	DeltaG 37.0 degrees =  greater than zero	 CGCTAACGG-5'
T  |||X||X
 TAGATAGCTT-3'
""pXO1_3807_F_2	3	2	ACTN	77.3	DeltaG 37.0 degrees =  greater than zero	 GTTGACCTTCATA-5'
C  |||X
 CCACTT-3'
"

puis, je l'importe sous excel 2003.
Données externes>
importation de données>
type de données : délimitées
origine du fichier MS-DOS (PC-8)
séparateur : tabulation
identificateur du texte : double quote

... puis, ça ne va pas, je dois avoir raté une marche


Merci beaucoup pour ton aide ... désolée, je suis lente à la détente ^_^ pourtant, je ne suis pas blonde



par un copier-coller classique (ctrl-C, ctrlV) tout rentre dans une seule cellule ... je vais trouver comment faire. Merci pour ton aide.

[Jasmine80]

Code :

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

	print $hash_result{'ID'}."\t".$hash_result{'Matches'}."\t".$hash_result{'Score'}."\t".$hash_result{'Pattern'}."\t".$hash_result{'Tm'}."\t".$hash_result{'DeltaG'}."\t".'"'.$hash_result{'Seq1'}."\n".$hash_result{'Pipes'}."\n".$hash_result{'Seq2'}.'"'."\n";

c'est super, ça fonctionne ... merci Philou

[Philou67430]

Désolé si j'ai fait une erreur de syntaxe précédemment (un excès de zèle), mais ce que tu écris avec le print, c'est l'équivalent d'un CSV. Tu écris ton fichier excel comme un CSV (peut-être avec une extension .xls, peut importe), et excel le reconnait comme un CSV qu'il importe.
Il faut donc dans ce contexte, que les cellules contenant des retours à la ligne soient "balisées" par des quotes.

[Jasmine80]

Désolé si j'ai fait une erreur de syntaxe précédemment (un excès de zèle), mais ce que tu écris avec le print, c'est l'équivalent d'un CSV. Tu écris ton fichier excel comme un CSV (peut-être avec une extension .xls, peut importe), et excel le reconnait comme un CSV qu'il importe.
Il faut donc dans ce contexte, que les cellules contenant des retours à la ligne soient "balisées" par des quotes.

Quoiqu'il en soit, merci, je viens encore d'apprendre quelque chose. Tiens, au fait, si je passe sous Open office, pourrais-je sauver en .xls et .doc afin que mes rapports soient compatibles avec les Microsoft office de mes collègues, qu'ils puissent les ouvrir et les lire?

[Philou67430]

Oui, pas de problème de compatibilité que ce soit avec OpenOffice ou LibreOffice, et vers les formats XLS (Office 97) ou XLSX (Office 2007).