Discussion :

[griffit]

bonjour a tous

encore un petit probleme pour faire de la mise en page sous excel

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
 
vMSExcel = Variant::CreateObject("Excel.Application");
vMSExcel.OlePropertySet("Visible", true);
vXLWorkbooks = vMSExcel.OlePropertyGet("Workbooks");
vXLWorkbook = vXLWorkbooks.OleFunction("Add");
vSheetName = "Feuil1";
vWorksheet = vXLWorkbook.OlePropertyGet("Worksheets",vSheetName);
vWsRange="A1:A6";
vRange=vWorksheet.OlePropertyGet("Range", vWsRange);
 
// jusque ici tout vas bien 
 
vValue="-4108";
vRange.OlePropertySet("HorizontalAlignment",vValue);
vRange.OlePropertySet("VerticalAlignment",vValue);

j'ais un petit message qui me dit une exception a etait generer
je ne vois pas bien le probleme

un petit coup de main de votre part serais le bien venu

merci par avance

[Neilos]

Je ne connais rien du tout au sujet dont tu parles mais je peux te dire que sans le message précis de l'exception, personne ne pourra t'aider....

[griffit]

ok mais le probleme s'est que je n'ais aucun message precis

voila le message:
message du debugger
Project project1.exe raised exception class EOLesysError with message 'une exceptions'est produite'
"je clique sur Continue"

et la j'ai un autre message:

message de Project1 :
Une exeception s'est produite.
je clique sur ok cela en reste la

voila voila

[blondelle]

Salut griffit:
Je pense que tu n'a pas bien regarde quand tu a recopie l'exemple de la FAQ.
Ecrit vValue de cette facon ca devrait marcher.

vValue = -4108;

A+

[griffit]

super merci