Desarrollando en Dynamics GP

Buenas, yo nuevamente. ahora estoy probando de poner negrita, formatear campo de moneda, fechas, String Ej, "00001" y que no me lo deje en "1".. y todo eso para hacer mas amigable el excel...

me podrías dar una mano??

Gracias nuevamente..

Hola,

Este es un problema común en Excel. La forma más fácil es concatenar un apóstrofe antes del texto. Por ejemplo, debes escribir '00001.

Saludos,

Takashi

y para poner negrita?? o cambiar la letra ???

P.D.: Como consigo los manuales para realizar la certificacion de DEX?? en el partner Source no encontre nada =(.

GRacias

Debe funcionar así: 

cell.Font.Bold=true;
cell.Font.Size=14;

Con respecto a los manuales de certificación, no creo que existan. La examen de certificación de Dexterity fué descontinuado hace varios años.

Saludos,

Takashi

Agradezco el interes en este tema ya que debido a esto pude mejorar el codigo que presenté en anteriores ejemplos...
Esta sería la versión mejorada de los encabezados...

 str_Cell = "A1"; 
  worksheet.Range[str_Cell].NumberFormat = "@"; {con esto se pone el formato en texto "0001"}
  worksheet.Range[str_Cell].Font.Bold = true;
  worksheet.Range[str_Cell].HorizontalAlignment = -4108; {constante xlCenter}
  worksheet.Range[str_Cell].Value = "Id Cliente"; {observe que el valor lo pongo al final}
  
 str_Cell = "B1"; 
  worksheet.Range[str_Cell].NumberFormat = "@";
  worksheet.Range[str_Cell].Font.Bold = true;
  worksheet.Range[str_Cell].HorizontalAlignment = -4108; {constante xlCenter}
  worksheet.Range[str_Cell].Value = "Nombre Cliente";
 str_Cell = "C1"; 
  worksheet.Range[str_Cell].NumberFormat = "@";
  worksheet.Range[str_Cell].Font.Bold = true;
  worksheet.Range[str_Cell].HorizontalAlignment = -4108; {constante xlCenter}
  worksheet.Range[str_Cell].Value = "Num. Pedido";
 str_Cell = "D1"; 
  worksheet.Range[str_Cell].NumberFormat = "@";
  worksheet.Range[str_Cell].Font.Bold = true;
  worksheet.Range[str_Cell].HorizontalAlignment = -4108; {constante xlCenter}
  worksheet.Range[str_Cell].Value = "Fec. Pedido";
 str_Cell = "E1"; 
  worksheet.Range[str_Cell].NumberFormat = "@";
  worksheet.Range[str_Cell].Font.Bold = true;
  worksheet.Range[str_Cell].HorizontalAlignment = -4108; {constante xlCenter}
  worksheet.Range[str_Cell].Value = "Limite de Credito";
 str_Cell = "F1"; 
  worksheet.Range[str_Cell].NumberFormat = "@";
  worksheet.Range[str_Cell].Font.Bold = true;
  worksheet.Range[str_Cell].HorizontalAlignment = -4108; {constante xlCenter}
  worksheet.Range[str_Cell].Value = "Monto Doc.";
 str_Cell = "G1"; 
  worksheet.Range[str_Cell].NumberFormat = "@";
  worksheet.Range[str_Cell].Font.Bold = true;
  worksheet.Range[str_Cell].HorizontalAlignment = -4108; {constante xlCenter}
  worksheet.Range[str_Cell].Value = "Razón";
 bln_SeCreoExcel = true;

Como complemento... agrego los formatos mas comunes usados en excel (Localizado para español México pero adaptable a cualquier formato

worksheet.Range[str_Cell].NumberFormat = "0.00" {Formato número}
worksheet.Range[str_Cell].NumberFormat = "$#,##0.00" {Formato moneda}
worksheet.Range[str_Cell].NumberFormat = "_($* #,##0.00_);_($* (#,##0.00);_($* ""-""??_);_(@_)" {Formato Contabilidad}
worksheet.Range[str_Cell].NumberFormat = "m/d/yyyy" {Formato Fecha}
worksheet.Range[str_Cell].NumberFormat = "[$-F400]h:mm:ss AM/PM" {Formato Hora}
worksheet.Range[str_Cell].NumberFormat = "0.00%" {Formato Porcentage}
worksheet.Range[str_Cell].NumberFormat = "0.00E+00" {Formato Cientifica}
worksheet.Range[str_Cell].NumberFormat = "@" {Formato Texto}
worksheet.Range[str_Cell].NumberFormat = "000000" {Formato Perzonalizada (con ceros a la izquierda) "000123" }

Señores, excelente trabajo. Muchas Gracias.

Gracias Takashi por la ayuda y a Bruno por el codigo , muy util

MP

Bruno,

Tu ejemplo es excelente y muy ilustrativo. Muchas gracias por compartirlo, es muy util,

Saludos

Ignacio.

Señores, me ocurrio un problema cuando instalé esto otra pc con distinta verision de MS Excel.

como creo el objeto:

app = COM_GetObject("Excel.Application");
 if(app = null) then
     app = new Excel.Application();
 end if;
 app.Visible = true;

ERROR:

Excepcion del objeto no controlada:
Este comando no está disponible porque la licencia para utilizar esta aplicacion ha caducado.

como podría hacer para que funcione con cualquier excel???

 Gracias

Hola,

En tu post no veo la imagen... así que no estoy seguro del problema.

Nosotros hemos desarrollado mucho usando COM con Excel y no hemos tenido problemas de versión. Es verdad que el amarre del Library es con una versión específica de Office pero en general el modelo de objetos de Excel no ha cambiado en mucho tiempo y funciona. Tenemos clientes que tienen algunas estaciones con 2003 y otros con 2007 y el mismo programa funciona.

Saludos,

Takashi

Hola sdebony...

Este problema normalmente es devido a que no está activada la copia de Microsoft Office XP

Para resolver el problema, debes activar tu copia de Microsoft Office XP. Para ello, utiliza uno de los métodos siguientes.