Nbre de lignes limitées à 65536 lignes???

  • Initiateur de la discussion Initiateur de la discussion ATV80130
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

ATV80130

XLDnaute Nouveau
Bonjour,

Ayant un gros fichier à ouvrir, je n'arrive qu'à ouvrir uniquement 65536 lignes. est ce normal? Comment dois je procéder pour pouvoir récupérer tout mon fichier.

Merci d'avance pour vos réponses.

Noémie
 
Re : Nbre de lignes limitées à 65536 lignes???

Bonjour Noémie,

Seul Excel 2007 (et +) gère plus de 65536 lignes dans une feuille de calcul.
Donc soit tu essayes d'ouvrir ton fichier sur un Excel antérieur, soit tu as enregistré ton classeur au format Excel 97-2003
 
Re : Nbre de lignes limitées à 65536 lignes???

Bonjour,

l'on peut surement le couper et le stocker sur 2 3 voir 4 onglets si il fait , mais ton GROS ficchier vient d'où, un fichier text , une requetes , éclaires nous , et l'on te montrera le chemin ,
 
Re : Nbre de lignes limitées à 65536 lignes???

Ce fichier provient d'un transfert d'un système gpao d'où le fait qu'il soit lourd.
A priori, on peut le recevoir en fichier texte mais comment puis je procéder du fichier texte au fichier excel car au final il me le faut ces 145000 lignes sur excel
 
Re : Nbre de lignes limitées à 65536 lignes???

Une possibilité, vite écrit, pas testée , après cela dépant du format de ton fichier texte

Sub transfert()
'Initialise le compteur d'onglets
Compte = 1
'Création premier onglet
activeworkbook.Worksheets.Add
ActiveSheet.Name = "Données" & Compte
' Ouverture fichier texte
Open "FICHTEST" For Input As #1
'Lecture jusqu'a fin de fichier
Do While Not EOF(1)
'Lecture de la ligne courante
Line Input #1, ligne
'Incrémente le compteur de ligne
nbligne = nbligne + 1
'Si dépassement de capacité de feuile Excel
If nbligne > 65535 Then
'Remise du nombre de lignes à 0
nbligne = 0
'Incrémente le nombre d'onglets
Compte = Compte + 1
'Prépare le nom du nouvel onglet
Onglet = "Données" & Compte
'Création nouvel onglet
activeworkbook.Worksheets.Add
ActiveSheet.Name = Onglet
End If
'Copie de la ligne lue dans la feuille Excel
Worksheets(Onglet).Range("A" & nbligne) = ligne
Loop
"Fermeture fichier texte
Close #1
 
Re : Nbre de lignes limitées à 65536 lignes???

Un Exemple,

Reste à voir comment les données sont organisées dans votre cas et si cela se déroule bien
.

Pour le test , copier dans la racine du disue C:\ le fichier test une fois dézippé

puis lancer la macro à l'aide du bouton
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
18
Affichages
372
Retour