PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV, WEBDEV e WINDEV Mobile

Inicio | Mensagens recentes | Conecte-se... |  | Português FR
Inicio → WINDEV 2024 → Recup d'un xls sur tableau
Recup d'un xls sur tableau
Iniciado por jeremy, jun., 23 2005 8:48 PM - 1 resposta
#1
Publicado em junho, 23 2005 - 8:48 PM
Voila mon code :
//////////////////////////////////////////////////////////////////////
FichierXLS est une chaîne
IdFichierXLS est un entier
i2 est un entier
j est un entier
var_tableau est un tableau de (3) Variants

// Sélection du fichier xls
FichierXLS = fSélecteur("", "", "Sélection d'un fichier xls","Fichier excel .xls" + TAB + "*.xls", "xls", fselOuvre+fselExiste)

// Ouverture du fichier sélectionné - attention verifier qu il ne soit pas deja ouvert
IdFichierXLS = xlsOuvre(FichierXLS)

// lecture des lignes
POUR i2=2 A xlsNbLigne(IdFichierXLS) // commence a 2 si on veut pas recuperer l'entete
//du fichier excel

// recup des valeurs colonnes et affectation dans le tableau
POUR j=1 A (3)
// voir selon format date du fichier excel ....
var_tableau[j]=xlsDonnée(IdFichierXLS,i2,j)
FIN
TableAjouteLigne(Tab_aganda,var_tableau[1],var_tableau[2],var_tableau[3])

FIN


/////////////////////////////////////////////////////////////////////

Donc il recupere bien mon fichier excel dans ma table.
Mais il manque juste 2 caractère.
J'ai 3 colonne (une de chaine,une avec la date et la derniere une l'heure)
Donc j'ai tout sauf les minute de la colonne 3 (par exemple : 12:__ )

merci
#2
Publicado em junho, 24 2005 - 11:02 AM
Bonjour,

La fonction xlsdonnée renvoi des chaines, pourquoi utilises-tu un tableau de variant ?


De plus, regarde le format de lecture du fichier s'il est compatible avec le masque de ta colonne.

Cordialement,

C.AUBRY
→ Voltar para WINDEV 2024