Discussion :

[Chin]

Coucou à tous !

J'ai un petit souci...

Dans un répertoire donné j'ai un tas de fichiers .xls qui présentent - en principe - la même structure : un tableau de 15 colonnes. Je veux recopier le contenu de chaque fichier dans une seule feuille.

MAIS les colonnes sont de format différent, et on doit vérifier les infos de chaque cellule, les formater, etc... Comment déclarer un nouveau "Type" , une sorte de tableau où les valeurs ne sont pas du même type ? J'ai essayé ça pour commencer :

Type Entreprise
Nom As String
DateDinscription As Date
End Type

Mais ça ne passe pas à la compilation ; je ne sais pas où faire cette déclaration de toutes les façons...

[SfJ5Rpw8]

je ne comprends pas la corrélation que tu fais entre les types de variables personalisées ... et le format des colonnes excel?

l'instruction Type te permet de déclarer un type personnalisée de variables... tu doit l'utiliser en début de modules..

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
16
17
18
19
20
'
' Déclaration du type de  variable personalisé
'
Type Entreprise
  Nom As String
  DateDinscription As Date
End Type
 
 
'
' Procédure de test utilisant ce type
'
Sub Test()
Dim maVar As Entreprise 'Délaration d'une variable du fameux type...
'Utilisation de la variable (écriture)
maVar.Nom = "bbil"
maVar.DateDinscription = Now
'utilisation de la variable (lecture)
MsgBox "Salut c'est moi " & maVar.Nom & " je me suis incrit le : " & maVar.DateDinscription
End Sub

[Chin]

Il n'y a pas de correlation, en fait ; je vais formater mes colonnes après avoir tout rapatrié.
Je rame beaucoup en fait ; j'ai du mal sur tous les points de mon programme.
Merci pour la réponse...