Discussion :

[dacid]

Bon, je vais faire comme si ça marchait partout alors...

Tant que je suis dessus..., quand je fait ce traitement, je le ferme ensuite:
MonClasseur.Close(False,emptyparam,emptyparam,0);
ExcelApplication1.Quit;
ExcelApplication1.Disconnect;

Et si je veux le lancer juste après:
Application.ProcessMessages;
ShellExecute(0,'OPEN','classeur1.xls', Nil, Nil, SW_SHOW);

Excel plante !

Sais tu pourquoi ?

[dacid]

Ok, c'est bon.

(je me suis emmêlé les pinceaux entre les close, quit, disconnect, autoclose, autoquit, free, ... )

Merci pour tout.

[Concombre Masqué]

Bonjour,

J'ai eu besoin de cette fonction, et j'ai utilisé ceci :

Code :

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

MaFeuille.Cells.Item[i,j].NumberFormat := '@';

La solution est parfaite, mais j'ai besoin de le faire pour la colonne entière, et j'aurais donc préféré utiliser .EntireColumn une fois pour toute... seulement ça ne marche pas...

Je m'en contenterait, et la personne qui avait besoin du programme aussi, mais je suis quand même déçu de pas pouvoir utliser EntireColumn...

[dacid]

Salut Concombre Masqué (c'est marrant, j'en ai encore lu un il y a moins d'un mois ),


Essaye un truc comme ça:

Code :

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

1
2
Columns("I:I").Select
Selection.NumberFormat = "@"