Tema: Traspaso de Excel a ListView
Ver Mensaje Individual
  #1
Antiguo 2 de abril de 2020, 11:40
Socavi
Forero
Última Actividad 05.07.2022 17:01
Posts Posts: 78
Likes enviados Enviados: 49
Likes recibidos Recibidos: 18
Predeterminado Traspaso de Excel a ListView
0
Likes

None...

Inactivo Inactivo
No consigo encontrar más información, que la descrita en el ejemplo de "Excel Connection Control" y aquí en el Foro, no he sabido encontrar una solución a mi problema que es el siguiente:
Al intentar transferir datos de Excel a mi programa pocas veces me ha traspasado los datos de la hoja excel completamente, son más las veces que se para en cada traspaso, es decir que los pasa de uno en uno mediante hacer 'click' con el mouse, en la ventana que me 'dice' The property array index is invalid, seguida de otra que 'dice' Error ocurred: The object is not set or an invalid object pointer is set.
Aunque pueda parecer una tontería, para mi es un problemon, que ni hablo inglés, aunque utilizando el traductor Google, la verdad es que tampoco me soluciona nada, y que por más pruebas que hago no consigo solucionarlo.
Agradezco de antemano cualquier sugerencia que se me haga al respecto, para conseguir mi objetivo.
Con gracias anticipadas. Un saludo.


Código COBOL:
  1. 01 SET-DATA  PIC X(35).
  2.  01 PEP      PIC 999.
  3.  PROCEDURE       DIVISION.
  4.         PERFORM MAIN-PRC VARYING ROW-NUM FROM 1 BY 1 UNTIL ROW-NUM > PLIN.
  5.  MAIN-PRC SECTION.
  6.  PROVA.
  7.      MOVE 0 TO PEP.
  8.  COMENSA.
  9.      ADD 1 TO PEP. 
  10. *********************************************************
  11. * Obtenga los datos de "Texto" (Nombre) y muévalos a la tabla *
  12. *********************************************************
  13.         MOVE "Text"(ROW-NUM PEP) OF CmExcel1 TO TABLE-NAME.
  14.         MOVE TABLE-NAME TO "Text" OF "TableCells"(ROW-NUM PEP) OF CmTable1.
  15. ******************************************************************
  16. *Obtenga los datos de "Texto" (puntaje, total y promedio) y muévalo *
  17. * a la mesa. * *
  18. ******************************************************************
  19.           ADD 1 TO PEP.
  20.         MOVE "Text"(ROW-NUM PEP) OF CmExcel1 TO SET-DATA.
  21.         MOVE SET-DATA TO "Text" OF "TableCells"(ROW-NUM PEP) OF CmTable1.
  22.             ADD 1 TO PEP.
  23.         MOVE "Text"(ROW-NUM PEP) OF CmExcel1 TO SET-DATA.
  24.         MOVE SET-DATA TO "Text" OF "TableCells"(ROW-NUM PEP) OF CmTable1.
  25.             ADD 1 TO PEP.
  26.         MOVE POW-TEXT(ROW-NUM PEP) OF CmExcel1 TO SET-DATA.
  27.         MOVE SET-DATA TO "Text" OF "TableCells"(ROW-NUM PEP) OF CmTable1.
  28.             ADD 1 TO PEP.
  29.         MOVE "Text"(ROW-NUM PEP) OF CmExcel1 TO SET-DATA.
  30.         MOVE SET-DATA TO "Text" OF "TableCells"(ROW-NUM PEP) OF CmTable1.
  31.         ADD 1 TO PEP.
Socavi is offline   Responder Con Cita